Moving Text Boxes
I received the following suggestion to move text boxes
Sub moveit()
With Workbooks("Book1.xls").Worksheets("Sheet1")
.TextBox1.Top=Sheet1.Range("B2").Top
.TextBox1.Left=Sheet1.Range("B2").Left
End With
End Sub
I get a message straight away highlighting the first
line (..With Workbooks etc) saying reference is out
of range.
Any suggestions?
Thanks
|