copy to next empty row

[finch22]

Hi,

I'll get straight to the point. I've got 2 rows: Date and Timer Value.
When I click the save button (see code below) it saves todays date and the value from a label in cell B2.

How do I get it so when the save button is pressed it copies to the next empty row each time? I'm guessing some sort of loop is needed?

Private Sub BtnSave_Click()
Dim dToday As String
dToday = Format(Date, "dd-mmm-yy")

Range("A2").Value = dToday
Range("B2").Value = TimerValue
    End Sub

appreciate any help.

 

[VoG]

Hello and welcome to MrExcel.

Try

Range("A" & Rows.Count).End(xlUp).Offset(1).Value = dToday
Range("B" & Rows.Count).End(xlUp).Offset(1).Value = TimerValue

 

[finch22]

Thank you, EXACTLY what I was attempting to do!