ケースが選択されています。ケースは> 250、ケースは<など、VBAコード内のステートメントです。18.条件を満たすアイテムがある場合、その特定のアイテムを新しい範囲にペーストします。しかし、私はオーストラリア（NSW、VIC、QLD、WA、SA、NT、ACT、TAS）の州を含むコラムを持っています。これらはすべて問題ありませんが、状態ではないテキストがある場所に時間がある場合は、コピーして新しい範囲に貼り付けることもできますが、そのテキストの内容はわかりません。したがって、ケースは（オーストラリアの州でない場合）アイテムを新しい範囲にコピーするというコードが必要です。'条件が複数ありません' VBA
アイデア？ステートメントがかなり変更されなければ、コピーと貼り付けを行うセクションがあります。
オーストラリアまたはすべてのシートの本物の状態をすべて含む列がある場合は、if..then..else case文を使用してその範囲を参照できます。そうすれば、新しい範囲のテキストをコピーすることができます。
Select Caseを実装する反対のロジックを使用することができます。
Select Caseにすべての値を設定し、その基準を満たしていない場合は何もしないで、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
私は拘束されていませんが、喜びはありませんでしたが、私は<> "状態"を使用しようとしましたが、それは単に私がリストしたすべての状態を返します。 –
なぜあなたは 'case else'を使用できないのですか？ – jamheadart