網路上有許多線上PDF轉WORD的網站,但要能編輯PDF而且又要能轉成WORD,除了adobe自家的軟體之外,其實免費軟體並不多,而其他商業軟體,大多是要License而且需付費。
2013年,adobe曾䆁出一個免費的正式版,安裝adobe8.0後,發現程式雖舊,但仍合用,若有需要的人不妨找找。
Adobe CS2 free download (建議勿做為商業使用)
(Acrobat 3D 1.0 for Windows, Acrobat Standard 7.0, Acrobat Pro 8.0, Audition 3.0, GoLive CS2, Illustrator CS2, InCopy CS2, InDesign CS2, Photoshop CS2, Photoshop Elements 4.0/5.0 與 Adobe Premiere Pro 2.0)
2015年6月4日 星期四
[EXCEL] Excel 利用巨集取消保護工作表
適用Excel 2003、Excel2007檔案
新增一個巨集程式
貼上以下程式碼
Sub Remove_Sheet_Protect()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
再執行巨集就可以了。
參考來源:https://uknowit.uwgb.edu/page.php?id=28850
新增一個巨集程式
貼上以下程式碼
Sub Remove_Sheet_Protect()
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
ActiveWorkbook.Sheets(1).Select
Range("a1").FormulaR1C1 = Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub
再執行巨集就可以了。
參考來源:https://uknowit.uwgb.edu/page.php?id=28850
訂閱:
文章 (Atom)
熱門文章
-
切換到注音輸入法時,常會自動輸入法整合器出現,有時會造成畫面干擾,如下圖: 要如何關掉呢? 其實很簡單,在注音輸入法的[中][英]切換的地方按下滑鼠右鍵 即可輕鬆打開或關掉輸入法整合器了。但是別太高興,這只是暫時的,若要關掉的話,需要打開檔案總管 到目錄 C:\Windows\...
-
啟始資金:100萬 利率:2.5% 情況1:第一次質押 擔保品市值:100萬 利息:625元/每月 借款金額(3成):30萬 維持率:100/30 x 100% = 333.33% 最大借款金額(6成):60萬 最低維持率:100/60 x 100% = 166....
-
如下圖,為何word表格內的文字 無法垂直置中對齊 ? 通常改了下圖 對齊方式/置中 就可以解決 但有時還是不行,這時候就要改 段落的設定 了,與 後段的距離改為 0 行 ,如下圖: 這樣就可輕鬆解解決了...Yes
-
根據台灣證券交易所統計,台灣的證券戶數已超過1,200萬戶。許多投資者可能在不同的券商擁有多個帳戶,若超過5個以上,券商還會特別關心你。實際的投資人數大約在800萬到900萬之間,這包括了擁有多戶頭的投資者。 什麼是「分戶帳」? 分戶帳(虛擬帳戶)是由券商為投資人設置的專屬虛擬帳...
-
1. 打開 Google 試算表 2. 輸入以下公式 = IMPORTXML ( "https://tw.stock.yahoo.com/quote/00679B" , "//*[@id='main-0-QuoteHeader-Proxy...
-
Can't use the Kodular companion Solution: 1. Install the old version of chrome. https://browserhow.com/how-to-downgrade-and-install-olde...
-
一般公立教師月退休金或一次退休金的計算其實很簡單,只需要以下2項資料: 1. 平均年薪 :一般任教 20年以上退休的教師,大約45000~50000之間。 2. 新制年資 :起計時間為 85年2月1日,之前為舊制,計算方式不同。 計算公式大約如下: 一次退休金 = 平均年薪*年資...
-
啟始資金:100萬 利率:2.5% 情況1:第一次質押 擔保品市值:100萬 利息:625元/每月 7500元/每年 借款金額(3成):30萬 維持率:100/30 x 100% = 333.33% 最大借款金額(6成):60萬 最低維持率:100/60 x 100%...
-
元大台灣50 ETF(0050)於2025年4月24日通過「1拆4」的分割案,贊成率達94.2%。 分割後每股價格將從約160元降至約40元,入手門檻從16萬元降至4萬多元。 預計6月11日至17日暫停交易,6月18日恢復交易 。 降低投資門檻 : 分割後單...
-
無法使用google 試算表裡的 googlefinance來查詢大盤指數(台灣加權指數),一般來說使用以下importxml函數就可以查詢到加權指數 = GOOGLEFINANCE ( "tpe:taiex" , "price" )...