V vincent Guest 10 Mai 2006 #1 Bonjour le forum Comment doit on s'y prendre pour ecrire un code du type: si une page existe faire afficher un message sinon afficher un autre message Merci d'avance
Bonjour le forum Comment doit on s'y prendre pour ecrire un code du type: si une page existe faire afficher un message sinon afficher un autre message Merci d'avance
P Papaye Guest 10 Mai 2006 #2 Bonjour Vincent, Voili, voilà : BPresent = False For i = 1 To Sheets.Count If Sheets(i).Name = 'Ma Feuille' Then BPresent = True Next i If BPresent = False Then MsgBox 'Pas là' Else MsgBox 'Lé là' End If Papaye Vote positif 0 Vote négatif
Bonjour Vincent, Voili, voilà : BPresent = False For i = 1 To Sheets.Count If Sheets(i).Name = 'Ma Feuille' Then BPresent = True Next i If BPresent = False Then MsgBox 'Pas là' Else MsgBox 'Lé là' End If Papaye
V vincent Guest 10 Mai 2006 #3 Merci Papaye de m'avoir répondu. En fait ce que je souhaiterai faire c'est: si l'onglet feuil1 est présent faire afficher lé la sinon afficher pas la Merci d'avance PS: je suis novice mais bon vous vous en doutiez déjà Vote positif 0 Vote négatif
Merci Papaye de m'avoir répondu. En fait ce que je souhaiterai faire c'est: si l'onglet feuil1 est présent faire afficher lé la sinon afficher pas la Merci d'avance PS: je suis novice mais bon vous vous en doutiez déjà
P Papaye Guest 10 Mai 2006 #4 Oui, oui, je vois : BPresent = False For i = 1 To Sheets.Count If Sheets(i).Name = 'feuil1' Then BPresent = True Next i If BPresent = False Then MsgBox 'Pas là' Else MsgBox 'Lé là' End If C'est bon ? Papaye Vote positif 0 Vote négatif
Oui, oui, je vois : BPresent = False For i = 1 To Sheets.Count If Sheets(i).Name = 'feuil1' Then BPresent = True Next i If BPresent = False Then MsgBox 'Pas là' Else MsgBox 'Lé là' End If C'est bon ? Papaye