Convertir en cas de phrase, Excel VBA

Sub convertirphrase()	
Dim plagecell As Range	
For Each plagecell In Selection	
If WorksheetFunction.IsText(plagecell) Then
plagecell.Value = UCase(Left(plagecell, 1)) &
LCase(Right(plagecell, Len(plagecell) - 1))
End If	
Next plagecell	
End Sub	

En cas de texte, vous avez la première lettre du premier mot en majuscule et restez tous en mots en minuscules pour une seule phrase et ce code vous aidera à convertir le texte normal en cas de phrase.

S’abonner
Notifier de
0 Commentaires
le plus ancien
le plus récent le plus populaire
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x