最新トピック
8
19 日前
Hatena様にご質問 19 日前
1
2 ヶ月前
排他制御 2 ヶ月前
6
5 ヶ月前
モジュールでカレントフォームのコントロールを使うには 5 ヶ月前
7
5 ヶ月前
日付のテキストボックスからフォームが開けません 5 ヶ月前
9
6 ヶ月前
レポートにおける数値の間隔を広げる方法 6 ヶ月前
12
6 ヶ月前
リストボックスから複数選択しそれをテーブルに格納したい 6 ヶ月前
タグリスト
Markdown テーブル生成
Accessのテーブルやクエリのデータを貼り付ける場合は下記で、Markdown書式のテーブルに変換して貼り付けてください。
りんご様
コメントありがとうございます…!
りんご様のお察しの通り、SQLを上書きするコードを組み込んでおりました。
これは別箇所で条件を書き加えたいケースに対応するために入れたものでした。
以下クラスのファンクション抜粋(変数宣言略)
====================
【1】
Public Sub SetQuery(ByVal strQue As String)
Set qf = CurrentDb.QueryDefs(strQue)
' クエリSQL取得(元)
baseSQL = qf.sql
End Sub
【2】
Public Sub Execute()
' クエリ実行
qf.Execute
' SQL文を元に戻す
If Not 別モジュール.IsNullOrEmpty(baseSQL) Then
qf.sql = baseSQL
End If
End Sub
【3】
Public Sub ObjClose()
Set qf = Nothing: Close
baseSQL = ""
End Sub
====================
baseSQLはString型で、元のSQL文は3652文字です。
開発者→確認者1→確認者1(続けてもう一度)と
開発者→確認者2→確認者2(続けてもう一度)のケースは
上手くいくとの報告でした。
両確認者の方が丁度予定が多忙となっており、
昨日から同環境での検証が進んでおらず非常に歯がゆいです。
検証のアドバイスを頂いている中、恐縮です。