Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


49259 / 76732 ←次へ | 前へ→

【32390】Re:ユーザー定義関数で
回答  kobasan  - 05/12/13(火) 21:28 -

引用なし
パスワード
   ▼まさ さん 今晩は。

こんな感じでどうですか。

=comp(A1,B1,C1)

のようにして使ってください。

Function comp(r1 As Range, r2 As Range, r3 As Range)
  If (r1.Value - 1) * (r2.Value - 1) * (r3.Value - 1) = 0 And _
    (r1.Value - 2) * (r2.Value - 2) * (r3.Value - 2) = 0 Then
    comp = "○"
  Else
    comp = "×"
  End If
End Function


>セルに以下のようなデーター(左3列)があり、関数で処理したいのです。
>
>1    2    3   =関数()  →○
>3    8    0     々    →×
>2    10   1     々    →○
>6    1    2     々    →○
>−1   0    4     々    →×
>0    1    8     々    →×
>30   50   0   =関数()  →×
>
>概要として、左3列で同じ行に1と2があれば関数の結果が○
>そうでなければ×となるような関数を作りたいです。

0 hits

【32387】ユーザー定義関数で まさ 05/12/13(火) 20:31 質問
【32390】Re:ユーザー定義関数で kobasan 05/12/13(火) 21:28 回答
【32391】Re:ユーザー定義関数で ichinose 05/12/13(火) 21:43 発言
【32394】Re:ユーザー定義関数で まさ 05/12/13(火) 22:32 質問
【32401】Re:ユーザー定義関数で ichinose 05/12/14(水) 9:45 発言
【32479】Re:ユーザー定義関数で まさ 05/12/15(木) 18:39 質問
【32484】Re:ユーザー定義関数で kobasan 05/12/15(木) 21:24 発言
【32486】Re:ユーザー定義関数で ichinose 05/12/15(木) 22:27 発言

49259 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free