Protection d'une feuille Excel VBA
Résolu
LANGAZOU
Messages postés
100
Statut
Membre
-
LANGAZOU Messages postés 100 Statut Membre -
LANGAZOU Messages postés 100 Statut Membre -
Bonjour,
j'ai crée un userform lié d'une feuille Excel que je voudrais la protéger avec un mot de passe. je veux qu'au début de mon code il ôte la protection avec le mot de passe inséré dans le code sans me le demander de l'insérer et à la fin du code il déverrouille la feuille de nouveau. voici mon code :
Merci pour votre réponse
j'ai crée un userform lié d'une feuille Excel que je voudrais la protéger avec un mot de passe. je veux qu'au début de mon code il ôte la protection avec le mot de passe inséré dans le code sans me le demander de l'insérer et à la fin du code il déverrouille la feuille de nouveau. voici mon code :
Private Sub CommandButton2_Click()
If TextBox3 <> "" And TextBox7 <> "" And TextBox11 <> "" And ComboBox1 <> "" And ComboBox2 <> "" Then
Cells(3, 2) = ComboBox1.Value
Cells(3, 3) = TextBox3.Value
Cells(3, 4) = ComboBox2.Value
Cells(3, 5) = TextBox7.Value
Cells(3, 6) = TextBox11.Value
End If
Unload UserForm1
End If
End Sub
Merci pour votre réponse
A voir également:
- Protection d'une feuille Excel VBA
- Liste déroulante excel - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Déplacer une colonne excel - Guide
- Word et excel gratuit - Guide
- Imprimer feuille excel sur une page - Guide
1 réponse
Salut le Forum
A adapter à ton code :
Mytå
Merci de donner suite à votre question, nous ne sommes pas des robots...
« Si le déboguage est l'art d'enlever les bogues, alors la programmation doit être l'art de les créer. »
A adapter à ton code :
Sheets("Nom de la feuille").Unprotect Password:="Mot de passe"
Sheets("Nom de la feuille").Protect Password:="Mot de passe"
Mytå
Merci de donner suite à votre question, nous ne sommes pas des robots...
« Si le déboguage est l'art d'enlever les bogues, alors la programmation doit être l'art de les créer. »
LANGAZOU
Messages postés
100
Statut
Membre
Merci beaucoup pour votre réponse.