MsgBox si

Bonjour,

j'aimerai afficher un Msgbox si on active une macro dans la feuil1.

En gros si on active la macro dans la feuil1 le MsgBox indique "Erreur" et il ne se passe rien, en revanche s'il s'agit d'une autre feuille la macro s'active.

Merci!

Bonjour,

Petit coup de pouce :

Dim ong As Worksheet

for each ong in ActiveWorkbook.Worksheets
    If ong.name = "ttt" then 
        msgbox("Error")
        exit sub
    else 
        .
        .
        .
    end if
next ong

Bonjour,

Sauf les évènementielles (l'évènement concernant un objet défini) une macro n'est pas liée à une feuille !

Comment le sait-on ?

Bonjour à tous,

je propose ce code VBA :

Sub Macro1()
  If ActiveSheet.Name = "Feuil1" Then MsgBox "Erreur": Exit Sub 'message d'erreur & sortie de la sub
  'ici, toutes les instructions de la sub Macro1 seront exécutées sur toutes les autres feuilles
  MsgBox "exécution de la suite de la sub"
End Sub

dhany