Dessiner une signature avec la souris

simkmil Messages postés 481 Date d'inscription   Statut Membre Dernière intervention   -  
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   -
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.

<code basic>
</code>
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
A voir également:

9 réponses

The_boss_68 Messages postés 952 Date d'inscription   Statut Membre Dernière intervention   182
 
Bonjour,

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

Slts
0
simkmil Messages postés 481 Date d'inscription   Statut Membre Dernière intervention   35
 
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
0
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
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.
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour,
peux-tu donner suite, ou marquer comme résolu?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
simkmil Messages postés 481 Date d'inscription   Statut Membre Dernière intervention   35
 
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
0
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
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 :

0
simkmil
 
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.
0
simkmil Messages postés 481 Date d'inscription   Statut Membre Dernière intervention   35
 
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.
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584
 
le code que tu montres sert à insérer la signature, non?
quel rapport avec les OUI dans la colonne K?
0
Le Pingou Messages postés 12249 Date d'inscription   Statut Contributeur Dernière intervention   1 458
 
Bonjour,
Content pour vous, pour mieux vous aidez il serait profitable de connaitre la structure de votre fichier----!
Salutations.
Le Pingou
0
simkmil Messages postés 481 Date d'inscription   Statut Membre Dernière intervention   35
 
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
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584
 
il est peut-être préférable, alors, de marquer cette discussion comme résolue.
0