View Single Post
  #4   Report Post  
Posted to microsoft.public.excel.programming
Tom Ogilvy Tom Ogilvy is offline
external usenet poster
 
Posts: 6,953
Default Creating Same Size Box

then why wouldn't you just copy all from the same master box.

--
Regards,
Tom Ogilvy


"RigasMinho" wrote:

man that sucks - you have to program in command to do this?

this really sucks

But thanks

Tom Ogilvy wrote:
for checkboxes from the control toolbox toolbar located on a worksheet.

Sub sizecheckboxes()
Dim cbox as MSForms.checkbox
Dim cbox1 as MSForms.Checkbox
Dim obj as OleObject
set cbox = Worksheets.OleObjects("CheckBox1").Object
for each obj in Activesheet.OleObjects
if typeof obj.Object is MSforms.Checkbox then
set cbox1 = obj.Ojbect
if cbox1.name < cbox.Name then
cbox1.Width = cbox.Width
cbox1.Height = cbox.Height
end if
end if
next
end Sub

--
Regards,
Tom Ogilvy

"RigasMinho" wrote:

Hey - in VBA you know how you can create boxes whether it be a texbox /
label box / check box etc etc

I created about 10 checkboxes - is there a way to make them the same
size w/o using copy and paste.

Like highlight one box and make them the same size of that box?

Let me know thanks