L
Luc
Guest
Bonjour le forum
Existe t'il un code permettant de revenir à la dernière feuille vue!
merci
Existe t'il un code permettant de revenir à la dernière feuille vue!
merci
Public DerFeuille, DerFeuille2
Sub DerniereFeuille()
Sheets(DerFeuille2).Select
End Sub
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
DerFeuille = ActiveSheet.Name
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
DerFeuille2 = DerFeuille
End Sub
Private Sub Workbook_Open()
DerFeuille2 = ActiveSheet.Name
DerFeuille = ActiveSheet.Name
End Sub