I like to pick out a row/column that is always used when that row/column is
used.

For instance, if Row 1 has headers and column A always has something in it when
the row is used:

dim wks as worksheet
dim LastRow as long
dim LastCol as long

set wks = workbooks(...).worksheets(...)

with wks
lastrow = .cells(.rows.count,"A").end(xlup).row
lastcol = .cells(1,.columns.count).end(xltoleft).column

.range("A1",.cells(lastrow,lastcol)).copy _
destination:=whereeveryouwant

end with

swtransaction wrote:

I have several spreadsheets that are converted in batch. The row count
is never the same. I've tried to write some code that did not
reference a specific cell, but I'm having problems.

Here is what I have so far. The problem is the last cell is different
in every file. I can do this with the row number in the A column, but
I need it at the end of th spreadsheet.

- go to end row/column
- move one cell to the right
- enter row()
- copy row() from that cell to the top row in that column

ActiveCell.SpecialCells(xlLastCell).Select
Range("R4233").Select
ActiveCell.FormulaR1C1 = "=ROW()"
Range("R4233").Select
Selection.Copy
Range("R4232").Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste
Application.CutCopyMode = False

--
swtransaction
------------------------------------------------------------------------
swtransaction's Profile: http://www.excelforum.com/member.php...o&userid=37459
View this thread: http://www.excelforum.com/showthread...hreadid=571370

--

Dave Peterson