Exécuter macro à l'ouverture Excel

Résolu
supermoun Messages postés 39 Statut Membre -  
 Pascal -
Bonjour à tous,

Je veux cacher des colonnes à l'ouverture d'un fichier Excel.
J'ai créer une Sub qui est appelée dans le Workbook.

Private Sub Workbook_Open()
Call AutoOpen
End Sub

Public Sub AutoOpen()
Sheets("Recherche").Select
Columns("I:IV").Select
Selection.EntireColumn.Hidden = False
End Sub

mais à l'ouverture il y a une erreur à la ligne Sheets..........
comment résoudre le problème.
Merci d'avance

1 réponse

  1. Pascal
     
    Bonjour,

    voici un bout de code qui fonctionne.

    A noter qu'avec une SUB (seule cela fonctionne aussi).
    Je pense qu'il manque la référence exacte de la plage (range), et non pas columns.

    A bon entendeur ..

    Private Sub Auto_Open()

    Sheets("Feuil1").Select
    Range("G1:H1").Select
    Selection.EntireColumn.Hidden = True

    End Sub
    -1