Rapport de message :*
 

Re: Vérifie si une chaine commence par une majuscule

Titre du sujet : Re: Vérifie si une chaine commence par une majuscule
par Skoobi le 05/02/2009 22:56:52

Bonjour spookyz,
Didier ,

essaye plutôt ceci:

Sub Test()
DERLIGNE = Cells(1, 3).End(xlDown).Row
For T = 1 To DERLIGNE
Z = Cells(T, 3).Text
    If Not MajOK(Z) Then  MsgBox "
ligne " & T & " ne commence pas par une majuscule"
Next T
End Sub