condition avec macro

[ETUDES78]

bonsoir

j'aimerais que cette cette macro soit executée si le bouton de commande existe
car avant d'enregistrer le dossier en question ce bouton est effacé, mais si le dossier est reouvert, modifier et reengistrer j'ai une erreur sur cette macro ce qui est normal car le bouton n'existe plus

ActiveSheet.Shapes("bouton 5").Delete

donc simplement rajouter une condition si ActiveSheet.Shapes("bouton 5") existe,
mais je n'y arrive pas

merci de votre aide

Cordialement

 

[ROGER2327]

Re : condition avec macro

Bonsoir ETUDES78

Essayez :

On Error Resume Next
ActiveSheet.Shapes("bouton 5").Delete
On Error GoTo 0

ROGER2327

 

[ETUDES78]

Re : condition avec macro

Bonsoir ETUDES78

Essayez :

On Error Resume Next
ActiveSheet.Shapes("bouton 5").Delete
On Error GoTo 0

ROGER2327

😛 super c'etait pourtant simple
merci pour ton aide cela fonctionne

Cordialement😱