我用VBA做的程序在打开时隐藏EXCEL程序,只显示窗体,但打开其他EXCEL表格时,程序的父对象又被显示了
请问如何实现:我做的VBA程序只隐藏自己的EXCEL程序,与别的EXCEL表格无关,更不能因为打开其他EXCEL而把自己的EXCEL程序展现了...
请问如何实现:我做的VBA程序只隐藏自己的EXCEL程序,与别的EXCEL表格无关,更不能因为打开其他EXCEL而把自己的EXCEL程序展现了
展开
4个回答
展开全部
VBA里面可以将工程加密,打开VBA代码就需要密码才能看到
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
可以将VBA保存成 加载宏 .xlam 或 .xla 在其他Excel中可以加载此项,但不会出现此项的窗口(表格). 你里面写的 函数、方法等可以在别的Excel中使用。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
为什么不把你的代码贴出来让大家看看?
一、在thiswork的代码中写入代码:
Private Sub Workbook_Open()
Windows(ThisWorkbook.Name).Visible = False'工作薄打开时就隐藏工作薄窗体
Frm.Show 0 '显示用户窗体
End Sub
二、在用户窗体Frm中通过控件控制工作薄窗体的显示或隐藏,例如我添加了三个按钮,代码如下:
Private Sub ShowBookWndBtn_Click()
Windows(ThisWorkbook.Name).Visible = True '显示工作薄窗体
End Sub
Private Sub HideBookWndBtn_Click()
Windows(ThisWorkbook.Name).Visible = False '隐藏工作薄窗体
End Sub
Private Sub ExitBtn_Click()
ThisWorkbook.Save
ThisWorkbook.Close
Unload Me
End Sub
一、在thiswork的代码中写入代码:
Private Sub Workbook_Open()
Windows(ThisWorkbook.Name).Visible = False'工作薄打开时就隐藏工作薄窗体
Frm.Show 0 '显示用户窗体
End Sub
二、在用户窗体Frm中通过控件控制工作薄窗体的显示或隐藏,例如我添加了三个按钮,代码如下:
Private Sub ShowBookWndBtn_Click()
Windows(ThisWorkbook.Name).Visible = True '显示工作薄窗体
End Sub
Private Sub HideBookWndBtn_Click()
Windows(ThisWorkbook.Name).Visible = False '隐藏工作薄窗体
End Sub
Private Sub ExitBtn_Click()
ThisWorkbook.Save
ThisWorkbook.Close
Unload Me
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询