Click sur forme auto

Bricofire

XLDnaute Impliqué

• 16 Mai 2006

• #2

Bonjour Francis, 🙂

Pour une zone de texte, une fois sélectionnée, tu cliques droit sur la bordure (pas dedans) et tuas affecter une macro qui est accessible dans le menu.

Pour un bouton quand tu es en mode création, tu double clisk dessus et tu passes direct en éditeur VBA.

Bonne journée,

Brico

 

Vote positif 0 Vote négatif

Bricofire

XLDnaute Impliqué

• 16 Mai 2006

• #3

Arf ! bonjour José 😉

Collision !

Aïe, t'es plein de piquants !!!!

Bonne journée,

brico

 

Vote positif 0 Vote négatif

F

Francis

Guest

• 16 Mai 2006

• #4

Bonjour jmps, Bricofire,

Désolé pour l'abus de langage. Effectivement ce ne sont pas des formes automatiques. Je genère par ex untextbox:

Set Obj = Sheets('Feuil1').OLEObjects.Add(ClassType:='Forms.TextBox.1', _
Link:=False, DisplayAsIcon:=False, _
...
With Obj
.Name = 'Txbx'
...
et je veux faire une procedure:
Private Sub Txbx_click()
Mais celle-ci ne s'active pas.

Merci pour votre aide.

 

Vote positif 0 Vote négatif

F

Fracis

Guest

• 16 Mai 2006

• #5

Re jmps,

Non, en fait j'aimerai lancer une procedure quand je click dessus.
Merci

 

Vote positif 0 Vote négatif

F

Francis

Guest

• 16 Mai 2006

• #6

Re,

En fait mon lancement de Proc est:

Private Sub Txbx_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)

mais cela reste sans effet.
Merci

 

Vote positif 0 Vote négatif

Bricofire

XLDnaute Impliqué

• 16 Mai 2006

• #7

Re tout le monde, 🙂

Un lien utile :

Lien supprimé

de plus en cliquant sur MichelXLD, tu auras accès à son WIKI qui regorge de choses et surement de ce pb 😉

Bonne appétit,

Brico

 

Vote positif 0 Vote négatif