Déverrouiller une cellule en vba
Résolu/Fermé
Anthelm
Messages postés
198
Date d'inscription
lundi 15 octobre 2018
Statut
Membre
Dernière intervention
2 mars 2024
-
10 déc. 2018 à 20:44
Anthelm Messages postés 198 Date d'inscription lundi 15 octobre 2018 Statut Membre Dernière intervention 2 mars 2024 - 10 déc. 2018 à 21:06
Anthelm Messages postés 198 Date d'inscription lundi 15 octobre 2018 Statut Membre Dernière intervention 2 mars 2024 - 10 déc. 2018 à 21:06
A voir également:
- Déverrouiller une cellule en vba
- Comment déverrouiller un téléphone - Guide
- Aller à la ligne dans une cellule excel - Guide
- Déverrouiller clavier - Guide
- Excel compter cellule couleur sans vba - Guide
- Verrouiller cellule excel - Guide
2 réponses
titeufdu89
Messages postés
375
Date d'inscription
samedi 28 juillet 2012
Statut
Membre
Dernière intervention
1 avril 2023
38
10 déc. 2018 à 21:04
10 déc. 2018 à 21:04
Bonjour Anthelm,
Deux choses
- avec la fonction "cells" on code l'adresse de la cellule en numérique du type (adresse de ligne, adresse de colonne) c'est a dire que pour selectionner B1 avec cells on code cells(1,2)
alors que si tu utilise range tu code : range("B1")
- La fonction "locked" détermine si une fois la feuille protégée la cellule en question sera protégée ou non.
Pour pouvoir modifier une cellule dans une macro qu'elle soit "locked = true" ou "locked = false" il suffit de déprotéger la feuille en début de procédure et reprotéger la feuille en fin de procédure.
Voici un exemple de code :
A tester
Jc
Deux choses
- avec la fonction "cells" on code l'adresse de la cellule en numérique du type (adresse de ligne, adresse de colonne) c'est a dire que pour selectionner B1 avec cells on code cells(1,2)
alors que si tu utilise range tu code : range("B1")
- La fonction "locked" détermine si une fois la feuille protégée la cellule en question sera protégée ou non.
Pour pouvoir modifier une cellule dans une macro qu'elle soit "locked = true" ou "locked = false" il suffit de déprotéger la feuille en début de procédure et reprotéger la feuille en fin de procédure.
Voici un exemple de code :
ActiveSheet.Unprotect
Range("G1") = Date
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
A tester
Jc
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 394
Modifié le 10 déc. 2018 à 20:57
Modifié le 10 déc. 2018 à 20:57
Bonsoir
essayez avec ces deux lignes dans votre macro:
Range("G1").Locked = False
Range("G1").Value = Date
bien que pour la 1° ligne, il ne semble pas utile de déverrouiller la cellule si la feuille n 'est pas protégée.
Et vous ne pourrez pas la déverrouiller sans enlever la protection
soit début de macro:
activesheet.unprotect
et fin
activesheet.protect
crdlmnt
essayez avec ces deux lignes dans votre macro:
Range("G1").Locked = False
Range("G1").Value = Date
bien que pour la 1° ligne, il ne semble pas utile de déverrouiller la cellule si la feuille n 'est pas protégée.
Et vous ne pourrez pas la déverrouiller sans enlever la protection
soit début de macro:
activesheet.unprotect
et fin
activesheet.protect
crdlmnt
Anthelm
Messages postés
198
Date d'inscription
lundi 15 octobre 2018
Statut
Membre
Dernière intervention
2 mars 2024
1
10 déc. 2018 à 21:06
10 déc. 2018 à 21:06
Salut Vaucluse! je suis parti sur ce que Titeuf mais merci beaucoup!
10 déc. 2018 à 21:06
- La fonction "locked" détermine si une fois la feuille protégée la cellule en question sera protégée ou non.
Oui, merci beaucoup! en 3 étapes, ducoup, mais ça marche très bien :)