Private Sub UserForm_Initialize()
ComboBox1.List= .Range("A3", .Range("A" & Rows.Count).End(xlUp)).Value
ComboBox1.Value = "Please Select an employee from the dropdown"
Thank You both for your help on this issue. After relooking at the code after being away from it for awhile, Sheet1 was named something else. After I changed it to the correct name, it worked. Thank you again.