最新トピック
8
19 日前
Hatena様にご質問 19 日前
1
2 ヶ月前
排他制御 2 ヶ月前
6
5 ヶ月前
モジュールでカレントフォームのコントロールを使うには 5 ヶ月前
7
5 ヶ月前
日付のテキストボックスからフォームが開けません 5 ヶ月前
9
6 ヶ月前
レポートにおける数値の間隔を広げる方法 6 ヶ月前
12
6 ヶ月前
リストボックスから複数選択しそれをテーブルに格納したい 6 ヶ月前
タグリスト
Markdown テーブル生成
Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。
朱色様へ回答ありがとうございました。一方通行でいいのです。下記で記述して記述直後は動作するのですが一旦アプリを終了して再度実行するとフリーズしてしますのです。
Dim acMdb As Object
Set acMdb = GetObject("C:\Users\user\Desktop\ACCESSファイル\製品部品構成.mdb")
acMdb.Application.Visible = True
acMdb.Application.UserControl = True
acMdb.Application.DoCmd.OpenForm "F部品入力", acNormal, , "部品ID=" & Me.[部品構成ファイル対象ID]
Set acMdb = Nothing
それで Shell ("msaccess ""C:\Users\user\Desktop\ACCESSファイル\製品部品構成.mdb") を記述し直ししました。
具体的に標準モジュールには同記述するといいでしょうか? そしてマクロには?
そしてShell "Accsess本体パス\MSACCESS.EXE" "DBファイル.accdb" /x マクロ1 /cmd "ファイルBに渡す内容(IDとか)"には? ちなみにマクロ1の前のXは必要でしょうか?
すみません、知識(勉強不足)で基本が理解できていなくて・・・