Runtime error 13-- Setting a variant Range?!
Try something like this...
Dim MyRange as Range
with Me.txtItem_Number
Set MyRange = Activesheet.Range("C" & .Value & ":G" & .Value + 2)
end with
MyRange.ClearContents
--
HTH...
Jim Thomlinson
" wrote:
Why doesn't this work?
Dim MyRange as Variant
Set MyRange = ("C" &(Me.txtItem_Number.Value) & ":G"
&((Me.txtItem_Number.Value)+ 2))
Range(MyRange).ClearContents
I also tried Dim MyRange as Range. How can I work around this when I
need to clear a different area every time the macro runs?
|