「オプショングループ」の編集履歴(バックアップ)一覧はこちら
「オプショングループ」(2011/07/29 (金) 15:30:10) の最新版変更点
追加された行は緑色になります。
削除された行は赤色になります。
***並替
Private Sub opt並替_AfterUpdate()
Select Case opt並替
'降順
Case 1: OrderBy = "[ID],[ID]"
Case 2: OrderBy = "[AA],[ID]"
Case 3: OrderBy = "[BB],[ID]"
Case 4: OrderBy = "[CC],[ID]"
End Select
OrderByOn = True
End Sub