繰り返しになりますが、レポートの「開く時」のイベントプロシージャに前回の回答のコードを記述する必要があります。
念のために手順を書いておきますと、
- R10_検索」レポートをデザインビューで開く。
- プロパティのイベントタブの「開く時」のドロップダウンリストから[イベント プロシージャ]を選択してビルドボタン[...] をクリックする。
- VBAウィンドウが開き、下記のように既に記述されています。
Private Sub Report_Open(Cancel As Integer)
End Sub
- これを下記のように修正します。
Private Sub Report_Open(Cancel As Integer)
If Me.OpenArgs <> "" Then
Me.OrderBy = Me.OpenArgs
Me.OrderByOn = True
End If
End Sub
- レポートを保存して閉じます。
以上です。
通報 ...