chungtinhlak
12-18-2008, 12:43 PM
I have the following textboxes in my userform. Where txtsheet allows the user to input sheet name.
In my code, I have
wkbworking.activate
sheets(userform1.sheet).Select ' this gives me a type mismatch
and also tried
sheets("'" & userform1.sheet & """).Select
this gives me Subscript out of range
What did i do wrong
Private Sub UserForm_Initialize()
UserForm1.txtcognos.Value = "Line 6 Soi"
UserForm1.txtip.Value = "IP Assessments LN6"
UserForm1.txtsheet.Value = "LN6"
UserForm1.txtsoi.Value = "A"
UserForm1.txtResult.Value = "P"
End Sub
In my code, I have
wkbworking.activate
sheets(userform1.sheet).Select ' this gives me a type mismatch
and also tried
sheets("'" & userform1.sheet & """).Select
this gives me Subscript out of range
What did i do wrong
Private Sub UserForm_Initialize()
UserForm1.txtcognos.Value = "Line 6 Soi"
UserForm1.txtip.Value = "IP Assessments LN6"
UserForm1.txtsheet.Value = "LN6"
UserForm1.txtsoi.Value = "A"
UserForm1.txtResult.Value = "P"
End Sub