Remove/Edit text from checkbox

Hi,

You'll be glad to hear there's a simple fix for this that involves adding one line of code.
But before I can give that to you you'll need to stick to the forum rules and add code tags in your post above.

Edit the post, select the code then click the # icon and save the changes.

BSB

BSB, I was wondering how to do that. Thank you!

No problem at all

Add the red line below.

Please Login or Register  to view this content.

BSB

1. How can I modify this to set the checkbox referenced below to have no text?
2. How can I link a cell number like $B$2, but with the 2 being an incremented number from the for/next loop?
_______________________________
Sub CheckBoxCopy()
myTop = 0

Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
For x = 1 To 20

ActiveSheet.OLEObjects.Add(ClassType:="Forms.CheckBox.1", Link:=False, _
DisplayAsIcon:=False, Left:=0, Top:=myTop, Width:=64, Height:=20 _
).Select

myTop = myTop + 15
Next x

Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic

End Sub