Majuscules

[titiraf]

Bonjour,

Je souhaiterais pour une colonne faire en sorte que lorsque je saisis un mot, que la cellule le transforme automatiquement en majuscule ou nom propre.
Pourriez vous ùme dire comment faire.
Merci infiniment
Thierry

 

[apt]

Re : Majuscules

Bonsoir bobjean,

COmment utilisé cette méthode mais changer la colonne dans laquelle cela doit se faire?

tu n'as qu'à changer le numéro de la colonne ici :

Target.Column = 2

2 pour la colonne B.

Cordialement.

 

[apt]

Re : Majuscules

Bonsoir sev,

Bonsoir, comment avoir une majuscule seulement sur le premier mot du texte ?

une idée, masi pas testée :

Private Sub Worksheet_Change(ByVal Target As Range)

mot = Split(" ",target.value)

'Traduit en Nompropre dès la saisie dans la colonne B 

If Target.Column = 2 And Target.Count = 1 Then
Target = Application.Proper(mot(1))
End If

End Sub

Cordialement.