excel2002

M

Minick

Guest

• 23 Août 2004

• #2

Salut,

comme cela:

Private Sub Workbook_Open()
ThisWorkbook.Sheets('Ta Feuille').Activate
End Sub

@+ Minick

 

Vote positif 0 Vote négatif

P

philippe

Guest

• 24 Août 2004

• #3

bonjour minick

merci pour ta réponse

j'ingnore ci je l'ai écris à la bonne place quoi que, dès que j'ouvre mon classeur il me donne une erreur d'éxecution 13

j'ai ecris cela dans le projet en VBA a la page appelé ThisWorrkbook

Private Sub workbook_open()
ThisWorkbook.Sheets(accueil).Activate
End Sub

merci pour la réponse et désolé du dérangement

très bonne journée a bientot

philippe

 

Vote positif 0 Vote négatif

M

Minick

Guest

• 24 Août 2004

• #4

Salut,

C'est bien la qu'il faut mettre le code.

Parcontre il faut mettre des guillemets pour la feuille sinon il considere 'accueil' comme une variable.

donc essaie comme cela:


Private Sub workbook_open()
ThisWorkbook.Sheets("accueil").Activate
End Sub


@+ Minick

 

Vote positif 0 Vote négatif

P

philippe

Guest

• 25 Août 2004

• #5

salut minick

cool pour tes réponses , j'ai enfin mon classeur qui s'ouvrent a la même page .

je vais pouvoir faire une page d'accueil avec des boutons pour les autres feuille


encore merci pour tout

très bonne journée

philippe

 

Vote positif 0 Vote négatif