UserForm

UserForm

 

ID와 PASSWORD를 입력하면 파일을 열고

아니면 종료하는 코드

 

 

Private Sub CommandButton1_Click()
    'Sheet3 B2셀에 textbox1에 입력된 내용을 입력하라.

    'Sheet3 B3셀에 textbox2에 입력된 내용을 입력하라.
    Sheet3.Range("B2:B3").ClearContents
    Sheet3.Range("B2") = Me.TextBox1.Value
    Sheet3.Range("B3") = Me.TextBox2.Value
    If Sheet3.Range("B4") = True Then
        MsgBox "어서오세요"
        Unload UserForm1
    Else
        MsgBox "ID와 PASSWORD를 확인하세요"
        ActiveWorkbook.Close False
    End If
End Sub

 

 

userform1.xlsm

0.02MB

 

이 내용을 유튜브 엑셀을 사랑하는 남자 강의 내용을 따라 해본 것입니다.