Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Microsoft 365 VBA Insertion ligne dans feuille protégée

Créer une discussion

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 !

S'inscrire
N

Nathan027

XLDnaute Junior
Bonjour à toutes et à tous

J'ai créer une fichier dans lequel j'ai un bouton "insertion ligne" .. Tout fonctionne.
Le soucis est que j'aimerai autoriser la modification de certaine plage uniquement par certaine personne, et pour cela la feuille doit être protégée.
C'est là qu'arrive mon problème, si je protège la feuille, je ne peux plus insérer de ligne.
HELP ME ..

je vous joint le fichier (il n'y a pas de mot de passe)

J'espère que vous pourrez m'aider et je vous en remercie d'avance
 

Pièces jointes

Solution
fanch55
Salut,
Il faut mettre l'option userinterfaceonly:=True à la protection de la feuille,
mais j'abonde dans la déclaration de @Phil69970 :
Phil69970 à dit:
Ne pas oublier que la protection de feuille avec MDP est très illusoire sur excel !!!!
Cliquez pour agrandir...

VB: 
Sub Bouton1_Cliquer()
Dim CurrentSheet As Object
    For Each CurrentSheet In ActiveWindow.SelectedSheets
        CurrentSheet.Protect userinterfaceonly:=True
        CurrentSheet.Range("B7:V7").EntireRow.Insert
        CurrentSheet.Range("D7") = Date
    Next CurrentSheet
End Sub
Trier par date Trier par votes
Bonjour @Nathan027

Remarques :
1)
Nathan027 à dit:
J'ai créer une fichier dans lequel j'ai un bouton "insertion ligne" .. Tout fonctionne.
Cliquez pour agrandir...
Il n’y a pas de bouton insertion ligne mais 3 boutons
==> 1 bouton "Ajouter une action" sur la feuille "Plan d'action"
==> 2 boutons "Ajout Zone" et "Ajout Nom" sur la feuille "Feuille de données

Par contre il y a bien 2 macros qui se nomment "InsertLigne" et "InsertLigne2"
2)
Nathan027 à dit:
J'ai créer une fichier dans lequel j'ai un bouton "insertion ligne" .. Tout fonctionne.
Cliquez pour agrandir...
Non cela fonctionne mal voir très mal et source de pleins de PB à venir...
Quand tu as des tableaux structurés il faut écrire le code pour les tableaux structurés

==> Voir le fichier rectifié sur ce point

3) Sur la feuille "Plan d'action" j'ai pas trop compris ce que tu cherches à faire donc je n'ai pas pas modifié le code mais même pb que le point 2)

4)
Nathan027 à dit:
j'aimerai autoriser la modification de certaine plage uniquement par certaine personne, et pour cela la feuille doit être protégée.
Cliquez pour agrandir...
Quelle partie de la feuille, il manque plein de précision ? (qui ,quoi, ou, quand etc.....)
Ne pas oublier que la protection de feuille avec MDP est très illusoire sur excel !!!!
 

Pièces jointes

Vote positif 0 Vote négatif
Salut,
Il faut mettre l'option userinterfaceonly:=True à la protection de la feuille,
mais j'abonde dans la déclaration de @Phil69970 :
Phil69970 à dit:
Ne pas oublier que la protection de feuille avec MDP est très illusoire sur excel !!!!
Cliquez pour agrandir...

VB: 
Sub Bouton1_Cliquer()
Dim CurrentSheet As Object
    For Each CurrentSheet In ActiveWindow.SelectedSheets
        CurrentSheet.Protect userinterfaceonly:=True
        CurrentSheet.Range("B7:V7").EntireRow.Insert
        CurrentSheet.Range("D7") = Date
    Next CurrentSheet
End Sub
 
Vote positif 0 Vote négatif
Solution
Phil69970 à dit:
Bonjour François
Un bémol à UserInterfaceOnly car sur un TS lors de l'ajout de ligne du TS cela ne fonctionne pas
Cliquez pour agrandir...
Salut Phil, il doit y avoir eu lieu à une correction depuis 2016 🤔
car cela semble fonctionner correctement sur les TS du classeur fourni ...
mais c'est vrai que perso, j'utilise ( quand pas le choix ) d'abord le unprotect avant de continuer une macro puis le protect pour la sortie
 
Vote positif 0 Vote négatif
Merci à vous deux pour votre aide précieuse. Cela fonctionne parfaitement.

Pour le commentaire sur la protection de feuille, je c pense que vous avez tout a fait raison mais pour mon utilisation c'est largement suffisant 🙂

Encore une fois merci.
 
Vote positif 0 Vote négatif
Re bonjour à vous.

Je vous resollicite … hier je vous disais que tout fonctionnait parfaitement, ce qui était vrai, à un détail prêt 😅
Quand je protège la feuille (sans indiquer de mot de passe) .. Nickel
Quand je protège la feuille (avec un mot de passe) .. Cela ne fonctionne pas 😨
Et honnêtement je ne comprend ce que ca change qu'il y ait un mot de passe ou passe … tant que la feuille est "protégée"

HELP ME PLEASE
 
Vote positif 0 Vote négatif
Salut,
Quand la feuille est protégée, avec ou sans mot de passe :
  1. on peut toujours insérer une ligne dans un TS
  2. on ne peut pas supprimer une ligne du TS
  3. on ne peut modifier une cellule que si elle n'est pas verrouillée .
C'est paradoxal, mais cela rejoint ce que faisait remarquer @Phil69970 , finalement, rien n'a changé depuis 2016.

Protéger une feuille est non seulement illusoire mais apporte plus de tracas/travail/codage à effectuer .
UserInterfaceOnly indique que tout peut être effectué via codage mais pas sur ce qui est présenté à l'utilisateur .
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

K
  • Question Question
XL 2019 Soucis utilisation segment sur feuille protégée
Réponses
2
Affichages
69
sylvanu
D
  • Question Question
Microsoft 365 macro showAllData et mot de passe
Réponses
13
Affichages
107
Daniel200666
D
S
  • Question Question
Microsoft 365 Protéger des cellules de la feuille en permettant d'agrandir les colonnes
Réponses
6
Affichages
89
Sissou71
S
P
  • Question Question
XL 2021 Ajout/adaptation de code VBA sur feuille qui en contient déjà
Réponses
3
Affichages
92
Pierreavecunp
P
P
  • Question Question
XL 2021 Tableau incrementé dans une feuille excel protégée!
Réponses
1
Affichages
232
fanfan38
A
  • Résolu(e)
Microsoft 365 programme VBA pour "importer" les valeurs de certaines cellules d'une autre feuille appartenant à une ligne que j'identifie par un n°
2
Réponses
27
Affichages
649
arnomorize
A
F
  • Résolu(e)
Microsoft 365 Retrouver un mot dans un autre onglet
2
Réponses
17
Affichages
156
Fitgy
F
G
  • Question Question
XL 2010 Déplacement de plusieurs zones de texte dans excel vba
2 3
Réponses
36
Affichages
342
sylvanu
D
  • Question Question
Microsoft 365 Filtrer sur une feuille protégée et avec code macro
Réponses
5
Affichages
506
dd_76
D
J
  • Résolu(e)
XL 2021 insertion d'image provenant d'unecellule dans un userform
2
Réponses
22
Affichages
269
vgendron
C
  • Question Question
XL 2019 Tri impossible sur feuille protégée
Réponses
10
Affichages
608
CathU
C
  • Question Question
XL 2021 Remplissage de plusieurs cellules dans une colonne
Réponses
5
Affichages
84
AtTheOne
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
175
Phil69970
A
  • Question Question
insertion d'une ligne automatique dans un tableau excel.
Réponses
1
Affichages
335
sylvanu
S
  • Question Question
Microsoft 365 Extraire dans une nouvelle feuille les cellules non vide d'une colonne
2
Réponses
15
Affichages
170
Gégé-45550
M
  • Résolu(e)
Microsoft 365 Chargement table vba dans onglet
Réponses
8
Affichages
115
Mongo
M
S
  • Question Question
XL 2021 Pause dans VBA
Réponses
2
Affichages
50
stefb1968
S
B
  • Question Question
XL 2021 Report de valeur sur une seule ligne
Réponses
3
Affichages
158
battijo
B
P
  • Question Question
XL 2016 Macro VBA remplissage tableau de synthèse % déchet ligne de production
Réponses
4
Affichages
80
vgendron
N
  • Résolu(e)
Microsoft 365 Insertion ligne avec demande dans une cellule
Réponses
5
Affichages
374
Nathan027
N
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…