★フォームのボタンにコード入力
 

 お次は、各ボタンにコードを入力していきましょう。
方法は、各ボタンをダブルクリックするか、右クリック→コードの表示をクリックして下さい。

 前にコマンドボタンにプログラムを入力するところで勉強したのと方法同じです。
プログラムを入れると次のようになりました。
Option Explicit

Private Sub 罫線引き_Click()
罫線を引くぜ

End Sub

Private Sub 合計_Click()
計算

End Sub

Private Sub 合計を計算_Click()

'ボタンを押すとテキストボックスに合計が入る
ここに文字と数字 = Range("D8").Value

End Sub

Private Sub 合体_Click()
文字や数字の入力
罫線を引くぜ

End Sub

Private Sub 消去_Click()
消去するマクロでっせ

End Sub

Private Sub 文字の入力_Click()
文字や数字の入力

End Sub


さぁ、これで動作確認をしてみましょう。
画像の貼り付けはしませんので、みなさんで動作確認をして下さいね。

[トップ][前へ][シート上のボタンをフォームへ移動][次へ]