excel 巨集密碼破解

excel →巨集→錄製巨集   跳出要密碼。
破解方式如下：

1、開新excel
2、alt+f11 叫出vba
3、右鍵→插入→模組
4、貼上代碼
5、執行→選擇要破解excel →跳出破解提示。完成！

----------------------------------------------------------------------------

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

------------------------------------------------------------------------------

outlook 2016 imap 沒有寄件備份

outlook 2016 沒有寄件備份，信件寄出了，寄件備份匣什麼都沒有...
webmail看寄件備份...什麼也沒有！見鬼了...

 解決方法：設規則

win10筆電內建office365及再安裝office2010。優先開啓順序問題。

新購筆電win10且內建office365，因平常習慣使用office2010。

不管改什麼設定，只要IE上有excel的連結，開啟皆跑到office365開啟。Orz

以下步驟為失敗修改方式。各位別再嘗試了。最終解決方法再最下面紅字。


嘗試(失敗)方式如下：

1、於控制台→預設程式。去修改開啟預設office2010開啟。

2、改regedit
以 Office 2010 作為預設開啟程式

適用於 Windows 7 / 64bit 指令
"C:\Program Files (x86)\Microsoft Office\Office14\excel.exe" /regserver
"C:\Program Files (x86)\Microsoft Office\Office14\powerpoint.exe" /regserver
"C:\Program Files (x86)\Microsoft Office\Office14\winword.exe" /regserver

3、移除所有的office，去微軟下載 O15CTRRemove.diagcab
單安裝office2010，不管怎麼移除office365跟鬼纏身一樣，都移除不了。
(因為在控制台→解除安裝程式內找不到office365啊！！)

 Office 官方卸載工具   下載

4、不想嚐試了............

最終解決方式。

於win10點左下開始，找到excel動態磚，滑鼠右鍵，解除安裝。解決！！

win10家庭版升級專業版

新購筆電內建Win10家庭版，拿專業版啟動序號變更版本，但是在啟用頁面輸入序號時，卻無法升級，系統僅會提示序號版本與目前安裝版本不符。


Microsoft 論壇提供

請先確定系統版本為 1511 以上，前往設定＞更新與安全性＞啟用＞變更產品金鑰，之後輸入下列特定序號：

VK7JG-NPHTM-C97JM-9MPGT-3V66T

升級....卻失敗了！瞎~


解決方式：把網路中斷連線，再key一次序號！更新成功！

重新開機後再變更專業版產品金鑰即可。