プロが教えるわが家の防犯対策術!

(1)A2に数値が入った場合、A1には「1」
(2)A3に数値が入った場合は、A1には「2」
(3)A4に数値が入った場合は、A1には「3」

とするには、どうすればいいのでしょう?
(1)の数式は =IF(ISNUMBER(A2),1,"") ですが、
その後の(2)(3)が続けてどう入力すればよいのか分からなくて、、、
教えていただけますでしょうか?

A 回答 (4件)

 もし、A2~A4の範囲内の複数のセルに数値が入力された場合には、最も下の行を基準にA1セルに表示する数を決めるのでしたら、A1セルに入力する関数は、次の様なものになります。



=IF(COUNT(A2:A4),MATCH(9E+99,A2:A4),"")

 尚、もしも、A2~A4の範囲内に、9E+99以上の数値が入力される可能性がある場合には、上記の関数の中の9E+99の部分を、A2~A4の範囲内に入力される可能性がある最大の数値を、充分に超える数に、適時差し替えてるか、
或いは、A1セルに入力する関数を、次の様なものとして下さい。

=IF(COUNT(A2:A4),MATCH(MAX(A2:A4)+1,A2:A4),"")
    • good
    • 0
この回答へのお礼

お礼が遅くなり申し訳ございません。
また、説明が足りずに失礼致しました。

教えていただきました以下の関数で出来たのですが、
=IF(COUNT(A2:A4),MATCH(MAX(A2:A4)+1,A2:A4),"")

その後変更がありまして、A2:A4は続きではなく、読みたいセルはA2,A4,A6・・・A30までという具合に偶数行で飛び飛び(奇数行のセルには英数字が入る)になります。

A2_8桁の数字
A3_英数字
A4_8桁の数字
A5_英数字
A6_8桁の数字
A7_英数字


ので、教えていただいた関数を以下の様にしてみたのですが、上手くいきませんでした(泣
=IF(COUNT(A2,A4,A6),MATCH(MAX(A2,A4,A6)+1,A2,A4,A6),"")

スミマセンが、もう一度教えていただけますでしょうか。どうぞよろしくお願い致します。

お礼日時:2011/09/13 16:50

質問があいまい。


(1)(2)(3)を満たす場合、上の行を優先するのだろうか。
それに3つ(3セル)で限度なのかどうか。
こういう位置関係は関数ではうるさいのでユーザー関数を作ってみた。
(関数でも、同じ条件で答えは出るだろうが)
標準モジュールに
Function nump(a)
For Each cl In a
If cl <> "" And IsNumeric(cl) Then
nump = cl.Row - 1
Exit Function
End If
Next
End Function
と定義して
A1セルに =nump(A2:A5) のように入れる。
結果
4  <--A1
  <--A2セル
a
ff
6 <--A5セル
ーー
2列の範囲指定防止などコード上で、省いてあるがこのやり方では、3つまでの限度は無い。
数値セルで、上の行が優先。
    • good
    • 0
この回答へのお礼

お礼が遅くなりまして申し訳ございません。

また、説明が足りずに失礼致しました。

わざわざ作っていただきありがとうございました。

ただ「標準モジュールに~」の時点で分からなくて、、

どのようにすればよいのやら理解出来ませんでした。。

せっかく作っていただいたのにスミマセン。。

ありがとうございました。

お礼日時:2011/09/13 17:00

=IF(ISNUMBER(A2),1,IF(ISNUMBER(A3),2,IF(ISNUMBER(A4),3,"")))

    • good
    • 0
この回答へのお礼

お礼が遅くなりまして申し訳ございません。

A2に数字が入ると、A1は「1」と表示されましたが

A3以降がどうも上手く表示されなくて、、

こちらの説明が足りずに失礼致しました。

今回の件は解決致しましたが、また別の機会に

参考にさせていただきたいと思います♪

ご回答ありがとうございました。

お礼日時:2011/09/13 17:07

一例です。


複数セルに入力した場合が不明なので取り敢えず、各セルの重み加算しています。
=IF(COUNT(A2:A4),SUMPRODUCT((ISNUMBER(A2:A4))*{1;2;3}),"")
    • good
    • 0
この回答へのお礼

お礼が遅くなりまして申し訳ございません。

A2に数字が入ると、A1は「1」と表示されましたが

A3以降がどうも上手く表示されなくて、、

こちらの説明が足りずに失礼致しました。

今回の件は解決致しましたが、また別の機会に

参考にさせていただきたいと思います♪

ご回答ありがとうございました。

お礼日時:2011/09/13 17:09

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!