Ouverture sur 1 cellule précise....

[WEIDER]

Bonjour le forum !

J'ai déjà ces lignes de commande dans mon 'THISWORKBOOK',

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Feuil1.Cells(10, 4) = ''
End Sub

Que dois je y rajouter en ligne de commande pour que lors de la prochaine ouverture du fichier, la cellule A1 soit automatiquement sélectionnée ?

Merci beaucoup.

Weider.

 

[2passage]

Bonjour,

Ajoute juste
Feuil1.range('A1).select

Vala
A+

 

[WEIDER]

Merci 2passage !

Ou mettre cette ligne de commande dans mon Thisworbook ?
Voici ce que j'ai déja dedans...

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Feuil1.Cells(10, 4) = ''
End Sub


Merci pour ton aide !

Weider.

 

[Dan]

Bonjour,

Oui tu places ce code dans 'thisworkbook'

Private Sub Workbook_Open()
Sheets('feuil1').Range('a1').Activate
End Sub

 

[WEIDER]

Merci bien Dan,

------------------------------------------------
Private Sub Workbook_Open()
Sheets('Relevé 1').Range('a1').Activate
End Sub
------------------------------------------------

Weider.