Workbook_Open

Bonjour !

Je travaille actuellement sur un workbook qui dispose de beaucoup de liste. Ce que j'aimerais, c'est definir un certain nombre de ces listes à une certaine valeur, UNIQUEMENT a l'ouverture de la feuille excel.

J'ai utilisé le bout de code suivant :

Private Sub Workbook_Open()
    'Place par défaut les cellules de nos choix sur le setting de notre choix.
    For i = 34 To 81
        Sheets("Saisie des paramètres").Cells(i, 4).Select
    Next
    Selection.Cells.Value = "Shutdown"

End Sub

qui est évidemment placé dans "ThisWorkbook".

Du coup si vous avez des idées (il ne se passe rien sur ouverture du fichier)

Merci

bonjour,

peut-être :

Private Sub Workbook_Open()
    'Place par défaut les cellules de nos choix sur le setting de notre choix.
    For i = 34 To 81
        Sheets("Saisie des paramètres").Cells(i, 4) = "Shutdown"
    Next     
End Sub

A+

Essaie ceci:

Private Sub Workbook_Open()
    'Place par défaut les cellules de nos choix sur le setting de notre choix.
    For i = 34 To 81
        Sheets("Saisie des paramètres").Cells(i, 4).Value = "Shutdown"
    Next    
End Sub

Ah bah oui, c'est encore plus simple comme ça.

Merci les gars.