cel-macros@googlegroups.com] *On Behalf Of *Dante Julian
*Sent:* Friday, August 30, 2013 1:03 PM
*To:* excel-macros@googlegroups.com
*Subject:* Re: $$Excel-Macros$$ Re: Copy data to next empty row
Dear Ravi,
Did figure it out. In your code, I replaced the line "Msgbox storeval"
with "c.Sele
Yes, that's perfect
Warm Regards,
Ravi Kumar.
From: excel-macros@googlegroups.com [mailto:excel-macros@googlegroups.com]
On Behalf Of Dante Julian
Sent: Friday, August 30, 2013 1:03 PM
To: excel-macros@googlegroups.com
Subject: Re: $$Excel-Macros$$ Re: Copy data to next empt
: RE: $$Excel-Macros$$ Re: Copy data to next empty row
Hi,
Ok, please see the below code, if still it’s not fine then let me know
Sub findlastrow()
Dim rng As Range
Set rng = Range("A37:A115 ")
For Each c In rng
If c.Value = "" Then
storeval = c.Row
MsgBox store
, August 30, 2013 2:57 PM
Subject: RE: $$Excel-Macros$$ Re: Copy data to next empty row
Hi,
Ok, please see the below code, if still it’s not fine then let me know
Sub findlastrow()
Dim rng As Range
Set rng = Range("A37:A115 ")
For Each c In rng
If c.Value = "" Then
To determine the name of each workbook, you must have the workbook name
column before combined.
2013/8/30 DanJ
> Dear Experts,
>
> Thank you for your quick replies.
>
> Sorry, if my question was not clear.
>
> What I wanted to find is the last row within the range A37:A115 of the
> first workb
Hi,
Ok, please see the below code, if still it's not fine then let me know
Sub findlastrow()
Dim rng As Range
Set rng = Range("A37:A115 ")
For Each c In rng
If c.Value = "" Then
storeval = c.Row
MsgBox storeval
Exit Sub
End If
Next
End Sub
Warm Re
