我有一个Select Case，Case是我的VBA代码中的语句，例如Case is＆gt; 250或案例是＆lt; 18.当符合该条件的项目时，我的代码会复制该特定项目并将其粘贴到新范围。但是我有一个包含澳大利亚州（NSW，VIC，QLD，WA，SA，NT，ACT，TAS）的专栏。所有这些都没问题，但是如果时间到来的地方有文字不是状态，我想复制并粘贴到新的范围，但我不知道那个文本是什么。因此，我需要一个代码说，Case是（如果不是澳大利亚州）复制项目到新范围。
有什么想法吗？我有一个部分可以复制并粘贴好，除非声明必须改变很多。
答案 0 :(得分：0)
如果您的列包含澳大利亚的所有真实状态或任何工作表，您可以尝试使用if语句中的if..then..else来引用该范围。这样您就可以复制新范围内的文本。
答案 1 :(得分：0)
您可以使用实现Select Case的相反逻辑。
将所有值放在Select Case中，如果符合该条件则不执行任何操作，并执行复制＆gt;＆gt;粘贴到Case Else部分。
Select Case Aust_States ' let's assume this is your variable for Australia States
Case "NSW", "VIC", "QLD", "WA", "SA", "NT", "ACT", "TAS"
' do nothing
Case Else
' do your copy>>paste here
End Select