今まで作ったフォームを起動する基となるフォームを作ります。
作成タブのフォームデザインをクリックし、真っ新なフォームを開きます。
これにコマンドボタンを下の図のように配置します。
配置したコマンドボタンのイベントタブのクリック時に以下のVBAコードを入力します。
Private Sub コマンド0_Click()
DoCmd.OpenForm “名刺データ”, , , , acFormAdd
End Sub
Private Sub コマンド1_Click()
DoCmd.OpenForm “顧客検索”
End Sub
Private Sub コマンド2_Click()
DoCmd.OpenForm “活動記録一覧”
End Sub
Private Sub コマンド3_Click()
DoCmd.OpenForm “最後の訪問日”, , , “要否=’○'”
End Sub
これで今まで作ってきたフォームがメインフォームを通して一つにまとまりました。
一通りの解説は終わりです。最後にサンプルファイルをアップするのでお使いください。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
来月末のフルマラソンに向け、体を鍛えなおしている最中です。
まだ2時間走れない体なのに、あとひと月ちょいで間に合うのか
とても心配です。
本日も最後までお読みいただきありがとうございます。
