Microsoft 365 Comment aller au départ sous le dernier enregistrement

ChantalTreize · 24 Juin 2021

Bonjour tout le monde,
J'ai fait une petite macro pour enregistrer mon document.
Sub Enregistrement()
'
' Enregistrement Macro
'
ActiveWorkbook.Save
Range("B8").Select
End Sub
Mais je souhaiterai que me souris vienne se positionner dans la colonne B sous le dernier enregistrement pour être en bonne position pour le prochain.
Je vous en remercie par avance
Chantal

M12 · 24 Juin 2021

Bonjour,
Teste ceci
Sub Enregistrement()
'
' Enregistrement Macro
'
ActiveWorkbook.Save
dl=Range("B" & Rows.Count).End(xlUp).Row+1
Range("B"& dl).Select
End Sub

Dranreb · 24 Juin 2021

Bonjour.
S'il est sous forme de tableau :

VB:

With ActiveSheet.ListObjects(1)
   Application.GoTo .HeaderRowRange(.ListRows.Count + 2, 1)
   End With

Microsoft 365 Comment aller au départ sous le dernier enregistrement

ChantalTreize

XLDnaute Occasionnel

M12

XLDnaute Accro

Dranreb

XLDnaute Barbatruc

Discussions similaires