[[20061207173118]]　『caseで、複数のセルの値を条件にするには？』（ポチョムン）　ページの最後に飛ぶ

『caseで、複数のセルの値を条件にするには？』（ポチョムン）

すいません！お助け下さい。
VBA超初心者です。。。

Cells(7, 11)="a" and Cells(7, 12)="b"　ならば

 処理１
 Cells(7, 11)="a" and Cells(7, 12)="c"　ならば
 処理２
 Cells(7, 11)="b" and Cells(7, 12)="a"　ならば
 処理３
 Cells(7, 11)="b" and Cells(7, 12)="b"　ならば
 処理４
・
・
・
 このようなかんじで条件がたくさんあるのですが,
 これをcase文でするにはどうすればよいでしょうか？
 よろしくおねがいします＞＜

 一例ですが、↓こんな感じでうまくいきますか？
　
 Select Case Cells(7, 11).Value & Cells(7, 12).Value
   Case "ab"
      処理１
   Case "ac"
      処理２
   Case "ba"
      処理３
   Case "bb"
      処理４
　
（純丸）(o^-')b

 こんなコーディングで私はよく対応しています(^_^;)。

 Select Case True
   Case Cells(7, 11)="a" and Cells(7, 12)="b"
        処理１
   Case Cells(7, 11)="a" and Cells(7, 12)="c"
        処理２
   Case Cells(7, 11)="b" and Cells(7, 12)="a"
        処理３
   Case Cells(7, 11)="b" and Cells(7, 12)="b"
        処理４
 End Select

 (HT)

 どちらの方法でもできました＾＾
 （純丸）さんの方は条件とするセルが決まっていると向いていますね。
 (HT)さんの方は条件がばらばらでも対応できますね。
 今回の私のケースの場合、セルが決まっているので（純丸）さんの方法で
 やりたいと思います～

 どうもありがとうございました！

コメント返信：

[ 一覧(最新更新順) ]

[[20061207173118]] 『caseで、複数のセルの値を条件にするには？』（ポチョムン） ページの最後に飛ぶ

[[20061207173118]]　『caseで、複数のセルの値を条件にするには？』（ポチョムン）　ページの最後に飛ぶ