第1步：全選工作表，填充灰色背景。

第2步：選中中間一塊區域，填充15%灰色。

第3步：淺灰色區域設定邊線，右邊線和下邊線設定黑粗線條，左和上邊線設定白粗線條。

第4步:新增標題欄。在中間區間第一行填充藍色背景和白粗字型。輸入標題。

第5步：新增文字框。文字框的和窗體邊線設定正好相反。右和下邊線設定為白色邊線，左和上邊線設定為黑色邊線。

第7步：新增窗體左側和標題欄處圖片

新建一個EXCEL工作表，並儲存為開啟宏的工作表

在EXCEL介面，按ALT+F11，進入VBA編輯頁面

為窗體新增背景，以及密碼登入框

雙擊窗體，進入窗體VBA編輯頁面，根據需求，一步步編輯即可，密碼登陸框等，都設計一些程式碼

程式碼：

Private Sub Label1_Click()

If ComboBox1.Value = "管理員" And TextBox1.Value = 888 Then

"ActiveWindow.DisplayWorkbookTabs = True

Sheet2.Select

Application.Visible = True

End

ElseIf ComboBox1.Value = "使用者" And TextBox1.Value = 123 Then

"ActiveWindow.DisplayWorkbookTabs = True

Sheet3.Visible = xlSheetVeryHidden

Sheet2.Range("F:F,J:J").EntireColumn.Hidden = True

Sheet2.Select

Application.Visible = True

End

Else

MsgBox ("密碼不正確，無權進入系統")

On Error Resume Next

Unload Me

If Workbooks.Count > 1 Then

"Application.DisplayFormulaBar = True

"ThisWorkbook.Close True

ThisWorkbook.Close savechanges:=False

Else

"If ThisWorkbook.Saved = False Then ThisWorkbook.Save

Application.Quit

End If

End If

End Sub

這個問題很簡單，我來解答一下。

這個時候點選登入，然後輸入一下命令：If TextBox1.Value = "管理員" And TextBox2.Value = "123" Then Me.Hide Sheets("sheet1").Select Else

ThisWorkbook.Application.QuitE

Private Sub Workbook_Open()

UserForm1.Show

0End Sub啟動如果是2007版本以後，介面如下：（備註：需將檔案另存為xlxm檔案格式）儲存的時候，選擇“工具”→“常規工具”，在錄入密碼即可。