Bonjour,
J'utilise un code VBA afin de créer un nouveau classeur. tout fonctionne sans problème mais je voudrais rajouter une protection sur la feuille de ce classeur créé.

j'utilise ce code pour la création :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Sub Exporter()
    Dim Sht As Worksheet
 
    Nom = ThisWorkbook.ActiveSheet.Name
 
    'Copie l'onglet dans un nouveau classeur
    Set Sht = ThisWorkbook.Worksheets(Nom)
    Sht.Copy
 
    'Sauvegarde du nouveau classeur
    Application.DisplayAlerts = False
    ActiveWorkbook.SaveAs Chemin & Sht.Name
    ActiveWorkbook.Close False
    Application.DisplayAlerts = False
 
    Set Sht = Nothing
 
End Sub
Pour protéger ma feuille je pense que c'est
Code : Sélectionner tout - Visualiser dans une fenêtre à part
ActiveSheet.Protect "Code"
Mais comment et où le rajouter ? j'ai tenté mais cela ne fonctionne pas.

D'avance merci
Fred