VBA Bloc If

[vivi4561]

Bonjour,

Savez vous comment faire en VBA pour faire la chose suivante :
SI ...... Alors ......
Et Si ...... Alors .....
Et Si ...... Alors .....
Sinon ..........

J'utilise actuellement

IF .... Then
Elseif ....... then
Elseif........ then
Else ..........
End if

Le truc c'est que si la première condition est acceptée, je souhaiterai vérifier les autres conditions (et non pas en sortir comme ça le fait actuellement).


Merci d'avance,


Vince

 

[Guest]

Re : VBA Bloc If

bonjour,

Cela pourait être (mais faudrait voir exactement la situation):

If PremiereCondition Then
    If PremiereSouscondition Then
        'Traitement
    ElseIf DeuxièmeSouscondition Then
        'Traitement
    ElseIf TroisièmeSousconditon Then
        'Traitement
    Else
        'Traitment autres cas
    End If
Else
    'Traitement si première condition non vérifiée
End If

Ou

If PremiereCondition Then
    Select Case Condition
        Case Is = valeur
         'Taitement
        Case Is > valeur
         'Traitement
        Case Is < valeur
          'Traitement
        Case Else
          'Traitement
    End Select
Else
        'Traitement si première condition non vérifiée
End If

Consulte l'aide excel.

A+

 

[vivi4561]

Re : VBA Bloc If

Re,

Merci pour ta réponse.

Petite précision il n'y a pas de première condition.
Voici mon code :

If dateDL = "" Then
    dateDL = "05/01"
ElseIf dateDA = "" Then
    dateDA = "05/01"
ElseIf dateDE = "" Then
    dateDE = "05/01"
End If

Je souhaite que le programme exécute chaque ligne même si la première condition est vraie (car là si dateDL = "" alors après avoir exécuté la ligne il quitte la boucle if).

 

[Guest]

Re : VBA Bloc If

Re,

Autre manière, mais il y en a beaucoup d'autre suivant se que tu veux faire ou ne pas faire comme tu ne dis pas se qui se passe pour les autres test en cas de non vérification:

Tous les tests seront toujours effectués!

If dateDL = "" Then dateDL = "05/01"
If dateDA = "" Then dateDA = "05/01"
If dateDE = "" Then dateDE = "05/01"

A+

 

[vivi4561]

Re : VBA Bloc If

Ah ok merci.
Je n'aurai pas cru qu'on pouvait les mettre comme ça.

Merci