Excel 2000 - ComboBox or ListBox VBA

  • Thread starter Thread starter Jeff
  • Start date Start date
J

Jeff

I have created an attendance worksheet that details names as column headers
and dates as row headers. I want to place a Combo Box in the intersecting
cells that pulls from an abbreviations listing on another worksheet. I also
must be able to sum the selected abbreviations or run a pivot table. I would
rather do this all in Access, but my supervisor won't go for it.

I used the following code and the drop-down worked for a minute, but now it
just shows the chosen abbreviation.

Private Sub ComboBox1_Click()
Forms.ComboBox1.List = Array("A", "D", "E", "H", "I", "B", "L", "N", "P",
"S", "T", "V", "W")
End Sub

Any help would be greatly appreciated!!!
Jeff
 
Jeff,

I think you'd be better off using Data Validation in the intersecting cells.
No code required to fill the choices, and since the entries are actually in
the cells - unlike combo/listboxes - they will be much easier to sum and you
won't spend all your time trying to keep those combo/listboxes in their
place.

hth,

Doug
 
Back
Top