VBA打开/关闭某些层
你好我想在包含文本“AL-”的图形中打开和关闭图层（因此请关闭所有包含此文本的图层）
是的，我知道，一个简单的宏要容易得多，但我希望它在VBA8中）
我正在使用基于代码的层系统。当我有这个代码时，我可以计算出所有代码。
顺便说一句，这是一个切换按钮（绿-红）。我已经有了这个代码：
Private Sub tgl_AL_Click()
If ActiveControl.Value = True Then
Me.ActiveControl.BackColor = &HFF&
Else
Me.ActiveControl.BackColor = &HC000&
End If
End Sub
已经谢谢了！！
页:
[1]