Ouvrir toujours le même onglet

JCGL

XLDnaute Barbatruc

• 14 Février 2011

• #2

Re : Ouvrir toujours le même onglet

Bonjour à tous,

Peux-tu essayer avec dans le ThisWorkBook :

Code:

Option Explicit

Private Sub Workbook_Open()
Sheets("F1").Activate
Range("A1").SpecialCells(xlCellTypeLastCell).Select
End Sub

A+ à tous

 

Vote positif 0 Vote négatif

Y

ychc

XLDnaute Occasionnel

• 15 Février 2011

• #3

Re : Ouvrir toujours le même onglet

Bonsoir JCGL, le Forum

Je te remercie pour ta réponse.
L'ouverture du fichier voulu, fonctionne parfaitement, par contre le fait de l'ouvrir à l'endroit de la dernière ligne renseigné ne fonctionne pas.
En fait elle s'ouvre mais se positionne tout en bas du fichier vers la ligne 3000 alors que je suis aux environ des lignes 500.
Je ne sais pas ce qui peux se passer.

merci encore

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 15 Février 2011

• #4

Re : Ouvrir toujours le même onglet

Bonsoir ychc, Jean-Claude

essaye peut être ainsi :

Code:

Dim c As Range
Set c = Cells.Find("*", Range("IV65536"), xlValues, , 1, 2, 0)
If Not c Is Nothing Then c.Select

bonne soirée
@+

 

Vote positif 0 Vote négatif

Y

ychc

XLDnaute Occasionnel

• 15 Février 2011

• #5

Re : Ouvrir toujours le même onglet

Bonsoir Pierrot, JCGL

Merci, grâce à vous deux j'ai réussi à faire exactement ce que je voulais.
Tout fonctionne parfaitement.
Bonne soirée et merci encore.

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 15 Février 2011

• #6

Re : Ouvrir toujours le même onglet

Bonjour à tous,

Annulé...

A+ à tous

 

Dernière édition: 15 Février 2011

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 15 Février 2011

• #7

Re : Ouvrir toujours le même onglet

Bonjour à tous,

Un message spécial juste pour le plaisir de croiser l'ami Pierrot...

A++
A+ à tous

 

Vote positif 0 Vote négatif