谁知道VBA里如何使用外接程序管理器？

今天宠物迷的小编给各位宠物饲养爱好者分享vba 设置打开密码的宠物知识，其中也会对谁知道VBA里如何使用外接程序管理器？(vba调用其他模块)进行专业的解释，如果能碰巧解决你现在面临的宠物相关问题，别忘了关注本站哦，现在我们开始吧！

谁知道VBA里如何使用外接程序管理器？

使用外接程序管理器对工程可以添加或删除外接程序，从“外接程序”菜单可以对其进行访问。“外接程序管理器”对话框列出可用的外接程序。要安装外接程序，请按照以下步骤执行：从“外接程序”菜单，选取“外接程序管理器”。 从列表中突出显示一个外接程序并单击“加载行为”中想要的行为。要卸栽一个外接程序或阻止其加载，请清除所有的“加载行为”框。 当做完选定操作后，选取“确定”。 按照您“加载行为”的不同选择，Visual Basic 连接被选定的外接程序，断开与被清除的外接程序的连接。Visual Basic 保存在编辑会话期间的外接程序选定。

excel vba 打开设置密码问题

Excel中VBA设置密码的步骤如下： 1.右键点击任何工作表，选择VBAProject属性； 2.在新对话框总，选择“保护”选项卡： 3.勾选查看时锁定，输入密码即可。

Excel vba 忘了密码 怎么办

1、首先，如果文件格式是Excel 2010版（.xslm），需要先打开Excel文件，另存为2003版格式（.xls）。 2、然后用普通的文本编辑器（这里用的是NotePad++）打开这个文件，注意文件类型选“所有文件”。 3、然后在文件里查找“DPB"，把它改成“DPx”。注意大小写。 4、保存修改。然后用Excel重新打开这个文件。你会遇到一些错误，忽略它们。 5、然后进入Excel的“开发工具”面板，选择“Visual Basic”。又会有一系列错误，忽略它们，知道VBA项目打开。 6、这时候已经可以查看VBA代码了。如果想改变甚至去除原来的密码，继续看。从VBA编辑器的“工具”菜单，选择“VBA工程属性...“，然后转到”保护“面板。 7、在密码框中输入新密码。保存VBA文件和Excel文件，关闭Excel。重新启动Excel并重新打开这个文件，然后进入"开发工具"->"Visual Basic"，会提示输入密码。输入新设置的密码。 8、然后回到VBA编辑器的“工具”->"VBA工程属性"->“保护”，去掉密码以及保护选项前面的标记。最后保存文件即可。

“excel vba”用户名和密码**是多少？

以下是我写的一个从Sheet1的A2:B6这个范围查找用户名和密码进行验证的逻辑，你看看吧．
如果还有不懂，再问吧．

Public Sub aaaaaaaa()
Dim inName As String '输入用户名
Dim inPwd As String '输入密码
Dim rightPwd As String '检索到的密码
inName = "user01" '测试用户名
inPwd = "pwd09" '测试密码

On Error Resume Next
'根据用户名检索正确密码
rightPwd = WorksheetFunction.VLookup(inName, Sheet1.Range("A2:B6"), 2, False)
If rightPwd "" And rightPwd = inPwd Then
MsgBox "正确"
Else
MsgBox "错误"
End If

End Sub

VBA中用shell语句打开网页后怎样输入账号和密码

可以通过WebBrowser控件的使用实现该功能
以下实例打开百度，在输入框输入“aaa”
Public Sub useie()
'引用Microsoft Internet Controls
Dim IE
On Error Resume Next
Set IE = CreateObject("InternetExplorer.application")
IE.Visible = True

IE.Navigate URL:="https://www.baidu.com/"
timeie = DateAdd("s", 20, Now()) '等待20s
Do While IE.Busy And Not IE.ReadyState = READYSTATE_COMPLETE
DoEvents
If timeie < Now() Then
MsgBox “无法连接重新执行”
IE.Quit
Exit Sub
End If
Loop

IE.Document.getElementById("kw").Value = "aaa"
Set IE = Nothing
Set ID = Nothing
End Sub

WebBrowser控件的使用
0、常用方法
Navigate(string urlString):浏览urlString表示的网址
Navigate(System.Uri url)：浏览url表示的网址
Navigate(string urlString, string targetFrameName, byte[] postData, string additionalHeaders): 浏览urlString表示的网址，并发送postData中的消息
//（通常我们登录一个网站的时候就会把用户名和密码作为postData发送出去)
GoBack()：后退
GoForward()：前进
Refresh()：刷新
Stop()：停止
GoHome()：浏览主页
WebBrowser控件的常用属性：
Document：获取当前正在浏览的文档
DocumentTitle：获取当前正在浏览的网页标题
StatusText：获取当前状态栏的文本
Url：获取当前正在浏览的网址的Uri
ReadyState：获取浏览的状态
WebBrowser控件的常用事件：
DocumentTitleChanged,
CanGoBackChanged,
CanGoForwardChanged,
DocumentTitleChanged,
ProgressChanged,
ProgressChanged

1、获取非input控件的值：
webBrowser1.Document.All["控件ID"].InnerText;
或webBrowser1.Document.GetElementById("控件ID").InnerText;
或webBrowser1.Document.GetElementById("控件ID").GetAttribute("value");

2、获取input控件的值：
webBrowser1.Document.All["控件ID"].GetAttribute("value");;
或webBrowser1.Document.GetElementById("控件ID").GetAttribute("value");

3、给输入框赋值：
//输入框
user.InnerText = "myname";
password.InnerText = "123456";
webBrowser1.Document.GetElementById("password").SetAttribute("value", "Welcome123");

4、下拉、复选、多选：

//下拉框：
secret.SetAttribute("value", "question1");
//复选框
rememberme.SetAttribute("Checked", "True");
//多选框
cookietime.SetAttribute("checked", "checked");

5、根据已知有ID的元素操作没有ID的元素：
HtmlElement btnDelete = webBrowser1.Document.GetElementById(passengerId).Parent.Parent.Parent.Parent.FirstChild.FirstChild.Children[1].FirstChild.FirstChild;

根据Parent,FirstChild,Children[1]数组，多少层级的元素都能找到。

6、获取Div或其他元素的样式：
webBrowser1.Document.GetElementById("addDiv").Style;

7、直接执行页面中的脚本函数，带动态参数或不带参数都行：
Object[] objArray = new Object[1];
objArray[0] = (Object)this.labFlightNumber.Text;
webBrowser1.Document.InvokeScript("ticketbook", objArray);
webBrowser1.Document.InvokeScript("return false");

8、自动点击、自动提交：
HtmlElement btnAdd = doc.GetElementById("addDiv").FirstChild;
btnAdd.InvokeMember("Click");

9、自动赋值，然后点击提交按钮的时候如果出现脚本错误或一直加载的问题，一般都是点击事件执行过快，这时需要借助Timer控件延迟执行提交按钮事件：

this.timer1.Enabled = true;
this.timer1.Interval = 1000 * 2;
private void timer1_Tick(object sender, EventArgs e)
{
this.timer1.Enabled = false;
ClickBtn.InvokeMember("Click");//执行按扭操作
}

10、屏蔽脚本错误：
将WebBrowser控件ScriptErrorsSuppressed设置为True即可

11、自动点击弹出提示框：

private void webBrowser1_Navigated(object sender, WebBrowserNavigatedEventArgs e)
{
//自动点击弹出确认或弹出提示
IHTMLDocument2 vDocument = (IHTMLDocument2)webBrowser1.Document.DomDocument;
vDocument.parentWindow****cScript("function confirm(str){return true;} ", "javascript"); //弹出确认

EXCEL中的宏命令设置了密码，如何打开？

1、首先点击宏锁定的文件，此时文件呈现半透明状态，选择EXCEL选项。 2、在弹出的对话框内选择信任中心。 3、点击信任中心设置，进入下一个对话框。 4、点击宏设置，而后选择启用所有宏。 5、点击个人信心，在保存时删除个人隐私那里不要勾选，至此全部设置完成，即解除了宏命令设置的密码。 6、就可以重新打开文件。

请问在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属性——保护，输入密码防止宏被删就行。

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

Sub auto_open()
Dim Password As String
Dim i As Integer
For i = 1 To 3
Password = InputBox("请输入密码：")
If Password = "123456" Then '设置密码
MsgBox ("欢迎")
Exit For
ElseIf i < 3 Then
MsgBox "请输入正确密码," & "你还有" & 3 - i & "次输入机会。"
Else: MsgBox ("密码错误，即将关闭")
Application.Quit
End If
Next
End Sub
复制代码进C:\Users\Administrator\AppData\Roaming\Microsoft\Excel\XLSTART的启动表中可以对电脑中所有工作簿加密。
望测试，并采纳~