Ok, on another worksheet in the same workbook, I have the following code:
Private Sub UserForm_Initialize()
Dim ws As Worksheet
cbo1.Clear
cbo2.Clear
Set ws = Worksheets("Admin Menu")
Me.cbo1.List = ws.Range("SupList").Value
Me.cbo2.List = ws.Range("EmpList").Value
Combo box cbo2 populates fine with values from my dynamic names range, "EmpList" (which is sheet2, "Admin Menu").
However, on another userform (DeleteEmp), I need the EmpList to populate a different combobox, cbo5.
I have tried:
Private Sub RoundedRectangle6_Click()
DeleteEmp.Show
Sheet2.Activate
Dim ws As Worksheet
Set ws = Worksheet("Admin Menu")
Me.cbo5.RowSource = "Admin Menu!$B$3:$B" & Sheet2.Cells(Rows.Count, "B").End(xlUp).Row
End Sub
and
Private Sub RoundedRectangle6_Click()
DeleteEmp.Show
Dim ws As Worksheet
Set ws = Worksheet("Admin Menu")
Me.cbo5.List = ws.Range("EmpList").Value
End Sub
Neither work on my DeleteEmp userform. Any advice?
Bookmarks