Check Boxes

B

Bruce

How do I fill a column of 50 rows with check boxes ? Fill Down doesn't seem
to do it..

Best Wishes
Bruce
( Illegitimi non carborundum est )
 
D

Dave Peterson

Maybe you could just use a macro to populate the range you want.


Option Explicit
Sub addCBX()
Dim myCBX As CheckBox
Dim myCell As Range

With ActiveSheet
.CheckBoxes.Delete 'nice for testing
For Each myCell In .Range("a1:a50").Cells
With myCell
Set myCBX = .Parent.CheckBoxes.Add _
(Top:=.Top, Width:=.Width, _
Left:=.Left, Height:=.Height)
With myCBX
.LinkedCell = myCell.Address(external:=True)
.Caption = "" 'or whatever you want
.Name = "CBX_" & myCell.Address(0, 0)
End With
.NumberFormat = ";;;"
End With
Next myCell
End With
End Sub

If you're new to macros, you may want to read David McRitchie's intro at:
http://www.mvps.org/dmcritchie/excel/getstarted.htm
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Wrapping and Anchors 0
Security 1
Security 0
Access 97 1
M.S. Word 365 1
Office 97 1
Access 97 1
File Size 3

Top