Excelの条件をおしえてください。

質問

Excel2003を使用しています。

A2からD10までデータがあるとします。

今、下記の式で使用しているのですが、"海外"　と　"あ"　の部分が、文字列のＡからＺのアルフアベットの６文字数で十種類以上に変わった場合（例えば、”ＥＯＦＬＫＭ

”　とか、”ＤＩＨＸＲＡ”）に、下と同じ内容の計算式にしたいのですが、ただ今回は、アルフアベット文字が入力されてることが認識されれば、６英文字が合致しなくて

もいいです。SUMPRODUCTでわワイルドカードが使えないと聞きましたが、それに変わる式を教えてください。ネットで調べましたがわかりませんでした。

宜しくお願いいたします。

=SUMPRODUCT((A2:A10="海外")*(C2:C10="あ"),D2:D10)

回答No.1

KURUMITO · ベストアンサー

数字やカナ文字が入っているばあには適用できないこともありますがアルファベットや漢字、ひらがななどが使われている場合でしたら次の式を使うことで可能でしょう。

例えばＡ列には6つのアルファベット文字が、Ｃ列には”あ”がある場合を合計するのでしたら次の式で良いでしょう。

=SUMPRODUCT(((LENB(JIS(A2:A10))-LENB(ASC(A2:A10)))=6)*(C2:C10="あ"),D2:D10)

つまりはＡ列の文字を全角にした時のバイト数と半角にした時のバイト数の差が6の時はアルファベットの文字が6つあることになります。ただし数値が混じっている場合でも同じ結果になりますので注意が必要ですね。実際のケースと照らし合わせて検討してみてください。

お礼

有難う御座いました。
思いどうりの結果になりました。

回答No.2

imogasi

質問の表現が判りにくい。
SUMPRODUCT関数を使っているのは別の場合でしょう。その例で持ち出さなくて良いのでは。無関係でしょう。却ってややこしく焦点がぼやける。
したいことだけ書くこと。
ーー
セルの値が
（１）アルファベット
（２）きっちり６文字
（３）アルファベット意外は混じらないこと
（４）アルファ別途は半角か全角か、大文字小文字は？
＞十種類以上に変わった場合
は「１０種類以上の決った綴り」の文字列にに限定するのか？であればVLOOKUP関数などがお勧め。
ーー
下記例示するが、もっと簡略な方法の回答がでれば、それによってください。
アルファベットか確認する関数はない。
ユーザー関数でも作るしかなかろう。
Function isalph(a)
For i = 1 To Len(a)
If Asc(Mid(a, i, 1)) >= 65 And Asc(Mid(a, i, 1)) <= 90 _
Or (Asc(Mid(a, i, 1)) >= 97 And Asc(Mid(a, i, 1)) <= 122) Then
Else
isalph = "err"
Exit Function
End If
Next i
isalph = "ok"
End Function
例データ
簡略のため４桁のチェックにして、半角英数（大文字・小文字）のみOK、にしています。
A列　　　B列　　　C列
AAAA ok
GHDJ ok
AAAA ok
１２３あｓ err err
ああ err err
12asd err err
aswert ok err
asDFG ok err
ＡＧＶＢ err err
wsdf ok
B2の式　=isalph(A2)
C2の式　=IF(AND(LEN(A2)=4,isalph(A2)="ok"),"","err")

お礼

有難う御座いました。