OVH Cloud OVH Cloud

Commandbutton flottant - surtout à l'attention de "Youky"

3 réponses
Avatar
rm81
Bonjour,

J'ai vu votre échange avec Peponne31 du 26/02/06 au sujet d'un commandbutton
qui bouge avec un changement de cellule. J'ai utilisé cette solution pour
faire bouger mon commandbutton3. En revanche mes commandbutton1 et 2 ne
marchent plus. (Pour votre information, ces commandbuttons copient, insèrent
et collent des ranges ailleurs dans ma feuille.)

Je pense que le problème arrive parceque ce macro Worksheet_SelectionChange
touche tout changement de selection. Du coup, puisqu'il y'a des changements
de selection dans mes autres commandbuttons, au moment de leur execution, ils
s'interrompent au milieu pour executer ce macro Worksheet_SelectionChange.

Y'a t-il une solution pour régler ce problème? Je vous remerci d'avance
pour toute suggestion.

rm81

3 réponses

Avatar
Youky
Bonjour,
si tu utilises select_change, il est bon de verifier le target.address
dans cette sub seul en quittant A1 la macro agit
Youky
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "salut"
End If
End Sub

"rm81" a écrit dans le message de news:

Bonjour,

J'ai vu votre échange avec Peponne31 du 26/02/06 au sujet d'un
commandbutton
qui bouge avec un changement de cellule. J'ai utilisé cette solution pour
faire bouger mon commandbutton3. En revanche mes commandbutton1 et 2 ne
marchent plus. (Pour votre information, ces commandbuttons copient,
insèrent
et collent des ranges ailleurs dans ma feuille.)

Je pense que le problème arrive parceque ce macro
Worksheet_SelectionChange
touche tout changement de selection. Du coup, puisqu'il y'a des
changements
de selection dans mes autres commandbuttons, au moment de leur execution,
ils
s'interrompent au milieu pour executer ce macro Worksheet_SelectionChange.

Y'a t-il une solution pour régler ce problème? Je vous remerci d'avance
pour toute suggestion.

rm81


Avatar
Youky
une solution, ceci empêche les évenements d'avoir lieu
je pense que cela va résoudre to PB, à mettre sous chaque boutons qui ne
marche pas
Application.EnableEvents = False
'tes macros des boutons
Application.EnableEvents = TrueYouky"Youky" a écrit
dans le message de news:
Bonjour,
si tu utilises select_change, il est bon de verifier le target.address
dans cette sub seul en quittant A1 la macro agit
Youky
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "salut"
End If
End Sub

"rm81" a écrit dans le message de news:

Bonjour,

J'ai vu votre échange avec Peponne31 du 26/02/06 au sujet d'un
commandbutton
qui bouge avec un changement de cellule. J'ai utilisé cette solution
pour
faire bouger mon commandbutton3. En revanche mes commandbutton1 et 2 ne
marchent plus. (Pour votre information, ces commandbuttons copient,
insèrent
et collent des ranges ailleurs dans ma feuille.)

Je pense que le problème arrive parceque ce macro
Worksheet_SelectionChange
touche tout changement de selection. Du coup, puisqu'il y'a des
changements
de selection dans mes autres commandbuttons, au moment de leur execution,
ils
s'interrompent au milieu pour executer ce macro
Worksheet_SelectionChange.

Y'a t-il une solution pour régler ce problème? Je vous remerci d'avance
pour toute suggestion.

rm81






Avatar
rm81
Super. Je vais essayer le truc EnableEvents. Je t'en remercie beaucoup!

Rm81


une solution, ceci empêche les évenements d'avoir lieu
je pense que cela va résoudre to PB, à mettre sous chaque boutons qui ne
marche pas
Application.EnableEvents = False
'tes macros des boutons
Application.EnableEvents = TrueYouky"Youky" a écrit
dans le message de news:
Bonjour,
si tu utilises select_change, il est bon de verifier le target.address
dans cette sub seul en quittant A1 la macro agit
Youky
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$A$1" Then
MsgBox "salut"
End If
End Sub

"rm81" a écrit dans le message de news:

Bonjour,

J'ai vu votre échange avec Peponne31 du 26/02/06 au sujet d'un
commandbutton
qui bouge avec un changement de cellule. J'ai utilisé cette solution
pour
faire bouger mon commandbutton3. En revanche mes commandbutton1 et 2 ne
marchent plus. (Pour votre information, ces commandbuttons copient,
insèrent
et collent des ranges ailleurs dans ma feuille.)

Je pense que le problème arrive parceque ce macro
Worksheet_SelectionChange
touche tout changement de selection. Du coup, puisqu'il y'a des
changements
de selection dans mes autres commandbuttons, au moment de leur execution,
ils
s'interrompent au milieu pour executer ce macro
Worksheet_SelectionChange.

Y'a t-il une solution pour régler ce problème? Je vous remerci d'avance
pour toute suggestion.

rm81