Autoriser Redim lignes sur feuille protégée en VBA

  • Initiateur de la discussion Initiateur de la discussion a3lain
  • 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 !

a3lain

XLDnaute Junior
Bonjour,
Je voudrais savoir si il est possible d'autoriser un utilisateur à redimensionner uniquement lignes et/ou colonnes dans une feuille que l'on a protégé en VBA et où il n'a donc accès qu'à certaines zones de saisies?

Merci
 
jeromegmc écrit:
Salut,


Lorsque tu protèges ta feuille, coche les cases 'format de lignes' et 'format de colonnes', et normalement c'est bon.


A+

Re-Bjr,

Est ce qu'il y a une commande/parametre en VBA pour completer ceci

Sub Protect_sheet(sht As String)
' Protect_sheet Macro
'
' protection de la feuille active
If Worksheets(sht).ProtectContents = True Then
Sheets(sht).Protect Password:=pass, UserInterfaceOnly:=True
Else:
If sht = shpa Then
MsgBox 'sheet ' & sht & ' is unprotected, think to reprotect after updates'
End If
End If
End Sub
 
jeromegmc écrit:
Resalut,


Essayes ça:

Code:
 ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowFormattingColumns:=True, AllowFormattingRows:=True


Ca marche?


A+

Salut Jerome,
eh oui, cela a l'air de marcher, mais il faut que je fasse des tests plus poussés pour en faire une nouvelle version.
Par contre, quelle est l'utilité de 'DrawingObjects:=True, Contents:=True, Scenarios:=True '
Est ce que 'AllowFormattingColumns:=True, AllowFormattingRows:=True' n'aurait pas suffit?

Merci de ton aide.
 
Salut,

En faite je t'ai donnée la ligne de code complète pour protéger la feuille avec les options par défauts.

Pour la taille de police, il faut laisser libre le format de cellule.

Je n'ai pas accès à excel actuellement, donc je te donnes le code plus tard.

A+
 
Re : Autoriser Redim lignes sur feuille protégée en VBA

Bonjour,

Moi je veux autoriser l'utilisateur à insérer des liens hypertextes sur une feuille protégée et j'ai excel 2000 ...
Est ce possible ?

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowInsertingHyperlinks:=True

me génère une erreur (1004, application ou objet) à cause de AllowInsertingHyperlinks:=True
 
- 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

Discussions similaires

Retour