selection une colonne/ligne à l'ouverture

[christophe]

bonjour le forum
je souhaite à l'ouverture du fichier tomber sur la dérnière ligne (en bleu) du mois en cours...
ex ci-joint
merci d'avance... [file name=essaiouverturemois.zip size=2298]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/essaiouverturemois.zip[/file]

 

[ERIC S]

Bonjour

essaie ce code à mettre dans Thisworkbook

Private Sub Workbook_Open()
Sheets('feuil1').Select
For i = 2 To 256 Step 2
If Month(Cells(5, i).Value) = Month(Date) And Year(Cells(5, i).Value) = Year(Date) Then
derligne = Range(Cells(65536, i).Address).End(xlUp).Row
If derligne < 15 Then Cells(15, i).Select: Exit Sub
Range(Cells(65536, i).Address).End(xlUp).Offset(1, 0).Select
Exit Sub
End If
Next i
MsgBox 'Date non trouvée'
End Sub

 

[christophe]

bonjour eric
merci pour ton aide cependant comment definir (dim)
'i' et 'derligne'...

 

[christophe]

j'ai trouvé pour dimensionner
ca foncyionne bien
merci pour ton aide
merci au forum
bonne journée à tous