Hi
Use the worksheet function CountA to count responses with responses in
column B:
Responses=Worksheetfunction.CountA(sheets("SummarySheet").Range("B2:B1000"))
Re: The date drop down it would be eaysier to guide you if you showed the
code you are trying to use. If the cell or variable is holding a valid date
it should show as a date in your combobox. Look at this:
Private Sub Worksheet_Activate()
NextDay = Date + 1
Me.ComboBox1.AddItem Date
Me.ComboBox1.AddItem NextDay
Me.ComboBox1.AddItem Range("A6").Value
Me.ComboBox1.AddItem Format(Range("A7").Value, "mmddyyyy")
End Sub
Regards,
Per
"Bigjon" <(E-Mail Removed)> skrev i meddelelsen
news

FFFE536-EE46-46B2-969B-(E-Mail Removed)...
>I have several sheet with combo boxes that contain data such as First aid,
> Vehicle Damage Etc. How do I count the respnses on a summary sheet? Also
> when
> trying to get a date drop down I get the number in the combo box how do I
> get
> it to display MMDDYYYY?
>
>
>
>