Forcer l'ouverture d'un classeur à une feuille

coco_lapin

XLDnaute Impliqué

• 28 Mars 2006

• #2

Bonjour tof et le forum.

Dans ThisWorbook places ce code
(exemple pour selectionner la Feuil3
Private Sub Workbook_Open()
Sheets('Feuil3').Select
End Sub

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 28 Mars 2006

• #3

Bonjour

une macro dans workbook

Private Sub Workbook_Open()
sheets('nomfeuille').select
End Sub

A+

 

Vote positif 0 Vote négatif

ERIC S

XLDnaute Barbatruc

• 28 Mars 2006

• #4

re

croisement d'un chien avec un lapin!!!!
déjà que mon chien n'est pas pure race...

A+

 

Vote positif 0 Vote négatif

T

Tof

Guest

• 28 Mars 2006

• #5

Oki , merci à vous 2, à++

 

Vote positif 0 Vote négatif

P

PETER49

Guest

• 14 Mars 2013

• #6

Re : Forcer l'ouverture d'un classeur à une feuille

Bonjour,

Après lecture de vos élements j'ai essayer d'appliquer votre méthode :

Private Sub Workbook_Open()
Sheets('Accueil').select

End Sub

Mais sans grand succès. j'ai un message d'erreur " erreur de compilation / attendu expression "

Pouvez vous m'aider ?

 

Vote positif 0 Vote négatif

W

Webperegrino

XLDnaute Accro

Supporter XLD

• 14 Mars 2013

• #7

Re : Forcer l'ouverture d'un classeur à une feuille

Bonsoir Le Forum,

La méthode sera peut-être efficace avec la formule suivante:

VB:

Private Sub Workbook_Open()
Sheets("Accueil").select 'et non pas '...'
End Sub

Cela devrait fonctionner.
Bon usage,
Webperegrino

 

Vote positif 0 Vote négatif