35pt
直接の回答ではないけど
http://briefcase.yahoo.co.jp/bc/mashigana1982/lst?.dir=/e0bc&...
の参考資料を持って行ってください。
だいたいやりたいことは同じです。
ただこれはランダムに問題を出題しているので検索ボックスとボタンかなんかを作れば良いと思いますよ。(参考にして作ってみてはどうでしょうか?)
出来ればコメントをオープンしてください。
というか私のよりよっぽどちゃんとしたのがありますね。
http://efcit.co.jp/navi/navi.cgi?mode=view&class=2
35pt
1件のみの問題が出ていいのなら、Match関数とIndex関数で実現できます。
利用者に区分を選択させて、その内容に応じた文字や数字を出すのにいつも使っています。
●Sheet1の内容
| A | B | |
|---|---|---|
| 2 | =IF(ISERR(FIND("A",Key,LEN(Key))),Key,LEFT(Key,LEN(Key)-1)) | ほげ |
| 3 | ||
| 4 | =MATCH("*" & keyword & "*",question,0) | =INDEX(answer,qNo,1)&" "&INDEX(answer,qNo,2)&" "&INDEX(answer,qNo,18) |
| 5 | =A4 | =INDEX(answer,qNo,3) |
| 6 | =A5 | =INDEX(answer,qNo,4) |
| 7 | =A6 | =INDEX(title,1,6)&" "&INDEX(answer,qNo,6) |
| 8 | =A7 | =INDEX(title,1,8)&" "&INDEX(answer,qNo,8) |
| 9 | =A8 | |
| 10 | =A9 | |
| 11 | =A10 | =IF(Key<>keyword,INDEX(answer,qNo,16),"") |
(A列をワークに使います)
●名前定義
key=Sheet1!$B$2
keyword=Sheet1!$A$2
qNo=Sheet1!$A:$A
title=Sheet2!$1:$1
answer=Sheet2!$A$2:$P$xxx(問題の最後まで)
question=Sheet2!$C$2:$C$xxx(問題の最後まで)
問題のところには、条件付書式で下記のように記載して他へもコピーしておく(#N/Aの表示を抑止)。
数式=ISNA(B4)→真ならフォントを白(背景色と同一色)
と、ここまで書いて気づいたのですが、中身はテキストボックスにしないといけないのですね?(周りを罫線で囲んでおくというのはなし?笑)
うーん、Excelの関数だけでは無理がある。マクロに譲ります。マクロ書く元気がなくなりましたので。。
たぶん、castironさんはマクロで記載してあると思います。
ちなみに、テスト問題データを生徒がテストでやるためのレイアウトに書き換えたいということでしょうか?
→ もし、そうなら人手でキーワード指定するのではなく、問題1から最終問題までを一気に作り出す方法が良さそうですね(不要分は予め削除)。
ご想像に近い用途なのですが、データの運用都合上どうしてもキーワードを必要としてまして、また、この仕事の為に割ける時間にも大きな制約があり、パソコンの知識もない状態なのでとても困ってます。
ご回答有難うございました。
参考にさせていただきます。
ご回答有難うございます。
いろいろ参考にさせていただきます。