get last row - 3 . value !!

[Ks1102]

hi all

looking help with the code which i'm not sure its correct or wrong just i try .. testing its error. Cells(5, 6).Value = Range("M" & Rows.Count).End(xlUp).Row - 3

whats i want to get
range (F6) = count to column M the third of bottom value.

can u help
thanks very much

 

[VoG]

Try

LR = Range("M" & Rows.Count).End(xlUp).Row
Cells(5, 6).Value = Range("M" & LR - 3).Value

 

[Michael M]

Try

Sub tester2()
Dim lr As Long
lr = Cells(Rows.Count, "M").End(xlUp).Row - 3
Cells(5, 6).Value = Range("M" & lr).Value
End Sub

 

[Ks1102]

Try

LR = Range("M" & Rows.Count).End(xlUp).Row
Cells(5, 6).Value = Range("M" & LR - 3).Value

it's work //// thanks

 

[Ks1102]

Try

LR = Range("M" & Rows.Count).End(xlUp).Row
Cells(5, 6).Value = Range("M" & LR - 3).Value

it's work //// thanks

 

[Michael M]

Try

Sub tester2()
Dim lr As Long
lr = Cells(Rows.Count, "M").End(xlUp).Row - 3
Cells(5, 6).Value = Range("M" & lr).Value
End Sub

 

[Michael M]

Glad you got it working....whichever solution you used....