Excel Maniacs

千葉県情報ネットワーク・成績一覧表対応サポートシステム （第５弾）

千葉県情報ネットワークの成績一覧表（CSVファイル）のデータを利用して各生徒の

備考欄に「皆勤」の文字を書き込むプログラムを作りました。

備考欄に既に何か書き込んである場合は文言の最後に「・皆勤」の文字が書き加えられます。

例えば既に「祖父死亡忌引１日」と入力されていると「祖父死亡忌引１日・皆勤」となります。

 

★皆勤の判定条件

１．各教科の欠時０

１．欠席・遅刻・早退全て０

１．総合・LHR欠時０

 

★使い方

１．千葉県の成績処理システムから成績一覧表.csvをダウンロードする。

２．エクセルで読み込む。

３．KAIKIN01.vbsファイルをダブルクリックする。

　　　　　　　　　　　　　　　　　　　　　　以上

 

KAIKIN01をダウンロード

 

英文整序問題作成VBS マイクロソフト・ワード対応

【´･ω･`】：学年主任のリクエストに応えて英文整序問題作成VBS（マイクロソフト・ワード対応版）を

　　　　　　作ったよ。

(●`ε´●)：前のKingSoft_Writer版をほんのちょっといじっただけだろ？！

【´･ω･`】：うん、ほとんど同じ。全然、手間はかかっていない。

　　　　　　だから、使い方も同じだ。例えば・・・

 

　　　　　　Live as if you were to die tomorrow.

 

　　　　　　・・・という英文の

 

　　　　　　Live as if you were to die tomorrow.

 

　　　　　　･･･出題部分をマウスで選択し（赤字の部分とすると）・・・

　　　　　　VBS（Word_Order15_05_03）ファイルをダブルクリックすると選択部分が

　　　　　　ランダムにシャッフルされて下のようになる。

                

                Live   <  1.  to / 2.  if / 3.  you / 4.  were / 5. as  >  die tomorrow.

 

  Word_Order15_05_03をダウンロード

-----------------------------------------------------------------------------------------------------------------

＊単語に番号が付かないものを追加します。

　下のようになります。　（2015/5/11）

Live <if/ die/ to/ as/ were/ you> tomorrow.

Word_Order15_05_11をダウンロード

 

教員時間割一覧から個票をつくる

(●`ε´●)：前回の連続印刷.vbsの使い方がイマイチよくわからん。

【´･ω･`】：わかった。具体例を示すよ。下のような教員時間割一覧から・・・

【´･ω･`】：下のような教員個人の時間割をつくる・・・

【´･ω･`】：基本的にはHLookUp関数でセルA１の数値を検索値にして時間割一覧から

　　　　　　データを引っ張ってきているだけだ。参考ファイルをアップしておくので詳細はダウンロードして

　　　　　　中身を見てほしい。

参考ファイル：教員時間割一覧をダウンロード

【´･ω･`】：各教員は３から６２の番号に対応している。セルA1の数字を変えれば、

　　　　　　それに対応した教員の時間割になるはずだ。

(●`ε´●)：おいら、６０回も数字を変えてシコシコ印刷するなんて絶対やだぜ！！

【´･ω･`】：だから、ここで前回の連続印刷.vbs　を使えばいいんだよ。

　　　　　　TimeTableシートをアクティブにしてVBSファイルをダブルクリックして

　　　　　　試してみてくれ。

 

 

(教員のためのコンピュータ活用術 No.11）