Liste déroulante avec saisie semi-automatique pour Excel Fermé

Question

Bonjour,

J'ai tenté de créer une liste déroulante avec saisie semi-automatique en suivant les instructions de votre tuto liste-deroulante-avec-saisie-semi-automatique-pour-excel.pdf
Tout fonctionne à merveille jusqu'à ce que je protège la feuille (pas le choix, d'autres données doivent rester inaccessibles). Il faut procéder en 3 fois, d'abord saisir les 1ers caractères, puis sortir de la cellule et enfin cliquer sur la liste déroulante. Pouvez vous m'en donner l'explication et ... la solution?

Cordialement
Tjalk

Mike-31 · Answer

Bonjour,

Il est normal que ça plante si tu travaille sur une feuille protégée, avant de protéger ta feuille il faut clic droit sur la cellule contenant la liste de validation et Format de cellule/Protection/décocher Verrouillée et ensuite protéger ta feuille

Mike-31 · Answer

Re,

lorsque tu protèges ta feuille, dans les options de protection, coche Modifier les objets 
 
	https://www.cjoint.com/?DJgmp2PBE8Z

tjalk · Answer

Re Mike,

Cool ça fonctionne, mais malheureusement dans cette feuille y a d'autres objets que j'aurais voulu protéger...

Merci
A+
Tjalk

Mike-31 · Answer

Re,

tu en demandes peut être un peu trop, il faudrait voir le fichier pour voir s'il est possible de contourner la rigidité d'Excel

tjalk · Answer

Re,

Une solution consisterait à interdire le clic droit dans la feuille.

A+
Tjalk

Mike-31 · Answer

Re,

Oui mais il y a le risque de déstabiliser Excel

tjalk · Answer

Re,

On peut tenter, quel serait le code entre

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

End Sub

qui neutraliserait le clic droit?

Je n'ai pas suffisamment de connaissances en VBA...

A+
Tjalk

Mike-31 · Answer

Re, 

clic droit sur la feuille concernée/visualiser le code

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub

tjalk · Answer

Re,

Le clic droit est bien neutralisé sur les cellules mais pas sur les objets que je peux modifier et déplacer.

A+
Tjalk

Mike-31 · Answer

Re, 

je ne me souviens pas, il existe un petit utilitaire que je n'ai jamais testé, il ne faudrait pas comme je te l'ai déjà dit déstabiliser le système, parce qu'il va falloir agir sur le registre et la on aurai tout gagné.

Pour ma part je ne souhaite pas aller plus loin dans les manips hasardeuses

tjalk · Answer

Re,

Je te remercie, tu m'as fait bien avancé dans mon appli, je galère depuis 15j sur ce Pb.

Si jamais tu avais une idée pour neutraliser ce clic droit sur un objet "Image" ou "AutoShape", je suis preneur.

A+
Tjalk

Mike-31 · Answer

Re,

Ok je regarde s'il est possible de faire quelque chose sans risque

tjalk · Answer

Salut Mike,

J'ai réglé mon Pb en remplaçant les Images (avec macro affectée) par des ActiveX CommandButton pour lesquels le clic droit est sans effet.

Je souhaite également neutraliser les Ctrl +X, C, V, j'ai fait ce qui suit:

Sub pCtrlX()
    MsgBox "Action non souhaitée"
End Sub

avec touche de raccourci "x"

As-tu mieux à me proposer?

A+
Tjalk

Mike-31 · Answer

Re,

Non mais parce qu'à force on va déstabiliser le système et ne voudrais pas être à l'origine

tjalk · Answer

Re,

Pour info, vu sur autre forum

Private Sub Worksheet_Activate()
    Application.CutCopyMode = False
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.CutCopyMode = False
End Sub

Et encore merci.

A+
Tjalk

Liste déroulante avec saisie semi-automatique pour Excel

15 réponses

Discussions similaires