Clic droit forme automatique

BERRACHED said

XLDnaute Accro

• 27 Août 2008

• #2

Re : Clic droit forme automatique

Salut;sososo82

touts ce qui apparaisse sur l'ecran d'un Pc meme protéger du click droit est copiable que ce soit image ou forme automatique

Cordialement

 

Vote positif 0 Vote négatif

BERRACHED said

XLDnaute Accro

• 27 Août 2008

• #3

Re : Clic droit forme automatique

ré,

je m'excuse ta quéstion etait de protéger est non pas copier donc voila un bout de code pour cela :

Code:

Worksheets(""Feuil1"").Shapes(""Nom de l'objet"").Locked = True

Cordialement

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 27 Août 2008

• #4

Re : Clic droit forme automatique

Bonsoir sososo, re Said

petite précision, pour que le blocage soit actif, il faut que la feuille soit protégée.

bonne soirée.
@+

 

Vote positif 0 Vote négatif

BERRACHED said

XLDnaute Accro

• 27 Août 2008

• #5

Re : Clic droit forme automatique

Salut,Pierrot93

Merci de la précision elle est de taille sinon sans ça elle marchera pas

Cordialement

 

Vote positif 0 Vote négatif

S

sososo82

XLDnaute Occasionnel

• 28 Août 2008

• #6

Re : Clic droit forme automatique

Salut!

Tout d'abord merci à vous deux d'avoir répondu.

Oui ça marche nikel: il suffit juste de protéger la feuille et terminé le clic droit sur les formes automatiques!

En revanche je n'ai pas eu besoin de rentrer le code de SaÏd pour que ça fonctionne.

Par contre problème:

j'avais un code qui me permettait sur ma feuille principale de masquer grace à un bouton (forme auto) toutes les autres feuilles du classeur, ce bouton ne marche plus car il y a une erreur avec cette ligne :
ActiveSheet.Shapes("BnAfficher").Select

C'est donc du à la protection de la feuille

N'y a t'il pas moyen de faire fonctionner les deux ensemble? (masquer les autres feuilles et protéger la principale)

PS: l'erreur dit "la méthode select de l'objet shapes a échoué"

 

Dernière édition: 28 Août 2008

Vote positif 0 Vote négatif

jeanpierre

Nous a quitté

Repose en paix

• 28 Août 2008

• #7

Re : Clic droit forme automatique

Bonjour sososo82, Said, Pierrot et le forum,

Au début de ton code, après le Sub, tu mets : ActiveSheet.Unprotect ("ton mot de passe s'il y en a un")

et à la fin, avant le End : ActiveSheet.protect ("ton mot de passe s'il y en a un")

Normalement, ce doit être bon.

Bonne journée.

Jean-Pierre

 

Vote positif 0 Vote négatif

S

sososo82

XLDnaute Occasionnel

• 28 Août 2008

• #8

Re : Clic droit forme automatique

Bonjour JP,


Wouaw.... ça marche impec! Je peux ainsi masquer et protéger... Franchement merci beaucoup jeanpierre tu m'enlève une épine du pied et rapidement en plus....

Bonne journée à tout le monde et à bientôt!

 

Vote positif 0 Vote négatif