Discussion :

[blobnet]

Par macro, je crée un document sous un autre répertoire.
Je souhaites protéger les feilles de ce nouveau fichier contre la modification avec un mot de passe (qui peut être visible en dur dans la macro).
Comment peut-on faire ça par macro?

[dadavyvy]

Bonjour,

tu peux essayer quelque chose dans le genre :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
Sub creation_classeur()
    Dim wbk As Workbook, wks As Worksheet
    Set wbk = Workbooks.Add
    wbk.SaveAs "c:\test.xls"
    For Each wks In wbk.Worksheets
        wks.Protect "motdepasse"
    Next wks
    wbk.Close True
    Set wks = Nothing
    Set wbk = Nothing
End Sub

[blobnet]

dadavyvy
merci beaucoup pour ta réponse, j'ai été long à tester, mais ça marche