• Initiateur de la discussion Initiateur de la discussion justine
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

J

justine

Guest
bonsoir a tout le forum
je termine de faire une application en vba et je voudrais proteger certaines feuilles.
pour cela j'ai deverrouiller mes cellules dans lesquelles les utilisateurs peuvent rentrer des donnees .
maintenant, je souhaiteraais proteger mes feuilles en activant la macro en OPEN
mais je ne sais plus la tournure de la macro, c'est du genre:
sheets('feuil1').enableselection=xlunlockedcells mais il me beuggue.
si une personne pouvait me dire ou est mon erreur.
merci beaucoup
justine
 
Bonsoir,

L'instruction dont tu parles fait référence aux cellules mais pas à la feuille.

Pour protéger une feuille place ceci dans ta macro :
Code:
Sheets('Feuil1').Protect
Ici aucun mot de passe n'est placé.

Dois tu aussi débloquer les cellules. Là je ne vois pas l'intéret cau tu peux le faire avant par menu / format / cellule et décocher la cas 'verrouillée' pour toutes les cellules qui doivent retster accessibles pour l'utilisateur.

Si pb n'héiste pas.

😉
 
Bonsoir,

Si tu veux le faire par macro à l'ouverture du classeur, tu fais une macro nommée Aut😵pen comme celle qui suis.


Sub Auto_open()

Range('A1:B6').Select ' tu selectionnes les cellule où tu veux écrire

Selection.Locked = False ' tu les dévérouilles
' la ligne du dessous protége toutes les autres cellules


ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
Range('A1').Select
End Sub


Bon test.
Amicalement.

JYLL
 
Bonjour,

Non Jyll, jamais dans une macro Auto_open. Ce type de macro devrait être supprimée par Bill et devenir obsolète dans Excel. Cela était valable dans Excel 97. Les nouvelles version d'Excel permettent de mieux faire. Donc à éviter

Il faut utiliser une macro de Private sub workbook_open et la placer en VBA dans Thisworkbook.

A bientôt

😉
 
bonjour justine

sheets('feuil1').EnableSelection=xlUnlockedCells
dans thisworkbook
laisse uniquement le celulles deverouilleés accessible
par l utilisateur!

sinon toutes les celulles sont ''clicablent'
a plus bonne journée
E et F
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
2
Affichages
643
O
  • Question Question
Réponses
4
Affichages
1 K
oceanepla
O
C
Réponses
24
Affichages
3 K
Charles Sion
C
B
Réponses
4
Affichages
3 K
BAUVINEAU Muriel
B
A
Réponses
4
Affichages
2 K
alkazaar
A
S
Réponses
9
Affichages
4 K
Sylvie_076
S
Retour