Signaler

Erreur 438 - Visual Basic - Ouverture de feuille

Posez votre question JonBid 7Messages postés jeudi 9 mars 2017Date d'inscription 30 mars 2017 Dernière intervention - Dernière réponse le 22 mars 2017 à 08:50 par michel_m
Bonjour à tous!

Voilà, je travaille sur un document Excel, et dans le WorkBook, j'ai rentré un code pour que dès l'ouverture d'une feuille, celle-ci s'affiche tout au début (en réalité cela affiche la cellule $A3). Le code fonctionne et est le suivant :

Private Sub Workbook_Open()

With Feuil1 / Feuil2 / Feuil3 / Feuil4 / Feuil5 / Feuil6 / Feuil7 / Feuil8
.Range("A3").Show
.Range("A3").Select
End With

End Sub


Cependant, j'ai toujours le message d'erreur 438qui apparaît à l'ouverture.


Lorsque j'essaie de déboguer l'objet, l'erreur s'affiche sur cette ligne



J'ai tenté plusieurs solutions mais en vain
Merci d'avance pour votre aide!

Cordialement,

Afficher la suite 
Utile
+0
plus moins
Bonjour

a adapter,
Option Explicit

Private Sub Workbook_Open()
Sheets(Array("Feuil1", "Feuil2", "Feuil3", "Feuil4", "Feuil5")).Select
Range("A3").Select
Sheets("Feuil1").Select 'dissocie les feuilles
End Sub

JonBid 7Messages postés jeudi 9 mars 2017Date d'inscription 30 mars 2017 Dernière intervention - 21 mars 2017 à 11:12
Je pense avoir répondu dans la mauvaise case !
Merci de regarder la suite de la discussion svp

Pardon !
Répondre
Donnez votre avis
Utile
+0
plus moins
Michel,

J'ai essayé ce que tu me propose, et me voici maintenant avec cette erreur:


Je débute en VBa, qu'est-ce qu'un indice ?



Merci
michel_m 14748Messages postés lundi 12 septembre 2005Date d'inscription ContributeurStatut 22 mai 2017 Dernière intervention - 22 mars 2017 à 08:50
j'avais testé comme toujours sur un classeur avec 5 feuilles avant de poster une proposition et ca fonctionnait sans problème.

vérifie donc ce que tu as écris dans l'array et d'autre part pourquoi avoir rajouté
sheets("Accueil"),select en 1° ligne, ligne que j'avais enlevé car inutilie... tu as peuy-^tre un conflit entre "accueuil" et "feuilX" (1 ou2 ou...)
Répondre
Donnez votre avis

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !