Accessにて、他のmdbのフォームのコントロールをVBAで恒久的に編集する方法

Question

いつもお世話になっております。

Access2010にて、他のmdbのフォームのコントロールをVBAで恒久的に編集する方法をお教え頂きたいです。

例えば、『C:\test.mdb』のフォーム『F_入力画面』の、

・テキストボックス『txtテキスト』のフォントを１０に設定。

・コマンドボタンン『cmd登録』の表題を"登録"に設定。　など

テキストボックスやコンボボックスなどの名称を統一した作りにしているなら、

デザインの修正を大量にする際は、VBAで修正した方が手っ取り早いため。

Answer 1

下記のようなコードでどうぞ。

    Dim acApp As Access.Application

    Dim strDBPath As String

    strDBPath = "C:\test\test.mdb"

    Set acApp = New Access.Application

    acApp.OpenCurrentDatabase strDBPath

    acApp.DoCmd.OpenForm "F_入力画面", acDesign

    acApp.Forms!F_入力画面!テキスト0.FontSize = 10

    acApp.DoCmd.Close acForm, "F_入力画面", acSaveYes

    acApp.Quit

    Set acApp = Nothing

Answer 2

回答をありがとうございます。

無事、実行の確認ができました。

Answer 3

IK177 さん、こんにちは。

マイクロソフト コミュニティをご利用いただき、ありがとうございます。

VBA でフォームのコントロールを編集する方法についてのご質問ですね。

VBA を使用した処理については、おもに開発者の方々が情報交換を行っている MSDN に専門のフォーラムがあるので、そちらに投稿していただいた方が、より情報やアドバイスが得られやすいかと思います。

■ MSDN の VBA フォーラム

せっかくこちらに投稿していただいたのにお手数をおかけいたしますが、一度 MSDN フォーラムをご利用になってみてくださいね。