Erreur d'exécution 1004

Bonjour,

Est ce que quelqu'un pourrait me dire pourquoi j'ai un message "Erreur d'exécution 1004" "La méthode select de la classe woksheet a échoué" s'il vous plait ?

Peut on supprimer le premier "Sheets.select" qui ralenti l'ouverture ?

La feuille est bloquée, mais pas la cellule [N20]

Private Sub Workbook_Open()

  Application.ScreenUpdating = False

    Application.WindowState = xlMaximized

    Sheets("FACTURE").Select
        [N20] = "NON"

            ActiveWindow.ScrollRow = 1
                ActiveWindow.ScrollColumn = 1

    Sheets("EPICERIE").Select
            ActiveWindow.ScrollRow = 1
                ActiveWindow.ScrollColumn = 1

   Application.ScreenUpdating = True

End Sub

Merci par avance

@ toute...


Oups, important, je précise qu'une fois "débogué" et enregistré dans un dossier il s'ouvre nickel à la prochaine ouverture !

Merci

Bonjour,

Voici Raja, mille excuses et un grand merci pour ton temps accordé

5classeur1.xlsm (128.28 Ko)

Re,

Remplace la ligne comme suivant :

Sheets("FACTURE").Activate

Ceci étant, la plupart de temps tu n'est pas obligé de sélectionner ou activer une feuille pour y travailler et c'est même conseillé. Le code suivant, par exemple peut le faire sans activer la feuille en question :

Sheets("FACTURE").[N20] = "NON"

Cool merci beaucoup,

Cependant, même après modif, comme fichier joint j'ai le même message d'erreur à la première ouverture !!!

7classeur1.xlsm (128.39 Ko)

Re,

Je t'ai déjà dit pas de "Select" mais "Activate". Alors, je vois le code suivant :

Sheets("EPICERIE").Select

Bonsoir Raja,

Oui je sais, au départ je modifie une cellule dans l'onglet Facture, mais je voulais surtout ouvrir toujours sur le même onglet (Epicerie)

Du coup j'ai laissé la modif, et ai supprimé le reste ; mais je ne comprends pas car sur d'autres fichiers j'ouvre sur l'onglet que je désire avec le même code !!!

Merci encore pour ton aide

Rechercher des sujets similaires à "erreur execution 1004"