Premieère lettre de chaque mot en Majuscule !

[Creepy]

Hello all,

Je viens poster ce petit message d'aide.
En ce moment je suis super mega booké

Quelqu'un aurait-il la gentillesse de me dire quelle macro ecrire pour transformer la première lettre de chaque mot d'une cellule en Majuscule mais pas le reste.

Si je pouvais avoir juste à faire un copier/coller ce serait super

Merci d'avance

Creepy

 

[Pascal76]

Salut creepy

La fonction NOMPROPRE fait cela

Bon courage

Pascal

 

[Creepy]

Merci Beaucoup !

 

[Moa]

Salut Creepy !

Macro trouvée je ne sais plus où !

Passer la première lettre en majuscule

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
Target = UCase(Left$(Target, 1)) & Mid$(Target, 2)
Application.EnableEvents = True
End Sub



@ +

Moa

 

[serge]

trouvé parmi les trésors du disciple...

Sub MajDebMot()
For Each cell In Selection

cell.Value = Application.WorksheetFunction.Proper(cell.Value)
Next cell
End Sub

bonne fin de journée à tous