当前位置:首页 » 密码管理 » 加载宏如何设置密码

加载宏如何设置密码

发布时间: 2022-04-22 02:32:58

① 如何对Excel内的宏设置密码

设置打开密码只有以下两句就好了
ActiveWorkbook.Password = "tt"
ActiveWorkbook.WritePassword = "yy"

对于保护密码设置可以参考如下内容。

对Excel工作表实现口令保护利用VBA调用Worksheet对象的Protect方法对工作表进行保护。
Protect带有以下参量:Password 用于保护工作表的口令。Drawingobjects 若为True,则对工作表中的Drawingobjects对象进行保护,缺省值为True。Contents 若为True,则对单元格内容进行保护,缺省值为True。下面程序代码完成对工作表“基础数据表”的保护:

Sub 保护工作表()
Worksheets(〃基础数据表〃).Protect Password:="1234"
End sub

对工作表实现隐藏保护,使他人无法看到工作表:利用VBA设置Worksheet对象的Visible属性来隐藏工作表;Visible属性的值为以下三个值中的一个:

True 工作表为显示状态。
False 工作表为隐藏状态。
XlVerHidden 工作表为隐藏状态,且用户不能通过“取消隐藏”对话框将其改为显示状态。当Visible的值为XlVerHidden时,只能利用VBA将其重新设置为True。

Sub 隐藏工作表()
Worksheets("基础数据表").Visible=False
End sub

② 数控机床宏程序密码哪里设置

程序:
修改参数3202#4 改为1 保护9000-9999
修改参数3202#0 改为1 保护8000-8999
修改3210的值就可以设置密码 在3211里输入跟3210一样的密码才可以修改3020为0或1
参数:

③ 如何设置EXCEL中宏的运行密码

打开excel,“ALT+F11”,在打开的页面,工具-VBAProject属性(E),保护选项卡,勾选查看时锁定工程,并输入打开密码,确定,保存。

④ excel中怎样让我加载的宏不被别人编辑和删除,和如何给宏加密

1、对工程点邮件,编辑属性,里面有保护和密码设置
2、设置工作表保护咯~

⑤ 如何修改通过宏加密文档的密码

要修改通过宏加密的Word文档的密码,用户可以按照以下方法来处理。

切换到【视图】选项卡中,单击【宏】组中的【宏】按钮,在弹出的下拉库中【查看宏】按钮,打开【宏】对话框。

在【宏名】文本框中单击【AutoPassWord】选项,然后单击“编辑”按钮。

在弹出的【Normal

NewMacros(代码)】窗口“代码”中的找到“.PassWord
=”和“.WritePassWord
=”,将其后面的数字或字符等修改为新的密码,保存后关闭此窗口。

单击【宏】对话框中的“运行”按钮即可。

⑥ word中如何用宏来设置密码保护的权限

首先打开需要加密的Word文档,选择“工具”菜单中的“选项”命令,在弹出的“选项”对话框中选择“保存”标签,分别在“打开权限密码”和“修改权限密码”框中输入密码(如图1),然后点击“确定”按钮退出,最后将该文档保存即可。注意:“打开权限密码”和“修改权限密码”可以相同也可以不同,设置“打开权限密码”是为了防止别人打开该文档,而设置“修改权限密码”是为了防止别人修改该文档,如果只设置“修改权限密码”,那么别人仍然可以打开该文档,但是如果不知道密码的话,并不能做任何修改。

⑦ 如何对excel中的宏设置密码保护

在单位经常是多个人共用一台电脑,这样一来,自己制作的Excel表格,不希望别人查看,我们可以为其设置密码。

1、启动Excel,打开相应的工作簿文档,执行“工具→选项”命令,打开“选项”对话框。
2、切换到“安全性”标签下,在“打开权限密码”右侧的方框中输入密码,按下“确定”按钮,再输入一次密码,确定返回。
3、保存一下文档。
经过这样设置后,如果需要打开该工作簿时,必须输入正确的密码,否则无法打开。

注意:打开“选项”对话框,切换到“安全性”标签下,把“打开权限密码”右侧的方框中的密码清除,确定返回,再保存一下文档,即可清除文档的密码。

1.在“文件”中选择“另存为” 2.在“另存为”对话框的右上角点“工具” 3.在“工具”下拉菜单中选择“常规选项” 4.在打开的对话框中输入密码,点“确定”即可。

⑧ excel新建宏时需要密码,怎么设置密码

不会吧,一是录制宏,二是直接按F11输入代码,都不需要设置密码。

⑨ 写好Excel宏怎么样加密

Excel表格是我们工作中经常用到的,而它往往涉及统计数据等敏感问题,因此,Excel表格的保护也是经常遇到的问题,如何安全使用Excel呢?我们常用到的是Excel“工具”菜单提供的“保护工作表”和“保护工作簿”功能。有没有其他方法呢?

用宏进行“显式”加密

在需要加密的Excel 表中,点击[工具]→[宏]→[Visual Basic编辑器],打开“工程资源管理器”,双击该工作表,在右边的是设置该表属性的编辑窗口,单击该窗口左上方的下拉列表框,选择Worksheet,再从该窗口右上方的列表框中选择Activate(激活)(如图)。

察看原图 发送到手机

添加如下代码:(假设“123”为密码,Sheet1为限制权限表格,Sheet2为工作簿中为任何适合的工作表)

Private Sub Worksheet_Activate()

Sheets("sheet1").Cells.Font.ColorIndex = 2 '设置文字颜色为白色

If Application.InputBox("请输入密码:") = 123 Then

Range("A1").Select

ActiveSheet.Cells.Font.ColorIndex = 56

' 设置文字颜色为黑色

Else

MsgBox "密码错误,即将退出!"

Sheets("sheet2").Select

End If

End Sub

每次当你选择该“加密”表的时候都会弹出对话框要求输入密码,正确则进入该表(Sheet1),否则会选择其他表(Sheet2)。

用宏进行“隐式”加密

“显式”加密,虽然可以让没有密码的使用者无法看到“加密”表格,但是每次选择该表格时都会弹出对话框,实在不方便而且给其他用户一种被防范的不舒服感觉。于是笔者就想出了下面的“隐式”加密方法。假如要加密的是Sheet1,我们可以设置在Sheet2的“A1”单元格为密码的输入处。于是修改以上代码如下:

Private Sub Worksheet_Activate()

Sheets("sheet1").Cells.Font.ColorIndex = 2'设置文字颜色为白色

If Sheets("sheet2").Cells(1, 1) = 123 Then

Range("A1").Select

ActiveSheet.Cells.Font.ColorIndex = 56

' 设置文字颜色为黑色

End If

End Sub

设置好以后,只有Sheet2的(A1)单元格为密码“123”时“加密”表Sheet1的内容才显示出来,否则就是透明的,神不知鬼不觉;所谓“隐式”。

“隐式”加密虽然保证了没有密码的用户不能查看“加密”表格的内容,但是不能保护其他用户对其进行修改。所以我们要综合运用上面所说的“保护表格”和“隐式加密”对要保密的表格进行设置。

⑩ 怎么设置Excel2003的宏的密码

打开VBA编辑器,插入用户窗体,设计好界面后,输入代码:
设置属性名称(Name)属性:
用于输入用户名的文本框:txtName
用于输入密码的文本框:txtPassword
确定按钮:btnLogin
退出按钮:btnExit
在窗体模块代码窗口输入:

Option Explicit '本句可有可无
'预存用户名和密码,可以使用其他方式实现
Private Const UserName As String = "UserName"
Private Const PassWord As String = "123456"
Private Sub btnExit_Click()
ThisWorkbook.Close False
End Sub
Private Sub btnLogin_Click()
If txtName.Text = UserName And txtPassword = PassWord Then
MsgBox "用户名或密码错误!请重新输入。"
txtName.SetFocus
Else
Unload Me
End If
End Sub

双击工程管理窗口的 ThisWorkBook 以打开编辑窗口,输入:
Option Explicit
Private Sub Workbook_Open()
frmLogin.Show 1
End Sub

保存后打开即可。不过必须允许运行宏

热点内容
电信路由器密码设置无线路由器怎么设置密码 发布:2024-05-18 10:55:00 浏览:647
安卓系统是属于哪个国家的手机 发布:2024-05-18 10:41:41 浏览:99
linux运维前景 发布:2024-05-18 10:24:44 浏览:658
c语言crc算法 发布:2024-05-18 09:59:03 浏览:644
linuxc编程视频 发布:2024-05-18 09:55:58 浏览:273
如何建造一个好的服务器 发布:2024-05-18 09:54:30 浏览:524
编译原理中的左结合 发布:2024-05-18 09:42:00 浏览:26
怎样加密路由器 发布:2024-05-18 09:41:55 浏览:605
百度云不能上传视频了 发布:2024-05-18 09:41:08 浏览:148
mac适合买大存储 发布:2024-05-18 08:30:08 浏览:583