Excel VBA INPUTBOX() - Please Help
In trying to find that data recorded in this function I
am using TEST = so that I can see it's value in the locals
window, as I step through the macro.
However it errors out on <test = mycell.cell.Value2.Value2
(1).Value2(1, 1)
with ( run-time 438 object doesn't support this property
or method)
I've also tried test = mycell.Value2.Value2(1).Value2(1, 1)
Am I using the wrong variant assignment???
Sub merge1()
Dim mycell As Variant
Dim test As String
Worksheets("Sheet1").Activate
Set mycell = application.InputBox(prompt:="Select a cell",
Type:=8)
test = mycell.cell.Value2.Value2(1).Value2(1, 1)
test = mycell.FormulaHidden
End Sub
|