Dependent Combobox on Form not updating from dynamic range

Try this one Ron.

Private Sub cboMonth_Change()
Set ws = Worksheets("Generator")
ws.Range("C1") = cboMonth.Value
cboDay.Clear
For Each cDay In ws.Range("DayList")
  With Me.cboDay
  .AddItem cDay.Value
  End With
Next cDay
End Sub