回覆列表
  • 1 # blueblue

    用VBA試試吧,首先確保你的工作薄中有至少兩個工作表(sheet),然後ALT+F11,新建一個使用者窗體,用預設名稱:userform1,拖放兩個標籤控制元件,兩個文字框控制元件,一個按鈕控制元件。在“ThisWorkbook"上雙擊,在右邊輸入如下程式碼:

    Private Sub Workbook_Open()

    Sheet1.Visible = xlSheetVeryHidden

    UserForm1.Show

    End Sub

    Private Sub CommandButton1_Click()

    If TextBox1.Text = "張三" And TextBox2.Text = "123456" Then

    Unload Me

    Sheet1.Visible = xlSheetVisible

    Sheet1.Activate

    Else

    MsgBox "請輸入正確的使用者名稱和密碼!", vbOKOnly + vbInformation, "提醒"

    TextBox1.SetFocus

    End If

    End Sub

    注意:此處假設使用者名稱為“張三”,密碼為“123456”,你可以自己更改。我已經上傳了一個樣板,請注意檢視程式碼並做出思考。

  • 中秋節和大豐收的關聯?
  • 哪些動物的舌頭有特殊的用處?