|
VBAプログラム
● 分数計算プログラム 【分数の四則演算プログラム】 コンピューターって計算をする道具なのに、分数で答えを求めたい時にあまり活用できなかったりしませんか？関数電卓で、気の利いたものは分数計算の機能が付いていたりしますが、桁数等いろんな制限があったりしますよね。一応、約数を１００個までにしています（約数が、この値を超えると、エラーが出て止まるはずです）ので制限はありますが、その値（Dim MEAS(100)の部分）を変えれば、計算できる分母分子の桁数を増やすこともできます。著作権を放棄する訳ではありませんが、サイズの小さいプログラムですし改造は自由としますので、気が向いた方はより良いプログラムの作成にチャレンジしてみてください。（ただし、短いプログラムですので、説明のコメントはほとんど書いていません。）
bunsu.exe←ファイルをダウンロードしたい方はこちらをクリックして下さい。そのまま実行すると、分数計算.xls（エクセル2000のファイルです）が出てきます。もちろん無料で、危険なコマンド等は含んでいませんが、実行結果については責任を持ちかねる場合も出てくるかもしれませんので、前もってご承知おき下さい。 ● 成績処理関係のプログラム 【定期テスト用成績処理プログラム】 学校では、最初N88BASIC版の市販ソフトを使って処理していましたが、細部が学校のシステムに会わなかったので、Multiplanの関数を使っての処理、dBASEスリーでのプログラムによる処理を経て、入力時の手軽さからLotus123のマクロによる処理に移り、Excelのマクロでの処理になりました。一度、Accessですべての処理を行った方が、データの一貫性があって良いと考えて、AccessのVBAでプログラムしましたが、入力の手軽さとプリントフォームの自在さから、現段階ではExcelを用いた方がメリットが大きいという判断から、Excelでの処理に戻しました。 ここでのマクロやプログラムは、最初はExcel95あたりで組んだと思いますが、Excelでは、新ヴァージョンに移行する際、関数等を含んでいるワークシートは不具合が生じるようだったので、Excel97時には、『averageやsum、rank、stdev等の関数は使わずに、すべてを数値データの形で保存できるシステム』を目指して、プログラミングしました。実際、Excel97→Excel2000の移行の際は、問題は生じませんでした。（関数を使ってあるものは、同様の症状が出たようです。）ということで、Excel2000→ExcelXpは確認していません（ExcelXpが手元にありません）が、恐らく問題ないと思います。 また、ファイルサイズについては、実力テストと定期テスト（学期成績、５段階評定を含む）に分ければ、200名くらいのデータなら、ワークシートとプログラムを含むそれぞれの１年分が、FD１枚ずつに収まるサイズになります。（それぞれ1,014KBと1,077KBでした。）成績処理でカイルを登場させるため、Accessが入ってないPCではエラーが出ます。
【通知票】 定期テストや学期成績、実力テスト等のデータをワークシートに保存しておき、通知票を作成するプログラムです。
※ プログラムを手直しして使っていただくことはO.K.ですが、ワークシートはマクロやプログラムに合うように作っていただかなければエラーになります。また、著作権を放棄した訳ではありませんので、ご了承下さい。 |