![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
初心者ながら、Accessを使って商品管理をしております。今度、売上げ管理と仕入れ先管理なども作成していく予定でおります。
そこで、Accessのファイルを開いた時点で、商品管理メニュー、売上管理メニュー…といった感じで、最初に見たい項目を選択できるようにしたいのですが、VBA等を使っているのでしょうか?
せっかく作るので、出来る限り使いやすく、見やすくしたいのです。私が持っている本には、それらに関する記述が見あたりません。
ネットを検索したのですが、どうも的はずれな検索をしているのか見つかりません。
どなたか、参考HPでも構いません、基本となる作成方法をご教授願えないでしょうか?
宜しくお願い申し上げます。
No.2ベストアンサー
- 回答日時:
No.1の方の回答の方法と違って応用はききませんが、
その分シンプルな方法として・・・
1)メニューで「ツール(T)→起動時の設定(U)」と選択
2)表示される「起動時の設定」ダイアログの右上にある、
「フォーム/ページの表示(O)」で、最初に表示させたい
フォームを指定
以上でOKです。
早速、ご回答有り難うございます。
これは、簡単な設定ですね。
単純に、メニューの選択用の画面を出すだけなら、これで良いかも知れません。
有り難うございました。
これからのこと(発展)を考えると、No1の方のマクロを使うと良いのかも知れませんが…
DexMachinaが、お勧めする、Accessの参考HPや、書籍が有りましたらご紹介下さい。
宜しくお願い申し上げます。
No.4
- 回答日時:
Access のメニューに関しては、2つの方向性があると思います。
一つは、<Access> の<メニューシステム>を利用する方向。
二つは、オリジナルな<メニューシステム>そのものを開発する方向。
後者の場合、<アプリケーションを起動する関数>などの開発も必要となります。
' --------------------------------------------------------------------------------
' アプリケーションを起動する関数
' --------------------------------------------------------------------------------
Private Sub ExecuteApplication(ByVal M As Integer, ByVal S As Integer)
On Error GoTo Err_ExecuteApplication
Dim isOK
Dim strApp As String
strApp = Trim(MyMenu.AppNames(M, S))
Select Case MyMenu.AppTypes(M, S)
Case "F"
DoCmd.OpenForm strApp, acNormal
Me.TimerInterval = 500
Case "R"
DoCmd.OpenReport strApp, acViewPreview
Me.TimerInterval = 500
Case "r"
DoCmd.OpenReport strApp, acNormal
Case "E"
isOK = Shell(strApp, 1)
Case Else
End Select
Exit_ExecuteApplication:
Exit Sub
Err_ExecuteApplication:
PauseMsg "アプリケーションを起動できません。(ExecuteApplication)", 2
Resume Exit_ExecuteApplication
End Sub
No2さんの方法で、コマンドボタンを配置して各々にアプリケーションを起動させれば<メニューシステム>は不要。
最初は、それで良いかも知れませんね。
いずれにしろ、上述の4つ程度がアプリケーションを起動するコードです。
![](http://oshiete.xgoo.jp/images/v2/common/profile/M/noimageicon_setting_10.png?e8efa67)
No.1
- 回答日時:
マクロ名 Autoexec というマクロを作成する。
そのマクロの中で、最初にやりたいこと
例えば、フォームを開く 総合メニュー
とかで、総合メニューは、それぞれのメニューを開く
ボタンをおいておく
というのではどうですか?
マクロ名 Autoexec というマクロは、アクセスを開いたときに
いきなり起動してくれるマクロです。
早速、ご回答有り難うございます。
やはり、マクロを使うのが良いのですね…
さすがに、マクロはマダマダ未知の世界でして…
何か参考になるHPなど御座いましたら、ご紹介下さい。
お願いいたします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・ゆるやかでぃべーと タイムマシンを破壊すべきか。
- ・「I love you」 をかっこよく翻訳してみてください
- ・歩いた自慢大会
- ・許せない心理テスト
- ・字面がカッコいい英単語
- ・昔のあなたへのアドバイス
- ・かっこよく答えてください!!
- ・あなたが好きな本屋さんを教えてください
- ・スタッフと宿泊客が全員斜め上を行くホテルのレビュー
- ・【大喜利】【投稿~8/27】 こんなガソリンスタンド二度と来るか!なぜそう思った?
- ・これ何て呼びますか Part2
- ・人生で一番思い出に残ってる靴
- ・【お題】動物のキャッチフレーズ
- ・【お題】甲子園での思い出の残し方
- ・ゆるやかでぃべーと すべての高校生はアルバイトをするべきだ。
- ・「それ、メッセージ花火でわざわざ伝えること?」
- ・自分用のお土産
- ・人生で一番お金がなかったとき
- ・一番好きなみそ汁の具材は?
- ・泣きながら食べたご飯の思い出
- ・ちょっと先の未来クイズ第1問
- ・ゴリラ向け動画サイト「ウホウホ動画」にありがちなこと
- ・初めて自分の家と他人の家が違う、と意識した時
- ・単二電池
- ・チョコミントアイス
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Accessのフォームのみ表示させたい
-
連絡先をあいうえお順にするに...
-
アクセス フォーム上で右クリ...
-
ファイルメーカーPro9とPro11は...
-
Access2010ファイルの起動時の...
-
ワードかエクセルで、KOKU...
-
一点一葉とはどんな意味ですか?
-
エクセル宛名ラベルが重複する
-
ワードの差し込み印刷で,ペー...
-
ラベルの差込印刷で2ページ目以...
-
インデックスに印刷する方法
-
筆王
-
Excel2019 非表示モジュール内...
-
CDやDVDの表面へのラベル...
-
フラットファイルの背表紙部分...
-
VBA+VBSによる別インスタンスB...
-
[ マクロ ] エラーになったり...
-
ワード差し込み印刷:作成した...
-
accessデータを指定したExcel、...
-
ピボットテーブルのΣ値のタイト...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
連絡先をあいうえお順にするに...
-
Accessのフォームのみ表示させたい
-
Access2010ファイルの起動時の...
-
アクセスの起動時にレポートを...
-
Windows11のエクスプローラーで...
-
アクセス フォーム上で右クリ...
-
uwsc 同一ソフトをクリックす...
-
アクセスしようとしたページは...
-
Excel [はこのマシンでは利用で...
-
ファイルメーカーPro9とPro11は...
-
LIFEBOOK CH55/J 警告 起動で...
-
Accessの最初にメニュー画面を...
-
アクセスで自作データベースを...
-
Hitachi JP1/NETM/DM/Manager ...
-
スクプリトの表示についてご伝...
-
Tracの「コマンドプロンプトか...
-
outlook express メッセージの...
-
一点一葉とはどんな意味ですか?
-
ワードかエクセルで、KOKU...
-
エクセル宛名ラベルが重複する
おすすめ情報