Dim MyRange As String

MyRange = ("C" & (Me.txtItem_Number.Value) & ":G" &
((Me.txtItem_Number.Value) + 2))

Range(MyRange).ClearContents


--
HTH

Bob Phillips

(replace somewhere in email address with gmail if mailing direct)

wrote in message
ups.com...
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?