This worked Great!!!!!

Thanks


In article ,
says...
Option Explicit
Private Sub UserForm_Initialize()
Dim myCell As Range
For Each myCell In Worksheets("sheet999").Range("aa2:aa12").Cells
Me.ComboBox1.AddItem myCell.Text 'or format(mycell.value,"mm/dd/yyyy")
Next myCell
End Sub

And do the same thing with the times.