Setting up Checkbox in VBA w/o Userforms

[dpbardell]

Have a Control Sheet that I use in every new Workbook. Trying to use VBA to setup a number of Control Toolbox Checkboxes (without using UserForms) dependent on the number of Tabs in the workbook. Have used Ritchie's BuildTOC code so have a TOC Table starting in Row 38. Test Workbook has 20 Tabs, so the TOC Col A shows each Tab Name.

Code works fine, with 2 problems I can't fix:

1) Row Height (A38-A57) has been fixed at 29 pixels. Expected the ActiveSheet line to align the Checkboxes with each of the 20 cells. The Properties of the resultant Checkbox vary in Height (29, 28.5 or 29.25) so do not align consistently.

2) Then want to color each checkbox in the same color the Tabs are set (all different). Without the color code, I get the 20 correctly named checkboxes in White/Black. With the color code I get a mass of Black/Red which cannot be read.

Please Login or Register  to view this content.

Can anyone help resolve either problem please?

[Leith Ross]

Hello dpbardell,

This macro should do it. Give it try and let me know the results.

Please Login or Register  to view this content.