網路上有許多線上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\...
-
利用計時器可以做許多功能, 例如: 1. 鬧鐘功能 2. 倒數計時(計算與目標時間或日期的差距) 3. 碼表功能 4. 運動賽事計分功能
-
最近因為線上防疫課程的關係,需要大量使用相機,但一用才發現 Lenovo 筆電相機的問題很多。 網路上有非常多的討論串,如下: https://answers.microsoft.com/en-us/windows/forum/windows_10-hardware/lenovo...
-
1. 使用氣象局網站上的氣溫及降水量資料。 2. 圖表類型[ 組合圖 ] 3. [圖表序列]左右軸分開呈現, 左軸是氣溫 ,選用 折線圖 ; 右軸是降水量 ,選用 長條圖 。溫度區間,最小值-10,最大值30。 4. 資料標籤可以打開,這樣可以看得更清楚。 延伸閱讀: 如何抓取交...
-
匯款準備:臺灣需有同名的收款帳戶。 網頁操作位置可能有時會更改,需電詢嘉信的服務人員。 (009 1 415-667-8400) 免付費電話(00801-13-6758) 台灣時間:21:00 ~ 13:00 (星期一到星期五) 英文客服24小時,星期一到星期五。 1. 服務 ...
-
輸入格式:民國生日(可以自動判斷 6位或 7位數字) 輸出格式:西元生日、年齡、期間月數、期間日數 B2函數:=CONCATENATE(IF(LEN(A2)=6,LEFT(A2,2),LEFT(A2,3))+1911,"/",IF(LEN(A...
-
★ YAHOO finance API https://query1.finance.yahoo.com/v8/finance/chart/2330.TW?period1=0&period2=1549258857&interval=1d&events=hi...
-
步驟一:熟悉介面及操作,舞台背景可以改為黑色 步驟二:基本幾何圖形-正方形、三角形、五角形、正多邊形、多角芒星、圓形 步驟三:建立利用其他積木建立副程式的概念、加入迴圈、旋轉 步驟四:建立利用其他積木建立副程式的概念、加入迴圈、判斷 步驟五:...
-
當您開啟windows的word檔、excel檔案、或其他office 2003的相關檔案時,會出現office 2003的安裝畫面,並說找不到 sku011.cab,而產生讀取錯誤,下載以下的登錄檔,並且將它執行,就可以解決這個問題了。 下載登錄檔 相關連結: http://...