excel獲取vba密碼

① 獲取EXCEL工程密碼，需要知道設置的vba工程密碼。（不是刪除密碼打開工程）

首先新建EXCEL文件，在工作表標簽處點右鍵，選擇查看代碼，復制以下代碼，按F8執行，在彈出窗中選擇要破解工程密碼的EXCEL文件，按F5執行即可：
Private Sub VBAPassword()
'你要解保護的Excel文件路徑
Filename = Application.GetOpenFilename("Excel文件（*.xls & *.xla & *.xlt）,*.xls;*.xla;*.xlt", , "VBA破解")
If Dir(Filename) = "" Then
MsgBox "沒找到相關文件,清重新設置。"
Exit Sub
Else
FileCopy Filename, Filename & ".bak" '備份文件。
End If
Dim GetData As String * 5
Open Filename For Binary As #1
Dim CMGs As Long
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = "CMG=""" Then CMGs = i
If GetData = "[Host" Then DPBo = i - 2: Exit For
Next
If CMGs = 0 Then
MsgBox "請先對VBA編碼設置一個保護密碼...", 32, "提示"
Exit Sub
End If

Dim St As String * 2
Dim s20 As String * 1
'取得一個0D0A十六進制字串
Get #1, CMGs - 2, St
'取得一個20十六制字串
Get #1, DPBo + 16, s20
'替換加密部份機碼
For i = CMGs To DPBo Step 2
Put #1, i, St
Next
'加入不配對符號
If (DPBo - CMGs) Mod 2 <> 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox "文件解密成功......", 32, "提示"
Close #1
End Sub

② Excel 表格「VBAProject密碼」忘記了，如何解除

准備工具：表格，電腦，OFFICE密碼破解軟體（OfficeToolbox軟體）

1.打開BOX軟體，在軟體頁面中找內到文件選擇容選項，點擊該選項進入到文件選擇頁面中。

③ Excel表格VBAProject密碼忘記了如何解除

當Excel表格中的VBAProject密碼被遺忘時，可以通過以下步驟嘗試解除密碼保護：

1. **修改文件擴展名**：首先，將Excel文件的擴展名從`.xlsm`更改為`.rar`或`.zip`，因為Excel文件實際上是以壓縮格式存儲的。這一步是為了能夠訪問文件內部的內容。

2. **解壓文件**：使用WinRAR或類似的壓縮軟體打開更改擴展名後的文件，並解壓到一個文件夾中。

3. **查找並修改vbaProject.bin文件**：在解壓後的文件夾中，找到`xl`目錄下的`vbaProject.bin`文件。這是一個二進制文件，其中包含了VBA工程的密碼信息。

4. **編輯vbaProject.bin文件**：使用合適的二進制編輯器（如Hex Editor）或文本編輯器（如Notepad++，並確保以二進制或十六進制模式打開）打開`vbaProject.bin`文件。查找特定的字元串（如「DPB=」）並將其修改（如改為「DPx=」，注意保持修改前後字元串長度一致）。這一步是破解密碼的關鍵。

5. **替換並重新打包文件**：將修改後的`vbaProject.bin`文件替換回原解壓文件夾中的對應位置，然後重新使用壓縮軟體將該文件夾打包為`.rar`或`.zip`文件，並將擴展名改回`.xlsm`。

6. **打開Excel文件**：使用Excel打開修改後的`.xlsm`文件，此時可能會收到一些錯誤提示，選擇忽略或繼續。在VBA編輯器中，右鍵點擊VBAProject（項目），選擇「VBAProject屬性」，然後在「保護」選項卡中取消勾選「查看時鎖定工程」或重新設置一個新密碼（如果需要）。

請注意，上述方法可能涉及對文件結構的直接修改，因此在進行操作前務必備份原始文件以防數據丟失。此外，由於不同版本的Excel和VBA保護機制可能有所不同，因此上述方法在不同情況下可能有所差異或不完全有效。