how do I set a variable equal to the value of a cell?

[June Macleod]

In vba how do I set a variable equal to the contents of a cell?

I tried:

dim asstype%
dim therow%
therow = 2
asstype = Worksheets("Sheet1").Range(Cells(therow, 21), Cells(therow,
21)).Value

but I get an "application defined or object defined error".

The problem seems to be in the Worksheets("Sheet1") part as the rest of the
line happy returns a value.

I am trying to run a macro on a cell in sheet2 that finds some values on
sheet 1 before performing a calculation.

Help!

June

 

[Frank Kabel]

Hi June
try the following:
dim asstype
dim therow as long
therow = 2
asstype = Worksheets("Sheet1").Cells(therow, 21).Value

 

[June Macleod]

Thank you.

That worked well.

June

Hi June
try the following:
dim asstype
dim therow as long
therow = 2
asstype = Worksheets("Sheet1").Cells(therow, 21).Value