problème de syntaxe formule

[sam]

Bonjour à tous,

voilà mon problème :
Je désirerais faire un ET Logique entre l'information située dans une cellule (Ai-1) et une chaine de caractère "TOTAL ". J'ai essayé la formule ci-dessous et elle ne fonctionne pas avec le ET Logique,

ws1.Range("A" & i) = "TOTAL " And ws1.Range("A" & (i - 1))

Merci de votre aide.

 

[Minick]

Salut,

Essai comme ca

ws1.Range("A" & i) = "TOTAL " And ws1.Range("A" & (i - 1)) = "TOTAL"

ou

ws1.Range("A" & i).Value = "TOTAL " And ws1.Range("A" & (i - 1)).Value = "TOTAL"

@+

Minick

 

[@+Thierry]

Re: problème de syntaxe VBA

Bonsoir Sam et Minick et le Forum

Et le "If " où il est ???

Où alors je n'ai pas compris ...

Sub Test()

Dim I As Byte
Dim WS1 As Worksheet

Set WS1 = ThisWorkbook.Sheets("Sheet1")

For I = 5 To 10
If WS1.Range("A" & I).Text = "TOTAL" And WS1.Range("A" & (I - 1)).Text = "TOTAL" Then
MsgBox "Toto"
End If
Next

End Sub

@+Thierry


PS essayer de parler avec des termes corrects, car dans ce Sujet "Formule" n'a rien à voir !!