Discussion :

[atchoume50]

Bonjour à Tous

Dans le cadre de mon travail, j'utilise un fichier qui a des nombreuses colonnes protégées.
Comme dit dans le titre, je souhaiterais pouvoir insérer des lignes entières copiées malgré la protection.

Les 2 problèmes majeures sont que le nombre de lignes à insérer est variable suivant la sélection de l'utilisateur et que l'emplacement de l'insertion est lui aussi défini par l'utilisateur.

Existe-t-il une solution avec une macro ou autre? Si oui, est ce que cette macro peut remplacer la macro "Insérer les cellules copiées" de base dans Excel; tous cela pour éviter que les utilisateurs soit perturber.

En espérant avoir été clair

D'avance merci

[jfontaine]

Bonjour,

Le plus simple serait de cocher la case qui autorise l'insertion de ligne dans le menu protéger la feuille

[atchoume50]

Malheuresement cela ne suffit pas.
Effectivement Excel insérer bien les lignes mais les supprime après car je suis en lecture seule (Protection).

Je pense que l'utilisateur doit choisir sa sélection d'abord, et après c'est la macro qui doit faire le reste en lui demandant où on veut l'insérer.

[jfontaine]

Si tu es en lecture seule aucune modification du fichier ne sera enregistrés même effectuée avec du VBA.

[atchoume50]

J'ai vu ce code sur un autre forum qui à priori permet l'utilisation des macros même si la feuille est protégée.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Workbook_open()
For Each sh In Sheets
  sh.Protect "toto", userinterfaceonly:=True
Next
End Sub

Mais après plusieurs essai, le test ne fut pas concluant.

Est ce que je l'utilise mal ou il est prévu pour un autre usage?

[jfontaine]

La protection d'une feuille n'a rien à voir avec l'ouverture d'un classeur en lecture seule

La lecture seule est utilisés quand on veut ouvrir un classeur sans pour autant empêcher les autres utilisateurs de saisir dedans

La protection de feuille sert à "driver" l'utilisateur dans sa saisie afin qu'il n'efface pas certaines cellules (contenant des formules)

[pilou1944]

Bonjour,
je ne suis pas un expert en informatique mais j'ai trouvé, sur le net, une solution à ton problème, en tout cas pour moi ça fonctionne très bien.
Pour pouvoir copier et dupliquer une ou plusieurs cellules lorsque la feuille est protégée, il faut une commande qui supprime la protection, en début de macro et une autre qui remet la protection en fin de macro.
Le code est celui-ci.
Tu devras remplacer le texte (lemotdepasse) par ton propre mot de passe et le tour sera joué.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub MacroavecfeuilleProtect()*
 
ActiveSheet.Unprotect "lemotdepasse"*
 
'Place ici tes instructions*
 
ActiveSheet.Protect "lemotdepasse", True, True, True

Cordialement.
Pilou.
Ce qui est difficile à faire, c'est ce que l'on ne sait pas faire. Tout le reste est facile.