このページは、岐阜大 工学部 応用精密化学・生命工学科９７年度後期の授業です。
コンピュータシステムの基本的な原理を学ぶ
キーボード入力を手書きスピード以上にする
コンピュータを実験・研究・論文作成に利用きるようにする。
キーボード練習
エクセル９５ ＶＢＡ入門 ２回目
１ キーボード練習
２ プログラムの入力
３ 変数、関数,IF文の使用
□ エクセルにプログラムの記述ができる。
[挿入]-[マクロ]-[モジュール]で入力画面
半角で入力（注意：漢字モードでの入力したものは全角文字といいます）
注意
このページから、コピーして張り付けるときは、スペースが全角を使用されているので、注意すること。半角のスペースに直して使用してください。また、プログラムを入力するときの空白に全角文字の空白を間違っていることがあるので、注意すること。Sub zikoku()
Cells(gyou, 1) = Now()
End Sub
□ シートを切り替えることができる。
□ コマンドボタンを張り付けることができる。
[表示]-[ツールバー]-[フォーム]で、コマンドボタンなどの道具類を表示
コマンドボタンを張り付ける。
マクロ名を選択する。
□ コマンドボタンを実行できる。
□ コマンドボタンの大きさ、表示名などを変更できる。
マウス右ボタンで一度選択して、左ボタンで枠を選ぶ。
表示名を、「現在時刻」とする。
□ プログラム「現在時刻」を修正できる。
下にある爪（タブ）で、先ほどの「モジュールシート」を選ぶ。
Sub zikoku()
Static gyou
gyou = gyou + 1
Cells(gyou, 1) =
Now()
End Sub
□ 変数の保存を理解したか。
Static(変数の場所を、その場限りではなく、固定的に確保する）によって、保存することを指示している。
□ 関数 Nowの役割を理解したか。
□ 判断を入れることができるか？
10行分出力したか、判断する。IF文の使用。
Sub zikoku()
Static gyou
gyou = gyou + 1
If gyou > 10 Then
gyou = 1
End If
Cells(gyou, 1) = Now()
End Sub
□ ヘルプが使えるか？
エクセルのメニューバーの右の方にある。クリックして、検索でキーワードを入力したり、選ぶ。関連事項、例をみる。
今日のプログラムを修正して、自分の生まれたきてからの時間を表示する。
時刻を表示しているセルのとなりcell(gyou,2)に Now() -
DateSerial(誕生日)を代入する。
誕生日の入れ方は、ヘルプで調べてください。DataSerial(昭和３２年７月２１日)ではだめですよ。
本日の課題
電子メールを岐大から私に送ること
e-mail:spage@yscon.co.jp
件名は，0122x
内容は、
本日の授業の感想