Set Range on ThisWorkBook problem.

  • Thread starter Thread starter Cesar Zapata
  • Start date Start date
C

Cesar Zapata

I get an error whe trying to set a range on the thisworkbook.range


dim lcolumn as string

lcolumn =
ThisWorkbook.Worksheets(2).Range("IV1").End(xlToLeft).Offset(0,
1).Column

Set myrange = Range(ThisWorkbook.Worksheets(2).Cells(1, 24),
ThisWorkbook.Worksheets(2).Cells(1, lcolumn))

TIA


CZ
 
First, lColumn should be a Long--or at least a number.

And second, when I changed that, your code worked ok.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Sum above 4
Excel keeps shutting down using code 2
Adding spaces between ranges with save as macro 3
VBA set thick borders around non empty cells in range 0
Cut bottom 300 rows to next sheet & repeat 8
Clean this select case code up a bit. 2
Import multiple workbooks to current workbook in specified row number 0
Volatile UDF evaluates to zero on opening workbook until I press F9or change a cell 4

Back
Top