Discussion :

[decarre]

bonjour a tous,

mon probleme est le suivant, je souhaite incorporer dans le menu contextuel des cellules une ligne qui soit un raccourci du coller special/tous sauf les bordure.

dans un premier temps, losque j'enregistre la macro (pour connaitre les code a utiliser), la cellule cible est figée. or je n'arrive pas a coder pour que la macro colle dans la cellule selectionner au préalable (n'importe la quelle).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Sub collspecial()
 
    Range("K11").Select
    Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
End Sub

C'est la cellule K11 que je ne sais pas remplacer pour quelque chose de général...

dans un second temps il faudra que je l'incorpore dans le code du menu contextuel que j'ai deja fais (deja rajouter deux raccourci BONNEVILLE et annemasse qui fonctionne tres bien).

dans un troisieme et dernier temps, je voudrais passer BONNEVILLE, ANNEMASSE et COPIER SPECIAL touut en haut du menu contextuel

ci joint un fichier avec les deux premieres ligne validé.

merci par avance pour le coup de pouce.

[Godzestla]

si on suppose que ta sélection est faites avant ,

je te suggère de supprimer simplement la ligne avec "K11",

ce qui donne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sub collspecial()
 
    Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False
End Sub

[decarre]

je ne comprend pas, je pars manger avec le menu contextuel qui marche et paf je reviens, message d'erreur... comprend pas...

'coller%20sp%C3%A9cial[1].xls' introuvable. verifiez l'orthographe du nom du classeur et la validité de l'emplacement.
si vous essayer d'ouvrir le fichier à partir de la lliste des fichiers les plus recents, assuurez vous que le fichier n'a pas été renommé, déplacé ou supprimé

pourtant rien changer entre temps...
et le menu contexuel marche sur tous les classeurs excel... chose que je ne veux pas... je ne comprend pas...

quelqu'un pour m'expliquer s'il vous plait...

[Godzestla]

Quelle est la dernière chose que tu as changé, juste avant de partit manger ?

(tu as des ennemis autour de toi ?)