網路上有許多線上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)
熱門文章
-
Can't use the Kodular companion Solution: 1. Install the old version of chrome. https://browserhow.com/how-to-downgrade-and-install-olde...
-
無法使用google 試算表裡的 googlefinance來查詢大盤指數(台灣加權指數),一般來說使用以下importxml函數就可以查詢到加權指數 = GOOGLEFINANCE ( "tpe:taiex" , "price" )...
-
參考了部落客大仁 淺談保險觀念 之後,觀念上受益良多,發現以前在設計 APP:ETF資產配置 時,似乎就有類似平衡資產的想法,只是以前是用股票、債券或定存來做再平衡。以下自問自答,也試著計算看看曝險比例。 Q1:何謂「曝險」? A:這裡指的是投資部位的風險,我們可以不考慮風險值,...
-
1. 打開 Google 試算表 2. 輸入以下公式 = IMPORTXML ( "https://tw.stock.yahoo.com/quote/00679B" , "//*[@id='main-0-QuoteHeader-Proxy...
-
切換到注音輸入法時,常會自動輸入法整合器出現,有時會造成畫面干擾,如下圖: 要如何關掉呢? 其實很簡單,在注音輸入法的[中][英]切換的地方按下滑鼠右鍵 即可輕鬆打開或關掉輸入法整合器了。但是別太高興,這只是暫時的,若要關掉的話,需要打開檔案總管 到目錄 C:\Windows\...
-
輸入格式:民國生日(可以自動判斷 6位或 7位數字) 輸出格式:西元生日、年齡、期間月數、期間日數 B2函數:=CONCATENATE(IF(LEN(A2)=6,LEFT(A2,2),LEFT(A2,3))+1911,"/",IF(LEN(A...
-
1. 打開 Google 試算表 2. 輸入以下公式 (1)、股名: = IMPORTXML ( "https://tw.stock.yahoo.com/quote/00679B" , "//*[@id='main-0-QuoteHeader...
-
長按RESET按鈕 1.確認路由器已通電。 2. 按住WPS / RESET按鈕(超過10秒鐘),直到SYS LED燈從慢速閃爍變為快速閃爍,接著鬆開按鈕,重新啟動即可恢復預設值。 3. 預設的IP位址/網域可以在產品的底部標籤找到,預設登錄用戶名和密碼都是admin(全部小寫)...
-
啟始資金:100萬 利率:2.5% 情況1:第一次質押 擔保品市值:100萬 利息:2083元/每月 借款金額(3成):30萬 維持率:100/30 x 100% = 333.33% 最大借款金額(6成):60萬 最低維持率:100/60 x 100% = 166.6...
-
利用計時器可以做許多功能, 例如: 1. 鬧鐘功能 2. 倒數計時(計算與目標時間或日期的差距) 3. 碼表功能 4. 運動賽事計分功能