Elseif在Excel Makro(VBA)工作

时间:2016-10-13 09:21:29

标签: excel vba excel-vba

我的excel宏中有一点问题。

问题描述:

如果一个答案是使用的下拉菜单,我想创建一个隐藏/取消隐藏特殊表格的宏。

下拉菜单:

澳大利亚

奥地利

德国

如果他们中的一个选择,例如德国 - >与德国的表格应该取消隐藏,澳大利亚和奥地利的表格应该隐藏。

我尝试使用ElseIf命令:

a = Class_2()
# Meta_2.__call__() before creating an instance.
# Class_2.__new__() before creating instance.
# Class_2.__new__() returning instance.
# entering Class_2.__init__() for initialization.
# exiting Class_2.__init__().
# Meta_2.__call__() returning new instance.

b = Class_2()
# <class '__main__.Class_2'> singleton returning from Meta_2.__call__(), skipping creation of new instance.

c = Class_2()
# <class '__main__.Class_2'> singleton returning from Meta_2.__call__(), skipping creation of new instance.

a is b is c # True

错误是,每次德国工作表可见而其他人不在时,我选择的并不重要。

任何想法我的错误是什么?

此致

1 个答案:

答案 0 :(得分:2)

我想你忘记了不少“” 正如@Raph所说,选择案例更加清晰。

提示:始终使用Option Explicit,你会发现这一个!!!

提示2:您可以使用lcase()来比较不区分大小写的

Sub Choose_Country()
c2 = something I dare hope :D
select case c2
case "Germany"

Sheet8.Visible = True
Sheet9.Visible = False
Sheet10.Visible = False

case "Australia"

Sheet8.Visible = False
Sheet9.Visible = True
Sheet10.Visible = False

case "Austria"

Sheet8.Visible = False
Sheet9.Visible = False
Sheet10.Visible = True
case else
      msgbox "unknown country"
End select
End sub