Foncion SI et ET en VBA

[Daniel]

Re bonjour à vous tous!

Petite question! Existe t'il l'équivalent de la fonction ET en language VBA.

En faite ma macro s'active si il y a X dans la cellule A1 et s'il y a Y dans la celule A2 !!!

En n ormal ça donne =SI(ET(......
Mais en VBA ???

Alors doctor!

Merci de votre aide!

 

[chris]

Bonjour
En vba c'est plus simple
if ... and ... then

if range('A1').value='X' and range('A2').value='Y' then

 

[daniel]

Merci beaucoup CHRIS!!!

 

[Daniel]

Encore une question !


Concernant le OU , ça marche pareil 'OR' ??

 

[daniel]

Réponse : Ca marche aussi!

 

[_Thierry]

re Bonjour Daniel, Chris, le Forum

Juste pour t'aider à comprendre un peu mieux la puissance des If dans VBA :

Sub IfEndIf()
Dim MyString As String

MyString = 'Portez ce vieux whisky au juge blond qui fume'

If Left(MyString, 1) = 'P' Or Right(MyString, 1) = 'Z' Then
    MsgBox '1er Test Passé'
&nbsp; &nbsp; &nbsp; &nbsp; If Len(MyString) > 0 And Len(MyString) < 500 Then
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; MsgBox '2em Test Passé'
&nbsp; &nbsp; &nbsp; &nbsp; Else
&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; MsgBox '2em Test Echoué'
&nbsp; &nbsp; &nbsp; &nbsp; End If
Else
&nbsp; &nbsp; MsgBox '1er Test Echoué'
End If

End Sub

Bonne fin d'après midi
[ol]@+Thierry[/ol]