The following userform code asking for a password to open another w/book..
at which line I should insert code,(what code) to open another w/book called
"sales"
Private Sub cmdLogin_Click()
With Me.TextBox1
If .Text < ThisWorkbook.Worksheets("Sheet1") _
Range("R1").Value Then 'sheet1cell"R1" contains password
MsgBox "Invalid Password !", vbCritical
SelStart = 0
SelLength = Len(.Text)
SetFocus
Else: Unload Me
End If
End With
End Sub

--
Message posted via http://www.officekb.com