omkar sathaye's blog

populate adjacent row details in Userform

Hi, Please help I am Creating a simple userform to populate adjacent rows data in userform. A user enters Employee Id in Txt_Box EmployeeId & after clicking "OK", He Gets Populated Userform from the adjacent rows, From which he can know if the employee is valid or not. I have attached my file for reference also pasting my code below... (Please Help Me with it)

Dim ctl As Control
Private Sub cmdcancel_Click()
Unload Me
End Sub

Private Sub cmdclear_Click()
For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Or TypeName(ctl) = "ComboBox" Then
ctl.Value = ""

Syndicate content