Can a button check which row it is in?

[MartinDurham]

Hi Folks

I have the following VBA:

Sub DeleteTimesheet()

Dim TimesheetRef As String


TimesheetRef = ActiveSheet.Range("I5").Text
Worksheets(TimesheetRef).Delete
ActiveSheet.[I5] = "DELETED"


End Sub

Is it possible to have the button that activates this check which row it is in? and push it to a variable to be used here, rather than having to explicitly refer to a row number?
(The column will always be I)


cheers for any input
M

 

[MickG]

Forms Button:-

Sub Button2_Click()
MsgBox ActiveSheet.Shapes(Application.Caller).TopLeftCell.Row
End Sub

ActiveX button:-

Private Sub CommandButton1_Click()
MsgBox CommandButton1.TopLeftCell.Row
End Sub

 

[MartinDurham]

Cheers Mick !

 

[MickG]

You're welcome