option demarrage d' une macro

nicroq · 14 Janvier 2011

Bonjour, je viens de terminer une petite macro qui tourne très bien, cependant je souhaiterai que lorsque je clique sur le bouton pour lancer la macro, qu'elle ne demarre que si la cellule A1 est selectionnée sinon msgbox " erreur cellule A1 non selectionnée" . Et que la macro ne demarre pas tant que la la cellule A1 n'est pas selectionnée.

En vous remerciant de votre aide

Nico

job75 · 14 Janvier 2011

Re : option demarrage d' une macro

Bonjour,

En début de macro :

If Intersect(Selection, [A1]) Is Nothing Then Msgbox "blablabla": Exit Sub

ou si l'on préfère :

If ActiveCell.Address <> "$A$1" Then Msgbox "blablabla": Exit Sub

A+

James007 · 14 Janvier 2011

Re : option demarrage d' une macro

Bonjour,

Bien qu'il y aurait un commentaire à faire sur ta logique ...
Tu peux ajouter le code suivant, en tout début de ta macro :

Code:

If ActiveCell.Address <> "$A$1" Then
      MsgBox " Oops, vous n'avez pas sélectionné A1 ..."
      Exit Sub
End If

A +
🙂

Edit : Un Grand Bonjour Amical à Job75 😎

nicroq · 14 Janvier 2011

Re : option demarrage d' une macro

merci beaucoup pour votre aide
Ca marche nikel!

Vraiment très utile et efficace votre forum!!!

option demarrage d' une macro

nicroq

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

James007

XLDnaute Barbatruc

nicroq

XLDnaute Occasionnel

Discussions similaires

option demarrage d' une macro

nicroq

XLDnaute Occasionnel

job75

XLDnaute Barbatruc

James007

XLDnaute Barbatruc

nicroq

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency