导航:首页 > 电脑设置 > vba设置电脑用户密码

vba设置电脑用户密码

发布时间:2023-05-16 09:16:05

① Excel 怎么给VBA编辑器加设密码和取消密码

你好,最标准的方羡消法就是直接输入密码,然后解密,保存。
如果有宏代码的话:
1、录制宏吵卖,随便点下鼠标,然后停止。
2、打开
宏编辑器
,将你的VBA代码完全覆盖编辑器里刚录制的那些代码。
3、兄碰知打开需要去除保护的excel,按ALT+F8运行宏。大概10多秒吧,就好了。

如何用VBA打开网页并输入用户名和密码

1、首先打开电脑上的excel表格知族,然后告陪按alt+f11打开VBA界袜猛蠢面。

③ Excel 怎么给VBA编辑器加设密码和取消密码

你好,最标准的方法就是直接输入密码,然后解密,保羡消存。
如果有宏代码的话:
1、录制吵卖宏,随便点下鼠标,然后停止。
2、打开宏编辑器,将你的VBA代码完全覆盖编辑器里刚录制的那些代兄碰知码。
3、打开需要去除保护的excel,按ALT+F8运行宏。大概10多秒吧,就好了。

④ 用VBA如何实现用户登录,输入用户名和正确的密码才可以打开,请问程序该如何去写啊,跪求大家的帮助

1.VBA工程插入“模块”,添加 auto_open过程;
2.过程中加入代码,隐岩陵藏工作表。
3.弹出密码验证userform。
4.验证密码的准确性,执行打开或关闭。

具体代码如下:
Userform代码
Private Sub CommandButton1_Click() '验证密码粗嫌戚是不死1111
If TextBox1.Text = "1111" Then
Unload Me
Sheet1.Cells(1, 1).Select
End If
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, closeMode As Integer) ’关闭窗口自动关闭文件(不保存者含)
If closeMode = 0 Then
ThisWorkbook.Saved = True
ThisWorkbook.Close
End If
End Sub

模块1代码:
Private Sub auto_open()
Sheet1.Cells(65536, 1).Select ‘定位最下一行,起到隐藏表格内容的效果,当然方法有很多种,这个比较简单
UserForm1.Show
End Sub

⑤ 如何用VBA打开网页并输入用户名和密码

1、首先打开电脑上的excel表格,然后按alt+f11打开VBA界面。

⑥ excel VBA 密码设置问题

Excel中VBA设置密码的步骤如下:

1.右键点击任何工作表,选择VBAProject属余圆歼竖性;

⑦ EXCE如何用VBA代码加入启动时对所有工作表加密,并设指定密码

通过代码对excel代码进行加密即可:

1、打开您需要破解保护密码的Excel文件;

2、依次点击菜单栏上的工具---宏----录制新宏,输入宏名字如:aa;

3、停止录制(这样得到一个空宏);

4、依次点击菜单栏上的工具---宏----宏,选aa,点编辑按钮;

5、删除窗口中的所有字符(只有几个),替换野贺为下面的内容;

Sub添加密码()
Dim历脊信xAsInteger
Forx=1ToSheets.Count
Sheets(x).Protect"123"
Nextx
hisWorkbook.Protect"肢轮123"

⑧ 在哪里设置VBA编码的保护密码

操作步骤如下:

1.右键点击芦带有VBA代码的工作表,选择VBProject工程属性

⑨ 用VBA设置多个用户名和密码

不过用excel做的登录界面很容易就会被破解的,给不太懂的人用用还可以,呵呵.
就当作玩玩和学习吧.
有邮箱吗,我发一个给你
主要思路是:在open事件里面,把所有工作游乱孝表都深度隐藏,用户输入用户名神稿和密码后,就把与该用户相关的工作表取消隐藏,并保护工作薄,那么该陪碰用户没有密码就不能取消其它的工作表隐藏,就只能看到与自己相关的几个工作表了:
PrivateSubWorkbook_Open()

Windows(Windows.Count).Visible=True'是否起用宏,不启用宏就退出工作薄

OnErrorResumeNext

Application.ScreenUpdating=False

'ActiveWindow.WindowState=xlMinimized'最少化login窗口

CallUnProWB

ThisWorkbook.Worksheets("Login").CommandButton1.Visible=False

Worksheets("Login").Visible=True

ForEachshtInWorksheets

Ifsht.Name<>"Login"Thensht.Visible=False

Next

Application.ScreenUpdating=True

UserForm1.Show

CallProWB

EndSub

PrivateSubWorkbook_BeforeClose(CancelAsBoolean)

Windows(Windows.Count).Visible=False

EndSub

⑩ 请问在excel中怎么用vba设置开启密码

不怎么理解裤备你的意思啊,不过还是给出下面代码,供参考:
Private Sub Workbook_Open()
Application.Visible = False
a = InputBox("请输入密码:")
If a <> "abc" Then
ThisWorkbook.Close
Else
Application.Visible = True
End If
End Sub
‘===============================
’Application.Visible = False打开的时候隐藏excel表格
‘a = InputBox("请输入密码:")弹出输入密码框
’abc为设置的密码,可以改成你想要的
‘Application.Visible = True如果密码正确,恢复excel显示
’ThisWorkbook.Close如果密码不对,直接关闭该excel

另外你说的关闭宏,应该说的是删除宏,你可以按 alt+f11,调出vba编辑器,选工具——vbaproject属芦运性——保护,输入密码防止宏被删就行胡哗毁。

阅读全文

与vba设置电脑用户密码相关的资料

热点内容
群晖电脑系统图标不见了 浏览:727
电脑强力删除文件win10 浏览:978
苹果电脑键盘怎么换行 浏览:162
苹果手机软件充值能提现 浏览:126
平板电脑屏幕裂痕用什么修复 浏览:133
手机app编程软件 浏览:710
苹果如何设置铃声不用电脑 浏览:691
新闻剪辑用的电脑软件 浏览:712
电脑上模拟器玩吃鸡为什么卡 浏览:291
mac电脑怎么提交qq文件作业 浏览:957
学习机电脑版软件 浏览:8
调音台如何输入回电脑音频 浏览:748
如何把电脑满屏 浏览:116
苹果客户管理软件 浏览:153
买电脑音响注意什么 浏览:686
安卓用什么电脑编程软件 浏览:428
电脑配置低下载电影到u盘 浏览:470
哪个品牌电脑内存好 浏览:23
win7电脑卡死按哪三个键 浏览:108
华硕电脑开机f9 浏览:175