click droit ---> menu personalisé

[wilfried_42]

bonjour à tous

je désirerai gerer un menu popup personalisé pour éviter un userform avec que des boutons

merci à tous

 

[Hervé]

Re : click droit ---> menu personalisé

bonjour stéphanois

en pièce jointe un exemple pour remplacer le menu click droit.

salut

 

[RICO1972]

Re : click droit ---> menu personalisé

Salut,
pas trop compris ce que tu cherches exactement mais tu peux te créer une barre outils personnalisé où tu mets le nbre de boutons souhaités ....
RICO

pS : Salut hervé ... pas rafraichi .. arf il te manque le fichier

 

[wilfried_42]

Re : click droit ---> menu personalisé

Bonjour Hervé, rico1972

Hervé, c'est exactement ce que je cherchais je vais voir pour l'adapter à mon programme, encore merci pour votre aide

a bientot

 

[wilfried_42]

Re : click droit ---> menu personalisé

re-bonjour

Herve, j'ai repris ce que tu m'as donné, je dois faire surement des betises

voici mon code

If Range("C" & CStr(lig)).Font.Bold = True Then
Range("C" & CStr(lig)).Font.Bold = False
Range("$A$28").Value = Range("$A$28").Value - 1
Else
Range("C" & CStr(lig)).Font.Bold = True
Range("$E$27").Value = Range("$E$27").Value + 1
Range("$A$28").Value = Range("$A$28").Value + 1
End If

j'ai remplacé range("") par selection comme dans ton exemple,
j'ai utilisé ton ordre directement
j'ai utilisé activecell

il me met à chaque fois le message :

Impossible de défini la propriété Bold de la classe Font

merci encore de votre aide

 

[Hervé]

Re : click droit ---> menu personalisé

re


je vois pas ce qui pourrait provoquer ce message d'erreur.

pourrais tu nous faire un petiti fichier exemple nous montrant le bug ?

salut

 

[wilfried_42]

Re : click droit ---> menu personalisé

re salut

c'est assez difficile d'envoyer un bout de fichier, il fait en ce moment environ 20 megas.
je te remercie de tous tes renseignements, j'ai fait autrement, un pointeur dans une colonne et une mise en forme conditionnelle

merci encore

 

[allegro50]

Re : click droit ---> menu personalisé

Bonsoir le Fil

Suis pas Stephanois..
Dis moi -stp-Herve ou trouve-t-on les codes des icones que tu as mis ds ton exemple ?

id = Array(114, 401, 113, 115, 501) 'icone

 

[Hervé]

Re : click droit ---> menu personalisé

salut allegro

j'utilise une xla que l'on peut trouver à cette addresse :

OfficeOne: FaceId Explorer

voilà

salut

 

[allegro50]

Re : click droit ---> menu personalisé

Merci Herve