Dans ma question du jour je souhaiterais créer une commande vérifiant que deux cellules soient égales à ce que je souhaite (voir fichier joint). En gros je veux que lorsque je clique sur mon bouton différentes macros s'effectuent. Cependant je souhaite qu'avant toute chose ma macro vérifie que la cellule A1 soit bien égale à "Test 1" et la cellule P1 soit bien égale à "Test2". Si c'est le cas alors on appelle à la chaine les macros (call macro1, call macro2 etc). Sinon une fenètre s'ouvre disant "vous n'êtes pas autorisé à effectuer cette action".
Option Explicit
Sub test()
With Sheets("NomFeuille")
If .Range("A1").Value = "Test1" And .Range("P1").Value = "Test2" Then
Call macro1
Call macro2
Else
MsgBox "pas le droit..."
End If
End With
End Sub