Afternoon All,
I am using the VB below to load a userform.
I have been asked to also filter the userform loading by manager as well as Call Centre Manager.
I load the userform by selecting the name of the CSM "Ashley Longman" ( Below ) but i have also been asked to futher refine the search to manager instead of just the next open query. The managers name is refined in combobox2, where as the CSM name is refined in Combobox1. Is there anyway i can adjust the existing code as the manager name is in column C (i, 3).
Any help would be appreciated even if i have to rewrite the code as i am new to VB. I understand the part about the userform loading just not refining the search.
Many Thanks
I am using the VB below to load a userform.
I have been asked to also filter the userform loading by manager as well as Call Centre Manager.
I load the userform by selecting the name of the CSM "Ashley Longman" ( Below ) but i have also been asked to futher refine the search to manager instead of just the next open query. The managers name is refined in combobox2, where as the CSM name is refined in Combobox1. Is there anyway i can adjust the existing code as the manager name is in column C (i, 3).
Any help would be appreciated even if i have to rewrite the code as i am new to VB. I understand the part about the userform loading just not refining the search.
Many Thanks
Code:
Dim iRow As Long
Dim ws As Worksheet
Dim lRow As Long
Set ws = Worksheets("Ashley Longman")
If UserForm2.ComboBox1 = "Ashley Longman" Then
Pword = InputBox("Please enter password")
If Pword = "ticket" Then
ActiveWorkbook.Sheets("Ashley Longman").Activate
Else
MsgBox "Please contact your system provider for a password"
Exit Sub
End If
Unload Me
lRow = Range("N" & Rows.Count).End(xlUp).Row + 1
For i = 3 To lRow
If Cells(i, 1).Value = "" Then Exit For
If Cells(i, 1).Value <> "" And Cells(i, 14).Value = "" Then
gotcha = True
UserForm1.Show False
'Info after this to load the userform