How do you get the value from a specific cell in Excel VBA?

I want to get the value from a cell that is not in the active worksheet.

Is it possible? There is a property you can use called Value to return the contents of the cell. Sheet1.Cells(1, 1).Value
The short answer is that you don't, there is no way to return a value from a cell outside of the active worksheet. If you do need to get a value from an arbitrary cell you can use a reference to the workbook.

Dim cell As Excel.Range Dim bookRef As Excel.Workbook Set bookRef = ActiveWorkbook. Set cell = bookRef.Worksheets("Sheet1").Cells(1, 1)
Cell.Value 'returns the value of cell A1 Alternatively you could open the workbook and set the cell's value from there. Dim wb As Excel.Workbook Set wb = Application.Workbooks("Sheet1.xls")
Wb.Sheets("Sheet1").Cells(1, 1).

How do I get the cell reference value in Excel VBA?

I am working on a macro in excel vba.

I need to use the variable value "A1" to access the cells on a worksheet and get the value from them, but I am having some problems with the cell address. For example, when I try to write code that looks like: range("C1").value the error message says. "Runtime error 6: Unable to get the value of the property.Property not found."
I can't figure out how to fix it, so I was wondering if someone could help. Thank you! EDIT: The problem seems to be with the range being named as such. If I change it to any other name (like c1 for example) I don't get the error message. However, it still doesn't seem to get the value.

My code looks like this. For Each ws In ThisWorkbook.Worksheets For Each rng In ws.Range("A1:B6") 'Code. Next rng. Next ws. And when I type "wsk" in the line. For Each rng In ws.Range("A1:B6") it returns the following error message: "Object doesn't support this property or method". If I type it as "rng" instead, it just returns a blank. So I'm at a loss about what is causing this error and how to fix it. For Each rng In ws.Range("A1:B6").Cells

It might help to think of your range as being a collection.

How do I extract a value from a cell in Excel VBA?

I am using Excel 2026 and VBI have used the Cells collection to extract a value from a cell in Excel.

For example: Sub SomeProcedure(). Dim cCell As Range. Set cCell = ActiveCell. Do While Not IsEmpty(cCell). . Some operations here Set cCell = cCell.Offset(-1, 0) Loop. End Sub. This worked just fine for me. However, I now want to use the ActiveCell in other parts of my code. The problem is that the ActiveCell is a variable and it is always changing. Is there any way I can make it so that, if the ActiveCell changes, it will return the same value it had previously?
For example, I have tried this: Sub SomeProcedure(). Dim rngCell As Range. Set rngCell = ActiveCell.Resize(1, 1) ' Do something with the rngCell.Value .

But it returns "Type mismatch: Set cannot be used on left hand side of assignment". Is there any way I can do this without hard-coding the ActiveCell to a specific cell address? One option would be to store the last cell that you used as the first parameter of your .Offset function.

Sub SomeProcedure(). Dim LastCel As Range. Set LastCel = ActiveCell. Set cCell = LastCel.End(xlDown).Offset(1, 0)
Set rngCell = cCell.End(xlDown).Offset(1, 0)