Ajouter fonction au menu contextuel d'Excel
Bonjour,
Je suis à la recherche d'une solution me permettant, sur Excel, d'avoir accès directement dans le menu contextuel à la fonction:
"Coller avec Liaison"
(je me sers constamment de cette fonction, et ça me fatigue d'aller à chaque fois, faire collage spécial / coller avec liaison)
Y'a t'il un moyen simple?
Ou bien faut il se servir d'une macro? / VBA?
Config au bureau: emac intel / excel 2004 for mac
Je suis à la recherche d'une solution me permettant, sur Excel, d'avoir accès directement dans le menu contextuel à la fonction:
"Coller avec Liaison"
(je me sers constamment de cette fonction, et ça me fatigue d'aller à chaque fois, faire collage spécial / coller avec liaison)
Y'a t'il un moyen simple?
Ou bien faut il se servir d'une macro? / VBA?
Config au bureau: emac intel / excel 2004 for mac
Configuration: PC packard bell (2004) Portable Dell VOSTRO 1710 ecran Led 17 pouces (2008)
12 réponses
Résumé de la discussion
La demande vise à ajouter directement la fonction 'Coller avec Liaison' dans le menu contextuel d'Excel pour éviter Collage spécial. Des propositions évoquent l'utilisation de macros VBA pour créer un élément de menu personnalisé, notamment en réinitialisant le menu 'Cell' et en ajoutant un bouton lié à une macro. D'autres pistes évoquent des raccourcis clavier ou des scripts pour copier-coller des valeurs, avec des échanges sur le débogage et l'exécution des macros dans Visual Basic. Certains éléments dépendent de la version d'Excel et de l'environnement (Mac ou PC) et influencent la faisabilité des méthodes proposées.
-
j'ai peu-etre une reponse si ca t'interresse toujours
-
Voici une petite macro que j'ai trouvé sur un forum et que j'ai adapté
Sub Macro1()
Selection.Interior.ColorIndex = 3
End Sub
Sub Creer_Menu_Contextuel_2()
'réinitialize la sourie comme à l'origine
Application.CommandBars("Cell").Reset
'Crée une commande dans le menu
With Application.CommandBars("Cell").Controls.Add(msoControlButton)
.Caption = "Cellule Rouge" 'le nom de la commande
.BeginGroup = True 'ligne facultative si elle est précisée alors
' il y a un nouveau pavé de créer
.OnAction = "Macro1" ' la macro 1 est lancé
End With
End Sub -
Personne pour m'aider???
HELP
Y'a pas un expert en excel ???
Please...SVP...ça me gagnerai un temps fou... -
Bonjour,
Oui biensur que je suis interressé !!!!
Comment fais tu ? -
Le problème avec les combinaisons de touches c'est qu'il faut lacher la souris... c'est plus long que de cliquer 3 fois ...et puis je ne suis pas très équilibriste...
l'index sur le ALT , le mageur sur e, le pouce sur g, le nez sur le l et l'orteil droit sur entrée...
merci quand même -
Si, Je suis exténué
PS: suis toujours en attente de la solution de notre ami philou...
philou si tu nous écoutes... sache que toute l'équipe est au garde a vous en attendant ta réponse... -
Il suffit ensuite de modifier la macro1 avec ce que vous avez besoin
vous pouvez sur le même principe ajouter plusieurs menus et des sous menus -
C'est très gentil Philou...mais c'est trop compliqué pour moi...désolé.
Je ne sais pas me servir des macros ???
c'est simple à mettre en oeuvre? -
c'est ou le module excel ? dans le menu macro?
par quel opération tu la lances? -
je suis pas doué...j'ai essayé, mais quand je fais executer...rien ne se passe...
c'est sensé faire quoi exactement??
(peut tu m'envoyer une capture d'écran de la page visual basic une fois le texte de la macro collé, avant de refermer la fenetre?)-> je me demande si j'ai pas écraser des trucs en le copiant...-
-
@philouEn tout cas je te remercie de t'intéresser à mon cas...pour te répondre: non, je n'ai jamais fait de macro, je n'ai jamais pris le temps de me former...ça doit être en effet un outils fascinant..et très utile.
Je vais essayer de me faire la main sur cet exemple et si ca marche je chercherai des cours sur le net, ou des tuto...
-
-
Non?? ça marche pas: je récapitule:
niveau de secu reglé sur moyen
j'ouvre une nouvelle macro
je stoppe l'enregistrement (par la barre de menu visual basic)
j'ouvre macro1 en pas a pas détaillé
je colle ta macro à la place de celle qui est dedans:
Sub Macro1()
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
Application.CutCopyMode = False
End Sub
ensuite je fais executer la macro
et là rien...
ni dans le menu contextuel du clic droit
ni en faisant un ctrl+V...ça colle pas en valeur uniquement...
HELP !!
(merci d'avance)
a+-
Bonjour Pelnaude, tu es bien matinale
Coller la macro 1 ne suffit pas
dans la facon que je t'intique, il ya a 2 macros à coller
la premiere ( Sub Creer_Menu_Contextuel() ) sert pour creer une ligne commande supplementaire dans le cli droit souris (le nom sera cellule rouge mais tu peux mettre autre chose) et cette ligne commande lance la macro1 (pareil tu peux changer le nom de la macro)
la seconde macro collée est la macro1 (c'est celle la qui travaille dans excel; tu peux changer le contenu par ce que tu veux (moi je lui fais faire un coper coller valeur)
et ensuite tu lance la macro Sub Creer_Menu_Contextuel()
en dessous, les 2 macros à coller en même temps
Sub Creer_Menu_Contextuel()
'réinitialize la sourie comme à l'origine
Application.CommandBars("Cell").Reset
'Crée une commande dans le menu
With Application.CommandBars("Cell").Controls.Add(msoControlButton)
.Caption = "Cellule Rouge" 'le nom de la commande
.BeginGroup = True 'ligne facultative si elle est précisée alors
' il y a un nouveau pavé de créer
.OnAction = "Macro1" ' la macro 1 est lancé
End With
End Sub
Sub Macro1()
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone
Application.CutCopyMode = False
End Sub -
-
-
-
-
-
j'avais essayé comme ca hier ...mais ca marchait pas je crois... mais comme je suis a la maison...j'ai toujours un bébé qui vient me pertuber ...
j'essayerai demain au boulot
merci beaucoup philou
je vais bien finir par y arriver...
a+
Eric
(Monpellier- ici grand soleil je te reponds du jardin)
