抽選結果の桁別ビジュアル化

質問

どなたかご存じでしたら回答をお願いします。
数字選択式宝くじのナンバーズ３、ナンバーズ４の抽選結果をエクセルに登録しております。
【抽選結果（ナンバーズ３）】　
313
457
123
【抽選結果（ナンバーズ４）】
1133
8415
5551　

上記結果を見やすくするために桁別に３つに0～9にわけてその桁の抽選結果数字に該当すれば
「○」をつける方法が知りたいです。
また、桁毎に前回の抽選数字と今回の抽選数字を「結線」する方法もあれば教えてください。

【抽選結果（ナンバーズ３）】
N3　　　0 1 2 3 4 5 6 7 8 9　0 1 2 3 4 5 6 7 8 9　0 1 2 3 4 5 6 7 8 9
313　 　　 　 ○　　　　　　　　　○　　　　　　　　　　　　　　○　　　　　　　　　　　　 　　　　　　
457　　　　　　　○　　　　　　　　　　　　　○　　　　　　　　　　　　　　○
123　　　○　　　　　　　　　　　　　○　　　　　　　　　　　　　○
【抽選結果（ナンバーズ４）】
N4　　　0 1 2 3 4 5 6 7 8 9　0 1 2 3 4 5 6 7 8 9　0 1 2 3 4 5 6 7 8 9　0 1 2 3 4 5 6 7 8 9
1133　　○　　　　　　　　　　　　○　　　　　　　　　　　　　　○　　　　　　　　　　　○
8415　　　　　　　　　　　○　　　　　　　○　　　　　　　　○　　　　　　　　　　　　　　　○
5551　　　　　　　○　　　　　　　　　　　　○　　　　　　　　　　　　○　　　　　　○　

使用しているエクセルは2007です。
エクセル操作またはＶＢＡのソースで回答願います。

以上

回答No.3

kagakusuki · ベストアンサー

B2セルに次の関数を入力してから、B2ルをコピーして、B列～AO列の2行目以下に貼り付けて下さい。

=IF(MID($A2,ROUNDUP(COLUMNS($B:B)/10,0),1)=B$1&"","○","")

お礼

ご回答ありがとうございます。
またエクセルでの実際の結果添付重ねてありがとうございます。

回答No.2

MASUKUBO

A列の2行目からデータが入力されているとし、また、B1セルから右横には0，1，2，3・・・・と9までが繰り返して入力されているとしたらB2セルには次の式を入寮して右横方向にオートフィルドラッグしたのちに下方にもオートフィルドラッグします。

=IF(COLUMN(A1)>LEN($A2)*10,"",IF(MID($A2,ROUNDUP(COLUMN(A1)/10,0),1)*1=B$1,"○",""))

何ケタの数値にも対応することができます。

お礼

早速のご回答ありがとうございます。
何桁でも関係なくできるのはありがたいです。
試してみます。

回答No.1

noname#204879

添付図参照

「ナンバーズ３」の場合を示しておきます。

B2: =IF(MID($A2,CEILING(COLUMN(A1)/11,1),1)=B$1,"○","")

此れを参考に「ナンバーズ４」はご自分でどうぞ。
当選したときに半分の分け前をくれるなら教えます。(^_^)

お礼

さっそくのご回答ありがとうごじます。
早速、試してみます。