View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
bob bob is offline
external usenet poster
 
Posts: 52
Default 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