Message si feuille inexistante

Bonsoir a tous

voila tout est dans le titre dans mon userform j'ai des bouton qui dirige directement vers la feuille qui vons etre creer au fur et a mesure .

je voudrais rajouter (a la place d'une erreur ) un message "veuillez créer la feuille) et les diriger vers le formulaire de saisie.

Merci de votre aide

Bonsoir,

Un simple Msgbox "ton message" fera l'affaire non ?

Cordialement,

cela ne fonctionne pas

je pensait faire

If Sheets("Feuil1") = "" Then
    MsgBox "veuillez creer"

mais cela ne fonctionne pas

Essaie ce code :

Sub Test()
Dim s As Worksheet, ok As Boolean
For Each sh In Worksheets
If sh.Name Like "Ici le nom de ta feuille*" Then flg = True: Exit For
Next
If flg = True Then
MsgBox "Trouvée!"
Else
Msgbox "non trouvée"
End If
End Sub

c'est bon j'ai trouvé

Private Sub CommandButton4_Click()

On Error Resume Next

Sheets("feul1").Select

If Sheets("Feuil1") = "" Then

MsgBox "veuillez créer la feuille"

End If

End Sub


Merci d3js

Rechercher des sujets similaires à "message feuille inexistante"