arreter une Worksheet avec un ToggleButton

[Micke-31]

Bonjour le forum,

j'ai un code dans
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Qui gére automatiquement des données externes. occasionnellement des données doivent être modifiées.
Je pensais mettre un ToggleButton sur ma feuille qui en position true arrête la procédure par un exit sub ce qui permettrai de saisir des infos et position false la procédure automatique serait activée.

dans une macro, pas de problème, mais le code dans la Worksheet, je n'arrive pas à faire.

Je fait donc appel à vos connaissances et vous remercie pour vos excellentes réponses

A+

 

[BERRACHED said]

Re : arreter une Worksheet avec un ToggleButton

Salut,Micke-31

as-tu essayé au début de ta procédure : if Opptionbutton = true then exit sub
puis la suite de ta procédure

Cordialement

 

[Micke-31]

Re : arreter une Worksheet avec un ToggleButton

Salut BERRACHED said,

Oui j'ai testé plusieurs code dont le tien, en fait, c'est opption qui ne convenait pas, quelque fois on cherche des complications ou il n'y en a pas. Et tout simplement ce code me permet de faire ce que je souhaitais.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ToggleButton1 = True Then Exit Sub
Range("B5").Select 'etc...
End Sub

Merci encore

A+