vbscript find last cell row 2

[kyriakos70]

Hello,
Another question how can I find last cell with value row?

Kyriakos

 

[SkipVought]

Hi,

What application?

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}

 

[markdmac]

set xl = getobject(,"excel.application")
r = 1
Do until len(xl.cells(r, 1).value) = 0
     r = r + 1
Loop

'last data is on row r

I hope you find this post helpful.

Regards,

Mark

Check out my scripting solutions at

http://www.thespidersparlor.com/vbscript

Work SMARTER not HARDER. The Spider's Parlor's Admin Script Pack is a collection of Administrative scripts designed to make IT Administration easier! Save time, get more work done, get the Admin Script Pack.

 

[SkipVought]

If it is Excel...

    MsgBox Cells.Find("*", Cells(Cells.Rows.Count, "A"), , , , xlPrevious).Row

Skip,

_{Just traded in my old subtlety...
for a NUANCE!}