Excéuter un macro de confiramation

shahrazed -  
chossette9 Messages postés 6855 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour
j'aimerai utliser ce macro

Sub MaFonction()
If MsgBox("Opération irréversible. Souhaitez-vous continuez ?", vbQuestion + vbYesNo, "QUESTION ...") = vbYes Then
' TON CODE SI LA REPONSE EST "OUI"
Else
' TON CODE SI LA REPONSE EST "NON"
End If

End Sub

si la repense oui la feuille d'excel sera masquer si c(estt non rastra ouverte comment je v faire

A voir également:

1 réponse

chossette9 Messages postés 6855 Date d'inscription   Statut Contributeur Dernière intervention   1 312
 
Sub MaFonction()
If MsgBox("Opération irréversible. Souhaitez-vous continuez ?", vbQuestion + vbYesNo, "QUESTION ...") = vbYes Then
Sheets(nom_de_ta_feuille).Visible = False
Else
Sheets(nom_de_ta_feuille).Visible = True
End If

End Sub

Cordialement.
0