Command Buttons on Sheet moving with cells
Todd,
Save the position beforehand, and restore it afterwards. Something like
Dim pos1 As Double
With Worksheets("Sheet2")
pos1 = .CommandButton1.Left
.Columns("A:IV").AutoFit
.CommandButton1.Left = pos1
End With
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"Todd Huttenstine" wrote in message
...
Hey guys,
I am using the following code supplied by Nigel that
autofits columns based on cell value. The problem is that
my command buttons also move with the movement of the
cells. How do I stop this?
Worksheets("Sheet1").Columns("A:IV").AutoFit
Thanx
Todd
|