No.3ベストアンサー
- 回答日時:
ランタイムは使ったことないのですが、以下ではどうでしょうか。
(Access を指定しない方法)
Dim acMdb As Object
Set acMdb = GetObject("D:\Hoge\B.mdb")
acMdb.Application.Visible = True
acMdb.Application.UserControl = True
acMdb.Application.DoCmd.OpenForm "フォームB"
Set acMdb = Nothing
※フォームのクローズも acMdb.Application.DoCmd.Close のように
No.4
- 回答日時:
そご参考になさってみてはかがでしょうか?
Shellかなんかで目的のMDBを起動しておいてからGetObjectなどをすればいいのかもしれません。(うろおぼえなので外れかも)
他の方法としては、
(01)「別のmdb」側に、標準モジュールで目的のフォームを開くプロシージャを書く。FunctionかSubかどっちか忘れましたけど、どちらかか、両方か。Docmdなどで普通に開く簡単な1行コードでOKです。このプロシージャをtest01()とします。
(02)「別のmdb」をVBEの画面から「参照設定」でmdbの参照設定を施す。
これで「別のmdb」の標準モジュールのプロシージャを直接Callできるようになります。
(03)呼び出しもとのプロシージャから、
コマンドボタンのクリックイベントで
Call test01()
とでもすれば、呼び出しもとのAccessウィンドウの中で目的のフォームが開きます。
以上、ランタイム環境でやったことはありませんが、もしかしたらできるかもしれません。
※通常mdbを参照設定するときは、汎用(共用)モジュールなどを格納することが多いと思います。のべつまくなしにmdbに参照設定をかけると、ちょっとどうなるのかわかりませんので、たくさんのmdbを参照設定する場合は、実験しながら試してみてください。
No.2
- 回答日時:
#1です
すみません。
読み落としていました。
> そのフォームはMDB起動時に開くフォームとは別のフォーム
mdb オープンでそのフォームは開かれるようなので、
acApp.DoCmd.Close
で閉じてください。
この回答への補足
ありがとうございます!
やった!出来た!
と思ったのですが…、
実はこのプログラムはAccessランタイム上で動かすことも有り得るのです。
Access Application となっているからだと思うのですが、ランタイム環境では実行時エラーが出てしまいました(>_<)
アクセスでもランタイムでも動くように記述は出来ないでしょうか?
度々申しわけありません。
No.1
- 回答日時:
Accessをもう一個立ち上げ B.mdbを開き、さらにフォームBを開く例となります。
Dim acApp As Object
Set acApp = CreateObject("Access.Application")
acApp.OpenCurrentDatabase "D:\Hoge\B.mdb"
acApp.Visible = True
acApp.UserControl = True
acApp.DoCmd.OpenForm "フォームB"
Set acApp = Nothing
これでAccessは2つ起動されたことになるので、その後で自分をQuitすれば、立ち上げた側だけが残ります。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) アクセス 意図せずサブプロシージャを移動してしまうのを止めたい 1 2022/09/02 09:19
- Visual Basic(VBA) VB.net フォーム 親子 1 2022/07/04 19:00
- JavaScript 入力フォームの javascript で メールアドレスの正規チェックをを行い、ボタンをクリックして 2 2022/04/27 16:06
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- JavaScript ソースコードは下の共有コードサイト「張り紙」にあります。 入力フォームの javascript で 1 2022/05/11 11:01
- HTML・CSS ボタンをクリックした時に、入力フォームのすぐ下部に、「入力欄が空白です」というテキストメッセージが表 1 2022/04/27 16:25
- Access(アクセス) accessについて(超初心者です) 1 2023/02/11 11:18
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Access(アクセス) MSaccessのレポートを開く 2 2022/09/01 13:16
- その他(データベース) Accessフォームからパラメーターで表示したレコードを指定のExcelのセルへ転送する方法について 2 2022/08/22 18:04
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
別のAccessファイルのフォームを開くには
Access(アクセス)
-
ACCESS VBAで別のACCESS(mdb)を起動できますか
Visual Basic(VBA)
-
サブフォームに対してGoToRecordするには?
その他(Microsoft Office)
-
-
4
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
5
他のMDBのマクロを実行する方法
Visual Basic(VBA)
-
6
アクセスで数値型のフィールドにNullをいれたい
その他(データベース)
-
7
選択したチェックボックスのみチェックを入れたいのですが
その他(データベース)
-
8
access・カウント結果がゼロでも、「0」を表示させるには?
その他(データベース)
-
9
カレントレコードが無い事を判定させる方法
Visual Basic(VBA)
-
10
アクセスからエクセルのシートを追加して、名前をつける方法
Excel(エクセル)
-
11
フォームウィンドウを最前面に表示したい(ACCESS)
Microsoft ASP
-
12
Access 同じデータをたくさんのレコード(同一列)に一度に入力するには
Access(アクセス)
-
13
ACCESSのフォーム、開くんですが、見えないようにするには
Access(アクセス)
-
14
ACCESSフォーム入力後の確定
Access(アクセス)
-
15
ACCESS で 項目名を出力せずにエクスポートしたい
その他(データベース)
-
16
ACCESS 重複データを1つだけ表示したい(初心者です)
Access(アクセス)
-
17
ACCESSで空白のデーターをクエリで判定/識別する方法を教えてくださ
Access(アクセス)
-
18
Access VBA でデータペーストをする
その他(Microsoft Office)
-
19
Accessを使って日付を比較したい
その他(Microsoft Office)
-
20
アクセスVBAで既に開いているエクセルを閉じたい
Yahoo!ショッピング
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Access サブフォームでの選択行...
-
ACCSESS2013VBA フォームのレコ...
-
Access 複数フォームを...
-
Access2000、これはいったい・...
-
(ACCESS)条件に応じて、テキ...
-
Access2003 タブコントロール...
-
サブフォームでのダブルクリッ...
-
Accessで、サブフォームのある...
-
Accessで、一覧からクリックし...
-
レコードセットで得た結果をサ...
-
アクセスでサブフォームのレコ...
-
access サブフォームにリストを...
-
サブフォームが見えなくなる。
-
★Access★2つのサブフォー...
-
初心者です。accessで請求書を...
-
ACCESSでfilterとorderbyについて
-
Accessのサブフォーム内で連続...
-
サブフォームの切り替え方を教...
-
Access2000 サブフォームのReco...
-
AccessのDoCmd.ApplyFilterの使...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Access サブフォームでの選択行...
-
Access 複数フォームを...
-
Access2000、これはいったい・...
-
ACCSESS2013VBA フォームのレコ...
-
Access2000 サブフォームのReco...
-
(ACCESS)条件に応じて、テキ...
-
access サブフォームにリストを...
-
サブフォームが見えなくなる。
-
Accessのサブフォームから値を...
-
初心者です。accessで請求書を...
-
2回目に画面のレコードセットの...
-
サブフォームでのダブルクリッ...
-
アクセスで サブフォームの表...
-
アクセスでサブフォームのレコ...
-
googleフォームでインストール...
-
サブフォームのデータを保存す...
-
AccessのDoCmd.ApplyFilterの使...
-
サブフォームでフィルタしたデ...
-
Accessで、サブフォームのある...
-
AccessのFormのみをスクリーン...
おすすめ情報