vba對excel加密
1. excel2010vba加密的方法
在 Excel 中除了可以利用設置外還可以利用VBA編程進行加密,利用VBA編程可以令加密更加嚴謹,下面是由我分享的excel2010 vba加密的 方法 ,希望對你有用。
excel2010 vba加密的方法利用VBA加密步驟1:對想發布自己的Excel VBA的開發者來說,Excel VBA本身不提供VBA代碼的加密,封裝。目前比較最可靠的Excel VBA代碼加密的方法,就是把VBA代碼編譯成DLL(動態鏈接庫文件),在VBA中調用,從而實現VBA代碼的加密,封裝,方便和Excel文件整合發布出去。DLL文件基本沒法被破解,除此之外其他的VBA加密方法,都可以被輕易破解。用戶只需要你的Excel文件,和這個dll文件就夠了,不必安裝其他任何程序。
利用VBA加密步驟2:編譯成DLL文件其實很簡單。機子上安裝Visual Basic 6.0就可以編譯成dll文件了,Visual Basic .Net反倒有點麻煩。Visual Basic通過OLE(對象鏈接引擎)技術調用Excel以及其中的對象。
利用VBA加密步驟3:總的來說,VBA代碼只要做一些簡單修改就可以了。主要是對Excel對象的引用,不然VB不能識別vba代碼中的對象。比如如下的VBA代碼
windows(workbook1).activate
range("L50")=1
直接放進VB中編譯成Dll就會有問題,因為VB不能直接識別range對象。
需要添加幾行簡單的代碼來告訴vb怎麼引用excel中的這些對象:
dim xlapp as excel.applicatiion
dim xlbook as excel.workbook
dim xlsheet as excel.worksheet
set xlapp=getobject(,"excel.application)
set xlbook=getobject(xxx)
set xlsheet=xlbook.worksheets(1)
利用VBA加密步驟4:然後就照搬你原有的vba代碼,但是前面加上對象引用:
xlsheet.range("L50")=1
利用VBA加密步驟5:對VBA代碼做這樣修改,在VB中調試通過,就可以成功的把多個sub子程序全部編譯封裝在一個單獨的DLL文件了。以後直接在VBA中引用這個DLL文件中的各個sub子程序。原來大段的VBA代碼全部被封裝在DLL文件中,對用戶不可見。
利用VBA加密步驟6:開發者還可以在程序運行前顯示軟體的版權信息,設置密碼。因為這些也封裝在DLL文件中,所以用戶沒法破解。
EXCEL中如何控制每列數據的長度並避免重復錄入1、用數據有效性定義數據長度。
用滑鼠選定你要輸入的數據范圍,點"數據"->"有效性"->"設置","有效性條件"設成"允許""文本長度""等於""5"(具體條件可根據你的需要改變)。
還可以定義一些提示信息、出錯警告信息和是否打開中文輸入法等,定義好後點"確定"。
2、用條件格式避免重復。
選定A列,點"格式"->"條件格式",將條件設成“公式=COUNTIF($A:$A,$A1)>1”,點"格式"->"字體"->"顏色",選定紅色後點兩次"確定"。
這樣設定好後你輸入數據如果長度不對會有提示,如果數據重復字體將會變成紅色。
2. 如何用vba代碼設置excel保護密碼
代碼中,只是關閉了一個excel文件。
事實上,應該關閉整個excel軟體。
vba代碼可以修改為:
sub
完成工作()
activeworkbook.save
thisworkbook.application.quit
'或者application.quit
end
sub
即可。
3. 怎麼給excel vba編輯器加密
不用代碼
VBA中---工具---VBAproject屬性----保護---查看時鎖定工程(選中)---設好密碼---保存退出---再進就會如你所願了
4. 如何給EXCEL里的宏加密碼
1、首先打開需要設置加密碼的表格,進入到EXCEL表格裡面之後,打開VBE編輯器。
5. EXCE如何用VBA代碼加入啟動時對所有工作表加密,並設指定密碼
通過代碼對excel代碼進行加密即可:
1、打開您需要破解保護密碼的Excel文件;
2、依次點擊菜單欄上的工具---宏----錄制新宏,輸入宏名字如:aa;
3、停止錄制(這樣得到一個空宏);
4、依次點擊菜單欄上的工具---宏----宏,選aa,點編輯按鈕;
5、刪除窗口中的所有字元(只有幾個),替換為下面的內容;
Sub添加密碼()
DimxAsInteger
Forx=1ToSheets.Count
Sheets(x).Protect"123"
Nextx
hisWorkbook.Protect"123"
6. 如何用vba對excel表有內容的加密空單元格可以使用
用vba可以實現
依次打開:工具-宏-visual bisic編輯器,打開vba編輯器,在左側工程中雙擊你要保護的工作表,然後將下列代碼粘貼到編輯窗口中:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell < Then
If InputBox(請輸入修改密碼:, 密碼) = abc ThenEndElseMsgBox 密碼錯誤
ActiveWorkbook.Close savechanges:=FalseEnd IfEnd IfEnd Sub以後只要單元格中已經存在數據,你選擇了該單元格就會要求輸入密碼,如果輸入密碼錯誤就會退出該工作簿,並且不進行保存。所以你要隨時保存文件^-^
將上面的abc改成你自己的密碼就可以了。
不過這個密碼沒有進行加密(別人很容易看到你輸入的密碼),如果你會vba你可以自己新建一個窗口,用文本框輸入,將文本框的「passwordchar」屬性設置成「*」號,就更好了,然後用if判斷改文本框的text屬性就可以了。
把上面的代碼改成:
7. 給Excel2007 VBA代碼加密的方法
方法/步驟
1、打開Excel2007啟用宏的Excel文件
2、同時按下ALT+F11鍵,打開VBA編輯器窗口。
3、查看對應的代碼窗口,左側VBA工程
PROJECT屬性框中對應相應的SHEET表或者模塊。
4、點擊對應的SHEET表或者模塊名稱,滑鼠右鍵放在其上,選擇VBAPROJECT屬性。
5、在彈出的VBAPROJECT工程屬性窗口中-保護選項卡-選中查看時鎖定工程,“查看工程屬性的密碼”內輸入自己要設定的密碼。
6、點擊確認,然後點擊文件工具欄內的保存按鈕。
7、下次打開Excel文件時再同時按下ALT+F11進入VBA代碼編輯器,滑鼠左鍵雙擊左側VBA工程中的VBAPROJECT文件名稱,彈出VBAPROJECT密碼輸入窗口,輸入密碼才可進入,否則無法查看工程密碼,呵呵。
8. 用vba對excel加密怎麼破譯
關於破解EXCEL VBA工程密碼的方法,以下代碼非常有效,首先建一新EXCEL文件,在工作表標簽處右點>>查看代碼>>復制以下代碼>>按F8執行在彈出窗中選你要你破解工程密碼的EXCEL文件 >>再按F5執行即可. Private Sub VBAPassword()'你要解保護的Excel文...