[[20171207124320]]　『特定のシート以外のみのデータを抽出したい＆NEXT』（まっくん）　ページの最後に飛ぶ

『特定のシート以外のみのデータを抽出したい＆NEXTの場所』（まっくん）

こんにちわ。

何度かお世話になっております、まっくんです。

ワークシートを連続して処理したいのですが、ワークシートがA～Dまであるとして、Aを除いてFor Each 処理のようなことをしたいと考えています。

なぜなら、Aは検索結果用のシートで、その検索対象（データ）が、シートB～Dに入っているからです。

すいませんが、もう一点あります。
For Each文で仮に以下のような処理があるとします。

For Each WS In Worksheets

    if A<>B then
        Next
    end if
    処理X
Next
イメージとしてはこのような感じなのですが、当然Nextが2つあるので動きません。
このようなパターンを回避する方法はあるのでしょうか？

抽象的ですいませんが、ご教授のほどをお願い申し上げます。

＜使用 Excel：Excel2010、使用 OS：Windows7 ＞

 Sub test()

     Dim WS As Worksheet

     For Each WS In Worksheets
         If WS.Name <> "A" Then
            処理X
         End If
     Next

 End Sub
（bi） 2017/12/07(木) 14:06

Sub main1()

    Dim WS As Worksheet
    For Each WS In Worksheets
        If WS.Name <> "A" Then
        'Aシート以外の場合に実施する処理
        End If
    Next WS
End Sub

Sub main2()

    Dim WS As Worksheet
    For Each WS In Worksheets
        If A <> B Then
        Else
        処理X
        End If
    Next
End Sub
（mm） 2017/12/07(木) 14:11

 >このようなパターンを回避する方法はあるのでしょうか？
 Ifステートメントの中はNextではなくExit Forを使ってみてくれ。
 Exit Forを使うとそこでForループを抜ける。
（ねむねむ） 2017/12/07(木) 14:15

早急なコメントありがとうございます！

すいません、おかげで解決いたしました。
誠にありがとうございました。
（まっくん） 2017/12/07(木) 15:44

コメント返信：

[ 一覧(最新更新順) ]

[[20171207124320]] 『特定のシート以外のみのデータを抽出したい＆NEXT』（まっくん） ページの最後に飛ぶ

[[20171207124320]]　『特定のシート以外のみのデータを抽出したい＆NEXT』（まっくん）　ページの最後に飛ぶ