Test de selection objet VBA

gilbert_RGI

XLDnaute Barbatruc

• 15 Novembre 2016

• #2

Bonjour, bienvenue
avec un petit fichier exemple ça serait plus facile de connaître votre demande

 

Vote positif 0 Vote négatif

V

Vashh50

XLDnaute Nouveau

• 15 Novembre 2016

• #3

Ok je viens de faire un exemple.

En gros, lorsque je clique sur le shape Parcours, la macro se lance. Une fois la macro lancé, à chaque fois que l'utilisateur clique sur un des shapes traits, le nom de ce trait va chercher dans la BDD une longueur associée et le stock dans une variable. Et je veux que ça fasse cela tant que l'utilisateur ne clique pas sur la macro "Fin de la macro". A la fin, le total est affiché dans la case M9.

J’espère que c'est plus clair comme ça.

Cordialement.

 

Pièces jointes

• Exemple.xlsx

  11.5 KB · Affichages: 38

Vote positif 0 Vote négatif

V

Vashh50

XLDnaute Nouveau

• 15 Novembre 2016

• #4

J'arrive à repérer le clique sur une forme avec ce code tout simple :

Sub Connecteurdroit85_QuandClic()
Range("A1") = Range("A1") + 1
End Sub

Le problème est que je souhaiterais que l’exécution de cette macro ne soit possible que lorsque j'ai cliqué sur le bouton Parcours au préalable...

Merci d'avance.

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 15 Novembre 2016

• #5

un truc dans ce genre ???

 

Pièces jointes

• fonctionement shape.xlsm

  22.2 KB · Affichages: 45

Vote positif 0 Vote négatif

V

Vashh50

XLDnaute Nouveau

• 15 Novembre 2016

• #6

C'est en effet très approchant de ce que je souhaite. J'aurais juste une question, est il possible de rendre in-cliquable les objets tant que la macro n'est pas lancé ?

Merci d'avance.

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 15 Novembre 2016

• #7

comme ceci ?
pour le calcul il faudra dire la longueur attribuée aux boutons

 

Pièces jointes

• fonctionement shape.xlsm

  22.9 KB · Affichages: 36

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 15 Novembre 2016

• #8

voilà avec une attribution de longueur

 

Pièces jointes

• fonctionement shape.xlsm

  25.5 KB · Affichages: 30

Vote positif 0 Vote négatif

V

Vashh50

XLDnaute Nouveau

• 15 Novembre 2016

• #9

C'est parfait merci.

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 15 Novembre 2016

• #10

Pour changer les valeurs il faut aller dans le VBE pour modifier le code
pas compliqué ;-))😉

 

Vote positif 0 Vote négatif