EXCEL登录界面vbs代码
Set objExcel = CreateObject("Excel.Application")
objExcel.Visible = true
objExcel.UserControl = True
objExcel.Interactive = False
objExcel.DisplayAlerts = False
strPassword="123456" '定义密码变量,自行修改为你要设置的密码,这里是123456
If Not strPassword="" Then '如果定义了密码变量,则执行以下代码 objExcel.Workbooks.Open "C:\test\test1.xls", , , , strPassword, strPassword End If
创作工场
免责声明:
以上内容除特别注明外均来源于网友提问,创作工场回答,未经许可,严谨转载。
点击这里>>使用🔥专业版,更聪明、更完整、更原创!