instruction else qui plante

[mumu]

Bonjour,

Je fais (encore) appel à vos talents.... J'ai besoin d'un conseil pour le code suivant.
Je voudrais que ma "macro3" se lance uniquement s'il y a des données dans "mafeuille" sachant que cette feuille aura toujours des noms de champ dans la ligne 1

Private Sub Workbook_open()

Call macro1
Call macro2

Sheets("mafeuille").Select

If Range("A2") <> Empty Then Call macro3
ElseIf Range("A2") = Empty Then Call macro4
End If

Call macro5

End Sub

Malheureusement, il me dit "erreur de compilation else sans if" !!??
J'arrive pas à comprendre pourquoi ça plante..... 🙁

D'avance merci !!

Mumu

 

[SergiO]

Re : instruction else qui plante

Bonjour mumu,

essaie ceci:

Private Sub Workbook_open()

Call macro1
Call macro2

Sheets("mafeuille").Select

If Range("A2") <> Empty Then
Call macro3
Else
Call macro4
End If

Call macro5

End Sub

@+

 

[Raja]

Re : instruction else qui plante

Bonjour,

Remplace le code suivant :

If Range("A2") <> Empty Then Call macro3
ElseIf Range("A2") = Empty Then Call macro4
End If

par :

If Range("A2") <> Empty Then 
  Call macro3
ElseIf Range("A2") = Empty Then 
  Call macro4
Else : End If

édit : prend le code de Sergio. Elle est plus logique et a la meilleure syntaxe.

 

[mumu]

Re : instruction else qui plante

Bonjour Sergio et Raja,

Je vous remercie pour vos solutions, finalement des fois c'est super simple 😱
Je savais que je tapais à la bonne porte !

Encore merci

Mumu

 

[tototiti2008]

Re : instruction else qui plante

Bonjour à tous,

moi je ferais simplement :

If Range("A2") <> Empty Then
Call macro3
Else
Call macro4
End If

Edit : Oupps, désolé, déjà proposé par Sergio 🙂

 

[mumu]

Re : instruction else qui plante

oui effectivement, mais merci quand même 😉 !