Verrouillage d'une feuille Excel

Bonjour,

J'aimerai savoir si il est possible de faire une copie d'une feuille avec une protection et quand je copie cette feuille la protection s'enlève sur la nouvelle feuille. (C'est pour protéger ma feuille source)

Merci par avance.

Cordialement Max.

Bonjour,

Un exemple.

Ctrl + Maj + A pour lancer la procédure.

Cdlt.

Option Explicit

Public Sub CopyWorksheet()
Dim wb As Workbook
Dim ws As Worksheet

    Set wb = ActiveWorkbook
    Set ws = wb.Worksheets("Modèle")
    ws.Copy after:=wb.Worksheets(Worksheets.Count)
    ActiveSheet.Unprotect

    Set ws = Nothing: Set wb = Nothing

End Sub

Merci bien Jean-Eric.

Bonne journée

Juste pour t’embêter encore une fois, est'il possible de faire apparaître le contenu d'une cellule dans une listbox?

Par exemple en C29 j'ai une valeur ("10€") et j'aimerais que cette valeur apparaissent dans ma listbox de mon userform.

Cordialement

Re,

C'est une autre question.

Clos ce sujet et ouvre en un nouveau.

Cdlt.