Bonsoir,
J'ai un bout de code qui tourne dans un fichier pour forcer les majuscules dans certaines cellules et la première lettre de chaque mots dans d'autres.
Pourriez-vous m'aider afin d'ajouter un morceau de code qui forcerait, uniquement la première lettre des phrases, en majuscule.
If Target.Count > 1 Then Exit Sub
Select Case Target.Column
Case 2 To 7, 12, 14
If Target.Value <> UCase$(Target.Value) Then
Target.Value = UCase$(Target.Value)
End If
Case 15
If Target.Value <> StrConv(Target.Value, vbProperCase) Then
Target.Value = StrConv(Target.Value, vbProperCase)
End If
End Select
Merci d'avance pour votre aide.