OVH Cloud OVH Cloud

deproteger

2 réponses
Avatar
Yann
Salut la Foule,

Suite a un formatage unpromptu j'ai perdu mon classeur de macros perso
:o((( et bien sur, je n'avez pas fait de sauvegarde :o((((((
Donc j'en appel a vos service encore une fois.

Il me faudrait une formule pour deprotege un fichier qui contient une ou
plusieur feuilles avec une inputbox qui me demande le mot de passe pour ce
fichier.

Merci

Yann

2 réponses

Avatar
isabelle
bonjour Yann,

pass = "zaza"
mot = InputBox("Entrer le mot de passe")
If mot = pass Then
ActiveWorkbook.Unprotect Password:=mot
End If

isabelle


Salut la Foule,

Suite a un formatage unpromptu j'ai perdu mon classeur de macros perso
:o((( et bien sur, je n'avez pas fait de sauvegarde :o((((((
Donc j'en appel a vos service encore une fois.

Il me faudrait une formule pour deprotege un fichier qui contient une ou
plusieur feuilles avec une inputbox qui me demande le mot de passe pour ce
fichier.

Merci

Yann


Avatar
Yann
Merci Isabelle,
Ce n'est pas tout as fait ce que je voulais, mais en cherchant j'ai trouve
une autre partie qui en combinant avec la tienne vas tres bien.

Merci encore

"isabelle" wrote in message
news:
bonjour Yann,

pass = "zaza"
mot = InputBox("Entrer le mot de passe")
If mot = pass Then
ActiveWorkbook.Unprotect Password:=mot
End If

isabelle


Salut la Foule,

Suite a un formatage unpromptu j'ai perdu mon classeur de macros perso
:o((( et bien sur, je n'avez pas fait de sauvegarde :o((((((
Donc j'en appel a vos service encore une fois.

Il me faudrait une formule pour deprotege un fichier qui contient une ou
plusieur feuilles avec une inputbox qui me demande le mot de passe pour
ce
fichier.

Merci

Yann