Microsoft Access 掲示板

Microsoft Access 掲示板

フォームの並べ替えをレポートに反映させたい / 5
5
hatena 2025/02/20 (木) 15:51:37 >> 4

コードはマークダウンのコードブロックにいれると読みやすくなります。
使い方は書きをご参照ください。

Microsoft Access 掲示板 の使い方 Microsoft Access 掲示板 - zawazawa

    Select Case opg2 '並べ替え設定
        Case 1
          txSort = "※顧客社名で並べ替え"
        Case 2
          txSort = "●顧客合計金額を昇順で設定"
        Case 3
          txSort = "■顧客合計金額を降順で設定"
    End Select

上記のように並べ替え設定がOpenArgs引数に格納されているのでそれを利用するのが簡単ですね。

と思ったのですが、よく考えたらレポートを開くときフォームは開いたままだと思いますので、フォームのOrderByを参照してレポートのOrderByに代入すればいいですね。

レポートの開くときイベントに下記のコードでどうでしょう。

    Me.OrderBy = Forms!フォーム名.OrderBy
通報 ...