表計算一筆書き、
「コスモス」
http://kumapooh.justblog.jp/blog/2007/10/post_6d9a.html#comments
の悪児解答です。
皆さんと同じだと思いますが・・・(^^)(^^)
三四郎43
=If(Ip(SumSq(6-Row(A1),6-Col(A1))/5)=5,"*")
Excel45
=LEFT("*",INT(SUMSQ(6-ROW(),6-COLUMN())/5)=5)
日 | 月 | 火 | 水 | 木 | 金 | 土 |
---|---|---|---|---|---|---|
1 | 2 | |||||
3 | 4 | 5 | 6 | 7 | 8 | 9 |
10 | 11 | 12 | 13 | 14 | 15 | 16 |
17 | 18 | 19 | 20 | 21 | 22 | 23 |
24 | 25 | 26 | 27 | 28 | 29 | 30 |
31 |
エクセル、三四郎ともに同じでした。
しかし三四郎43は2種類作りました。
投稿情報: くまぷー | 2007/10/27 20:17