OVH Cloud OVH Cloud

condition SI en VBA

22 réponses
Avatar
jeje02
Bonjour
J'ai une macro qui est exécuté si ma cellule A1 est OUI est une macro différente si ma cellule A1 est NON.
Le OUI ou NON de la cellule A1, résulte d'une formule RECHERCHEV.
Le problème est lorsque dans ma cellule A1 j'ai OUI et que cette macro génère un NON due à la formule RECHERCHEV, ma macro exécute successivement la macro OUI et NON.
Comment faire pour que ma macro s'arrête à la première condition sans exécuter la deuxième condition (même si elle est VRAI).
Merci à vous

2 réponses

1 2 3
Avatar
MichD
A )
Je ne suis pas vexé... mais si une procédure ne fait pas ce qui est désiré
j'attends qu'on explique ce qui ne va pas avec la macro.

| Moi ce que je veux, c'est que cette première ligne vide soit sélectionnée
à la fin de ma macro

B )
Dans la procédure, il s'agit de modifier cette ligne de code
MsgBox x.Address pour Application.Goto X comme dans
la procédure suivante...

'-------------------------------------------------
Dim X As Range
With Worksheets("Feuil1")
With .Range("M4:U13")
If .Item(1, 1) = "" Then
Set X = .Item(1, 1)
Else
Set X = .Find(What:="", After:=.Item(1, 1), _
LookIn:=xlValues, LookAt:=xlWhole, _
SearchOrder:=xlByColumns, _
SearchDirection:=xlNext)
End If
If Not X Is Nothing Then
Application.Goto X
Else
MsgBox "Aucune cellule vide dans la plage désignée."
End If
End With
End With
'-------------------------------------------------
Avatar
jeje02
Le mercredi 12 Novembre 2014 à 18:38 par jeje02 :
Bonjour
J'ai une macro qui est exécuté si ma cellule A1 est OUI est une
macro différente si ma cellule A1 est NON.
Le OUI ou NON de la cellule A1, résulte d'une formule RECHERCHEV.
Le problème est lorsque dans ma cellule A1 j'ai OUI et que cette macro
génère un NON due à la formule RECHERCHEV, ma macro
exécute successivement la macro OUI et NON.
Comment faire pour que ma macro s'arrête à la première
condition sans exécuter la deuxième condition (même si elle
est VRAI).
Merci à vous


Merci MichD
Voila exactement ce que je voulais
Effectivement, y avait pas grand choses à modifier, mais pour moi cela était déjà trop compliqué.
Encore un grand merci
1 2 3