Dessiner une signature avec la souris Fermé

Question

Bonsoir, afin d'intégrer une signature dans une cellule à l'aide de la souris, j'avais trouvé ce code. il a fonctionné et maintenant ne fonctionne plus ! Pourriez vous me dire où j'ai fait une bêtise ? Merci de votre aide. Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("A1")) Is Nothing Then CommandBars("Drawing").Controls(3).Controls("&Lignes").Controls(6).Execute End If End Sub

The_boss_68 · Answer

Bonjour,

Ton code je l'ai testé et il est toujours fonctionnel chez moi

Slts

simkmil · Answer

Merci de ton aide, mais moi ça ne fonctionne plus. J'ai donc essayé d'effacer et recommencer.
mais je ne sais plus où mettre le code ?
vu qu'il s'agit de Private Sub Worksheet, jen ne sais pas si je dois le mettre dans un module ou ailleurs ?
c'est certainement de là que vient mon erreur, car je n'ai absolument aucune réaction lorsque je clique sur le bouton.
Merci de ton aide

Le Pingou · Answer

Bonjour,
Juste au passage, selon votre code il s'agit du module de votre feuille (Feuil1, Feuil2 ....),  donc le mettre sur le module de la feuille correspondante.

yg_be · Answer

bonjour,
peux-tu donner suite, ou marquer comme résolu?

simkmil · Answer

Merci Le Pingou, excellente remarque ! j'ai pour ce projet 15 modules; celui pour le dessin de la signature est le module n° 13 où dois je le mettre ?

Merci

Le Pingou · Answer

Bonjour, 
J'ai mentionné le module de la feuille correspondante.
Ce qui est différent de 13 modules que vous citez-
Exemple la signature vient sur la feuille "Horaires" qui correspond à "Feuil2" alors :

simkmil · Answer

Je pense comprendre ...
Donc, je ne met pas le code dans un module, mais bien en cliquant sur la feuille en question.
Je vais essayer cela
Merci de votre aide.

simkmil · Answer

SUPER !!
ça fonctionne extra.
Je viens d'essayer cela dans un nouveau dossier et c'est exactement ce que voulais.
Seul petit problème : comment faire en sorte que cela fonctionne automatiquement ? sans devoir executer le code ou installer un bouton ?
Je voudrais qu'à chaque inscription d'un OUI dans la colonne K la procédure se déclenche automatiquement.
Autre petite chose moins importante : si je supprime le OUI d'une ligne, celle ci ne redevient pas blanche.

Encore une fois, merci de votre aide.

simkmil · Answer

Oui, ça y est je me suis planté !
confusion entre mes modules ...
D'un coté, j'ai le module pour insérer une signature à l'aide de la souris ,
de l'autre j'ai le module pour mettre le fond en jaune sur une ligne dont la colonne K contient "OUI"
je revois ce que j'ai confondu et je reviens après m'être un peu reposé ... donc ce sera demain.

Merci et excuses pour cette confusion

Dessiner une signature avec la souris

9 réponses

Discussions similaires