Dear you all whose patience is without limit,
The checkboxes I've already inserted on my sheet("MENU") do come from the
control toolbox toolbar
should I delete them?
I must humbly admit I 'm pretty new at this...
Tom,
Both of your test codes have no result at all !?
To my defense the checkboxes I've set are placed each in a cell in the
range(D2 -G15) that is 14 lines of 4 cells...
lost again, I'm really trying hard to grasp your meaning..
Regards,
Didier.
"Tom Ogilvy" a écrit dans le message de
...
"as checkbox" refers to a checkbox from the forms toolbar. Are your
checkboxes from the Forms toolbar or the control toolbox toolbar? It
makes
a big difference in how you can refer to them.
From the forms toolbar:
Sub tester10()
Dim chkbx As CheckBox
For Each chkbx In ActiveSheet.CheckBoxes
Debug.Print chkbx.Name & " - " & chkbx.TopLeftCell.Address
Next
End Sub
From the control toolbox toolbar
Sub Tester11()
Dim obj As OLEObject
Dim chkbx As MSForms.CheckBox
For Each obj In ActiveSheet.OLEObjects
If TypeOf obj.Object Is MSForms.CheckBox Then
Set chkbx = obj.Object
Debug.Print obj.Name & " - " & chkbx.Name _
& " - "; obj.TopLeftCell.Address
End If
Next
End Sub
in xl2000 and later, the OleObject name, Shape Name and Control Name are
coordinated, but not true in xl97.
--
Regards,
Tom Ogilvy
" wrote in message
...
Hello,
I am having a problem with an array of checkbox on my sheet("MENU").
this array reefers to quite a big amount of data that are to be included
or
not (according to checkbox's values)
in a report I am creating.
The problem is as follows
how can I access those checkboxes by row-column reference
since there are 15 lines by 4 columns and I don't want to write the code
60
times changing only the name of the referenced checkbox?
VBA allows me to decla
Dim xCheckBox (1 to 15, 1 to 4) as checkbox
but then I cannot enter " xCheckBox(1,1) " as the Name of the CheckBox : I
get an error telling me it's not a valid name for the specified Object.
I've tried as well to reference the checboxes with like names:
x0101checkbox , x0102checkbox , x0103checkbox , x0104checkbox
x0201checkbox , x0202checkbox , x0203checkbox , x0204checkbox
x0301checkbox , x0302checkbox , x0303checkbox , etc
and then access them by declaring a string which in turns assume all the
different checkbox's names
like
with i from 1 to 15 , j from 1 to 4
variableString = "x" & numLine(i) & numCol(j) & "checkbox" (where
numLine(1) ="01" etc..)
check = sheets("MENU").variableString
but a get an invalid method for the object.
Must say I'm a bit stuck on this one !
Anyone an Idea?
Regards,
Didier.
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.515 / Virus Database: 313 - Release Date: 1/09/2003
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com).
Version: 6.0.515 / Virus Database: 313 - Release Date: 1/09/2003