一、如果按钮是“提罩散咐交”功能的按钮,可以试试直接调用 Form 的 Submit 方法。
二、先找到按掘手钮的序号,按序号定位按物纯钮元素:
.Document.all.tags("A")(33).Click1、首先打开电脑上的excel表格,然后按alt+f11打开VBA界面。
2、接着选皮伏择工具按钮,选择引用,d出对话框选择Internet controls选项。
4、然后单击运行按钮。
5、运行后就可以看到网页打开,最后保存文件就完成了。
1.VBA工程插入“模块”,添加 auto_open过程;2.过者含程中加入代岩陵码,隐藏工作表。
3.d出密码验证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
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)