Sheet4.Select
Sheet4.Range("G59").End(xlUp).Offset(1, 0).Select
Dest1 = ActiveCell.Row

Would like to locate the row # without selecting the worksheet or the range.
Is that possible when different worksheet is active?
--
Jim at Eagle

Hi, Jim,

Without selection, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2)


---
Regards,
Norman


"Jim at Eagle" wrote in message
...
Sheet4.Select
Sheet4.Range("G59").End(xlUp).Offset(1, 0).Select
Dest1 = ActiveCell.Row

Would like to locate the row # without selecting the worksheet or the
range.
Is that possible when different worksheet is active?
--
Jim at Eagle

Hi Jim,

If, however, the row was your target, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2).EntireR ow


---
Regards,
Norman



"Norman Jones" wrote in message
...
Hi, Jim,

Without selection, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2)


---
Regards,
Norman


"Jim at Eagle" wrote in message
...
Sheet4.Select
Sheet4.Range("G59").End(xlUp).Offset(1, 0).Select
Dest1 = ActiveCell.Row

Would like to locate the row # without selecting the worksheet or the
range.
Is that possible when different worksheet is active?
--
Jim at Eagle

Taking the uncertainty in the original note a bit further, if "locate the row #"
literally means the number of the row then:

dim LastRow as long
LastRow = range("G59").end(xlup).row

Bill
-------------------------
Norman Jones wrote:
Hi Jim,

If, however, the row was your target, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2).EntireR ow


---
Regards,
Norman



"Norman Jones" wrote in message
...

Hi, Jim,

Without selection, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2)


---
Regards,
Norman


"Jim at Eagle" wrote in message
...

Sheet4.Select
Sheet4.Range("G59").End(xlUp).Offset(1, 0).Select
Dest1 = ActiveCell.Row

Would like to locate the row # without selecting the worksheet or the
range.
Is that possible when different worksheet is active?
--
Jim at Eagle

Thanks,
LastRow = Sheet4.Range("G59").End(xlUp)(2).Row
I needed the the first empty cell to append new data to.
--
Jim at Eagle


"Bill Martin" wrote:

Taking the uncertainty in the original note a bit further, if "locate the row #"
literally means the number of the row then:

dim LastRow as long
LastRow = range("G59").end(xlup).row

Bill
-------------------------
Norman Jones wrote:
Hi Jim,

If, however, the row was your target, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2).EntireR ow


---
Regards,
Norman



"Norman Jones" wrote in message
...

Hi, Jim,

Without selection, try:

Dim rng As Range

Set rng = Sheets("Sheet4").Range("G59").End(xlUp)(2)


---
Regards,
Norman


"Jim at Eagle" wrote in message
...

Sheet4.Select
Sheet4.Range("G59").End(xlUp).Offset(1, 0).Select
Dest1 = ActiveCell.Row

Would like to locate the row # without selecting the worksheet or the
range.
Is that possible when different worksheet is active?
--
Jim at Eagle