lennynero256
XLDnaute Junior
Bonjour,
je souhaite modifier une macro que voici :
Cette macro permet l'export de données (liaisons entre des classeurs sources vers un classeur de destination synthétisant les données).
En fait je souhaite pouvoir déprotéger/reprotéger la feuille "synthese_annuelle" classeur de destination pour permettre l'exécution de la macro. Il est important que l'utilisateur puisse utiliser les filtres automatiques.
J'ai donc utilisé la méthode .Protect de la même manière que dans la macro ci-dessus (pour protéger et déprotéger la feuille "export" du classeur source). J'ai essayé plusieurs combinaisons avec des arguments différents mais n'étant pas un pro de la macro, je pense que la syntaxe que j'ai essayée n'était pas la bonne. Je vous fait grâce du copier/coller de mes tentatives, j'aimerais juste un coup de main pour modifier proprement ma macro.
Je vous remercie par avance, cordialement,
Lenny
je souhaite modifier une macro que voici :
Code:
Sub EXPORT_STATS()
Mdp = Application.InputBox("Mot de passe requis", "Entrer le mot de passe")
If Mdp <> "Toto" Then
MsgBox "Mdp incorrect", vbCritical
Exit Sub
End If
ThisWorkbook.Sheets("export").Unprotect "pass"
ThisWorkbook.Sheets("export").Range("A3:AN3").Copy
With Workbooks("stats_2013.xls").Sheets("SYNTHESE_ANNUELLE")
.Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial
.Paste Link:=True
End With
Application.CutCopyMode = False
ThisWorkbook.Sheets("export").Protect "pass", True, True, True
Workbooks("stats_2013.xls").Save
End Sub
Cette macro permet l'export de données (liaisons entre des classeurs sources vers un classeur de destination synthétisant les données).
En fait je souhaite pouvoir déprotéger/reprotéger la feuille "synthese_annuelle" classeur de destination pour permettre l'exécution de la macro. Il est important que l'utilisateur puisse utiliser les filtres automatiques.
J'ai donc utilisé la méthode .Protect de la même manière que dans la macro ci-dessus (pour protéger et déprotéger la feuille "export" du classeur source). J'ai essayé plusieurs combinaisons avec des arguments différents mais n'étant pas un pro de la macro, je pense que la syntaxe que j'ai essayée n'était pas la bonne. Je vous fait grâce du copier/coller de mes tentatives, j'aimerais juste un coup de main pour modifier proprement ma macro.
Je vous remercie par avance, cordialement,
Lenny