Pour être plus clair, je souhaite lors de l'initialisation d'un fichier détecter si un objet existe dans une feuille.
Ça devrait donner quelque chose comme ça...
Code:
If sheets("Feuille1").Bouton_à_trouver.exists = true then
Code
Else
Code
End If
Voilà ce que j'aimerais obtenir avec un code valide.
Re : Comment détecter quelque chose qui peut ne pas exister ?
Bonjour,
regarde ceci, à adapter..
Code:
Dim s As Shape
On Error Resume Next
Set s = Sheets("Feuil1").Shapes("nombouton")
MsgBox IIf(Err.Number <> 0, "bouton n'existe pas...", "bouton existe")
On Error GoTo 0
Re : Comment détecter quelque chose qui peut ne pas exister ?
Bonjour Pierrot, kjin
Merci pour ces réponses rapides.
Je n'ai pas les moyens de tester vos codes, je suis en voiture ( comme passager ).
Si j'ai bien compris la logique des 2 codes, c'est finalement l'erreur qui détermine la non existence du bouton.
J'essaie ça dès que possible...
Encore Merci
Pascal