VBA to find final row based on a cells value

[amxtomzo]

I am trying to change a code to find the final row when it finds a specific value. the part of the code i have is:

finalrow = Cells(Rows.Count, 1).Value = "312041"

I am running a loop to look though 1000's of rows but any info that comes up after this one line I dont need (well not yet anyway) so I only want to loop between the first row and where ever this comes in. It could be different each day, thats why I was hoping to make a Final Row code based on a specific value

Thanks for your help, again

Thomas

 

[VoG]

Try

finalrow = Columns("A").Find(what:=312041, LookIn:=xlValues, lookat:=xlWhole).Row

 

[amxtomzo]

Thank you VoG

worked perfectly

Thomas

drink heavy and prosper