Userform not initializing or activating

[Godwin117]

I am stuck and can't seem to find the answer or overlooked the answer. Below is the code for my module to show the userform. This part works correctly.

Sub Log_Hours()

UserForm1.Show

End Sub

The Userform loads properly, until I change the Userform1 to Userform, not sure why. Then I am getting a Automation error. Below is that code.

Private Sub UserForm1_Initialize()

Me.ComboBox1.List = WorksheetFunction.Transpose(Worksheets("Data Validation").Range("C2", Worksheets("Data Validation").Range("C" & Rows.Count).End(xlUp)))
Me.TextBox1.Value = "mm-dd-yyyy"

End Sub

Any help on this would be greatly appreciated.

 

[Godwin117]

Yes it is empty.

 

[Fluff]

In that case I'm not sure.
Try deleting the combo & then adding a new one.

 

[Godwin117]

In that case I'm not sure.
Try deleting the combo & then adding a new one.

I can attach the workbook here to see if that would help any.

 

[Fluff]

You can't post the workbook here, but you can upload to a share site such as OneDrive, GoogleDrive & mark for sharing & then post the link you are given to the thread.