OVH Cloud OVH Cloud

question

1 réponse
Avatar
frederic.jednak
comment faire pour que dans Excel 2000 on recherche l'occurence du
"saut de ligne" dans un groupe de cellule ?
Merci

1 réponse

Avatar
Daniel
Bonsoir.
Je connais deux valeurs ascii pour le saut de ligne :10 et 111. Il y en a
peut-être d'autres. La macro suivante est écrite pour ces deux là :

Sub Cherche()
Dim c As Range, Var1 As Integer, Var2 As Integer
Var = 0
For Each c In Selection
Var1 = InStr(1, c.Value, Chr(10), vbBinaryCompare)
Var2 = InStr(1, c.Value, Chr(111), vbBinaryCompare)
If Var1 > 0 Or Var2 > 0 Then
MsgBox c.Address
End If
Var1 = 0
Var2 = 0
Next c
End Sub

Cordialement.
Daniel
"jednak" a écrit dans le message de news:

comment faire pour que dans Excel 2000 on recherche l'occurence du
"saut de ligne" dans un groupe de cellule ?
Merci