1.还有就是宏能不能运行一遍就让他失效了。或者写一段代码让上面的代码失效。
我是的例子是 我在一张图片上加了代码,但点完第一次我就不想它再弹一个框出来了,可以吗?
2.宏和超链接有没有优先级的?我图片上有宏和超链接,但是每次点都是进入了超链接,宏功能没显示,什么代码能实现吗
3.我有 两张图片,两张都设置了宏,都是弹出一个框。能不能设置 先启用1号图片上的宏,如果我不启用一号图片的宏,二号图片上的宏不能启用。有什么代码能实现吗
‘看看行不行
Option Explicit
Dim flag1 As Boolean, flag2 As Boolean
'问题1:
Sub test1()
If flag1 Then Exit Sub
flag1 = True
MsgBox "只弹出一次"
End Sub
'问题2;电脑怎么判断你要执行宏还是超链接?建议取消超链接,由宏根据条件调用超链接
'问题3:
Sub 图片一宏()
flag2 = True
MsgBox "图片一宏"
End Sub
Sub 图片二宏()
If flag2 Then
flag2 = False '根据需要是否置false
MsgBox "图片二宏"
End If
End Sub追问
Option Explicit
Dim flag1 As Boolean, flag2 As Boolean
'问题1:
Sub test1()
If flag1 Then Exit Sub
flag1 = True
MsgBox "只弹出一次"
End Sub
'问题2;电脑怎么判断你要执行宏还是超链接?建议取消超链接,由宏根据条件调用超链接
'问题3:
Sub 图片一宏()
flag2 = True
MsgBox "图片一宏"
End Sub
Sub 图片二宏()
If flag2 Then
flag2 = False '根据需要是否置false
MsgBox "图片二宏"
End If
End Sub追问
Option Explicit
Dim flag1 As Boolean, flag2 As Boolean
这个在哪里输入
flag1 = True
是什么意思
过程的外部,你把所有东西复制到模块里测试就知道了,这些变量对于过程来说是全局变量。
温馨提示:答案为网友推荐,仅供参考