[[20080129111529]]　『頭文字について』（パンパン）　ページの最後に飛ぶ

『頭文字について』（パンパン）

  A 　　　B　　　 C
1頭文字　氏名　＊＊＊
2さ　　　佐藤
3　　　　斉藤
4し　　　篠田
5　　　　篠山
 以下続く
 でセルA2に関数でB2の頭文字を入れることは可能でしょうか、
 それと五十音で最初の所だけ表示したいのですが、
 「さ行」であれば最初の人だけで、次に「し」が来ますが「し行」も
 同じく最初だけなのですが、よろしくご教授お願いいたします。

 参考でよければ･･･
 A1 =LEFT(PHONETIC(B1))
 A2 =IF(LEFT(PHONETIC(B1))=LEFT(PHONETIC(B2)),"",LEFT(PHONETIC(B2)))
 でA2を下にコピー。
 片仮名になっちゃうのは御愛嬌ということで･･･

 他の方の回答を待って下さい。
 （通）

 B列を
 「書式」→「ふりがな」→「設定」→「ひらがな」
 にするとひらがなになりました。
 バージョンとか違ったら違うかもですが。

 （ま～にゃん）

 レイアウトがこんな感じなら

     Ａ　　Ｂ
 1
 2　索引　　名前
 3　　　　名前読み（全角カタカナ）
 4　　　　名前漢字
 5　　　　名前読み
 6　　　　名前漢字

 A3に
 =IF(NOT(ISBLANK(B3)),LEFT(B3,1),"")

 A5に（長いので適当に改行してあります。
 =IF(OR(AND(CODE(B5)>=9516,CODE(B5)<=9538),AND(CODE(B5)>=9551,CODE(B5)<=9552),
 AND(CODE(B5)>=9557,CODE(B5)<=9558),AND(CODE(B5)>=9563,CODE(B5)<=9564)),
 IF(MOD(CODE(B5),2)=0,IF(ISERROR(MATCH(CHAR(CODE(B5)-1),$A$3:$A4,0)),
 CHAR(CODE(B5)-1),""),IF(ISERROR(MATCH(LEFT(B5,1),$A$3:$A4,0)),LEFT(B5,1),"")),
 IF(OR(CODE(B5)=9541,CODE(B5)=9543,CODE(B5)=9545,CODE(B5)=9555,CODE(B5)=9561),
 IF(ISERROR(MATCH(CHAR(CODE(B5)-1),$A$3:$A4,0)),CHAR(CODE(B5)-1),""),
 IF(OR(CODE(B5)=9553,CODE(B5)=9556,CODE(B5)=9559,CODE(B5)=9562,CODE(B5)=9565),
 IF(ISERROR(MATCH(CHAR(CODE(B5)-2),$A$3:$A4,0)),CHAR(CODE(B5)-2),""),
 IF(ISERROR(MATCH(LEFT(B5,1),$A$3:$A4,0)),LEFT(B5,1),""))))

 A5:A6を選択して下にフィル。
 昔書いた物で、うまい関数が解らなかったのでこんな感じになりました。
 現在でも考えるのが面倒なのでそのまま使ってます。
 また、ヴには対応してません。
 （入れ子の限界のため）

 書き忘れ、ソートしてあることが条件。

 作り直していたのを忘れていたので、解決後に用無しですが一応。
 =IF(ISNA(MATCH(JIS(LEFT(ASC(B5),1)),A$3:A4,0)),JIS(LEFT(ASC(B5),1)),"")
 (Jaka)

 ま～にゃんさん
 片仮名しか出来ないものと思っておりましたが、
 平仮名にもできるんですね！
 勉強になりました！＿〆＼(．．;) メモメモ
 （通）

ありがとうございました。やはりできるのですね、（通）サン（Jaka）サンありがとうございました今後もどうかご教授をお願いいたします。（パンパン）

コメント返信：

[ 一覧(最新更新順) ]

[[20080129111529]] 『頭文字について』（パンパン） ページの最後に飛ぶ

[[20080129111529]]　『頭文字について』（パンパン）　ページの最後に飛ぶ