#369 モジュールのPublic変数/定数をクエリから参照するには? クエリ、VBA

標準モジュールのDeclarationsセクションでPublic宣言された変数や定数は、そのモジュール内はもとより、他の標準モジュール、フォームのクラスモジュールなど、モジュールならどこからでも参照することができます。
一方、クエリの演算フィールドやWhere条件においては、PublicなFunctionプロシージャを呼び出すことはできますが、モジュールのPublic変数や定数を直接参照することはできません。

そのようなとき、単にPublic変数や定数を返すだけのFunctionプロシージャを作成しておくことで、クエリからもその変数や定数を参照できるようになります。

それには、標準モジュール上に次の例のようなプロシージャを作成しておきます。

'得意先コードの定数宣言
Public Const pclngCurrentCustomer As Long = 15


Public Function GetCurCust() As Integer
'概要 得意先コードの定数を返す
'引数 なし
'返値 Public変数pclngCurrentCustomerの値

  GetCurCust = pclngCurrentCustomer

End Function


そして、クエリにおいては次のようにしてこのFunctionプロシージャを呼び出します。

クエリのデザインビュー
クエリのデザインビュー

クエリのデータシートビュー
クエリのデータシートビュー
| Index | Prev | Next |

この情報は参考になりましたか?、問題は解決しましたか?、もしまだなら......
T'sWareのワンポイトテクニカルアドバイスをご利用ください。3000円/件〜でご支援します。
スタンドアロンからSQL Server対応まで、オーダーメイドのシステムを短納期・安価でお届けします


Copyright © T'sWare All rights reserved