Macro avec mot de passe

porcinet82

XLDnaute Barbatruc

• 9 Février 2006

• #2

Salut KKO,

Je ne pense pouvoir t'aider pour ta question, cependant sans le fichier joint, je ne suis pas sur que beacoup de monde le puisse.

Un petit tout Lien supprimé devrait te renseigner sur la manière de joindre un fichier.

@+

 

Vote positif 0 Vote négatif

K

KKO

XLDnaute Nouveau

• 9 Février 2006

• #3

Sorry et milles excuses :

voici le fichier


KKO

 

Vote positif 0 Vote négatif

Jacques87

XLDnaute Accro

• 9 Février 2006

• #4

Bonjour KKO, Bonjour Porcinet

KKO, voici un exemple qui devrait te convenir (le mot de passe est 'toto')

Alors Porcinet, tu fatigues ... une petite Duvel comme dirait André et c'est reparti.

Bonne journée [file name=mdp_20060209140552.zip size=8297]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/mdp_20060209140552.zip[/file]

 

Vote positif 0 Vote négatif

K

KKO

XLDnaute Nouveau

• 9 Février 2006

• #5

Bon j'espere que c'est la bonne ?

KKO [file name=signaturecouleur.zip size=12568]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/signaturecouleur.zip[/file]

 

Pièces jointes

• signaturecouleur.zip

  12.3 KB · Affichages: 12

Vote positif 0 Vote négatif

M

Marc_du_78

XLDnaute Accro

• 9 Février 2006

• #6

Bonjour à tous,

Puisque j'avais préparé, je le donne. En espérant ne pas avoir fait de bétidse car je ne suis pas un pro.

Private Sub CommandButton13_Click() 'quitter
Sheets('Bonjour').Protect Password:='Au-Revoir'
aaa.Hide
End Sub

 

Vote positif 0 Vote négatif

A

Abel

XLDnaute Accro

• 9 Février 2006

• #7

Bonjour le fil,

En espérant metttre tout le monde d'accord .... hi hi !

Code:

Private Sub CommandButton1_Click()
'pour protéger le classeur
ActiveWorkbook.Protect Password:=InputBox('Mot de passe')
'pour protéger une feuille
Sheets('Feuil2').Protect Password:=InputBox('Mot de passe')
'pour protéger la feuille active
ActiveSheet.Protect Password:=InputBox('Mot de passe')
End Sub

Abel.

Message édité par: Abel, à: 09/02/2006 15:05

 

Vote positif 0 Vote négatif

K

KKO

Guest

• 10 Février 2006

• #8

Je vous remercie pour votre participation mais helas rien ne correspond au fichier que je vous ai joint.

Merci

KKO

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 10 Février 2006

• #9

Bonjour a tous,

KKO, avec tous les indices qui t'on été proposé, tu paurait pu essyer de faire un petit truc quand meme

Enfin, comme j'avais un peu de temps je te propose un petit truc dont le code principal vient de la proposition de mon ami Jacques.

Il n'y a qu'une seule chose que je n'ai pas comprise, qu'entends tu par

en copiant la couleur correspondante (bleu)

Cliquez pour agrandir...

[file name=KKO.zip size=11561]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KKO.zip[/file]

Tiens nous au courant.

@+

 

Pièces jointes

• KKO.zip

  11.3 KB · Affichages: 20

Vote positif 0 Vote négatif

K

KKO

Guest

• 10 Février 2006

• #10

Merci Porcinet82,

si je suis aussi faignant c'est que je débute tout juste avec excel...tout me parrait difficulté !

Pour répondre à ta question sur les couleurs :

La personne A se saisie dans la boite de dialogue, ensuite il clique le bouton signature, la boite dialogue mot de passe apparait, il saisie son mot de passe. Si le mot de passe est valide, la macro continue en copiant la couleur qui lui correspond pour la coller dans cellule signature. Voici mon intention...dans cette exemple, je souhaite dans l'avenir scanner des signatures et les faire réagir dans la cellulle fusionnée 'signature'.
Ma difficulté est de combiner la boite de dialogue 'mot de passe' si celui est oK, enchainer sur le copier coller de la couleur qui convient à l'utilisateur.

Je te remercie encore et espere avoir était encore plus précis sur l'explication.

Merci @ tous

KKO

 

Vote positif 0 Vote négatif

porcinet82

XLDnaute Barbatruc

• 10 Février 2006

• #11

re,

Je n'ai pas dis que tu etais faignant, je voulais juste te charier un peux, je suis assez taquin .

Regarde le fichier, mais je ne suis pas sur que ce soit ce que désires, en fait, j'ai remplacer tes images car je n'ai toujours pas saisie ce que tu voulais faire, mais peut etre qu'avec le code tu pourras y arriver tout seul.

[file name=KKO_v2.zip size=10209]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/KKO_v2.zip[/file]

Sinon n'hesite pas a refaire signe.

@+

 

Pièces jointes

• KKO_v2.zip

  10 KB · Affichages: 19

Vote positif 0 Vote négatif