はじめまして。
目的
Access で次の2つフォームを作成しました。
- メインフォーム(ボタンがあり、クリックすると2のフォームを開きます。)
- 新規登録フォーム(登録ボタンがあります。)
2つのフォームで使用するボタンは、フォントサイズ、ボタンの色等すべて決まっております。
今は、ボタンの数が少ないですが今後増える予定です。
そのため、フォントサイズ、ボタンの色等を指定する標準モジュールを作成しました。
VBA
標準モジュール(モジュール名:Module1)
Option Compare Database
Option Explicit
Public Sub initButton()
Dim Chrsize As Integer
Chrsize = 10
With button1.FontSize = Chrsize
.FontSize = Chrsize
.BackColor = RGB(191, 191, 191)
End With
End Sub
フォームモジュール
Private Sub Form_Load()
Call Module1.initButton
button1.Caption = "01_Japanese"
End Sub
エラーメッセージ
変数が定義されておりません。とエラーメッセージが表示され、標準モジュールのbutton1が選択されました。
質問したい事
標準モジュールにコントロール名を使用したいと思っております。
よろしくお願いいたします。
バージョン
Access 365
OS:Windows10
引数で対象コントロールを渡せはいいでしょう。
標準モジュール
フォームモジュール
解決いたしました。
ありがとうございました。