ACCESS2007 VBA リストボックスの全選択後のスクロール位置の指定について

Question

VBA(ACCESS2007)にて
スクロールがあるリストボックスで、
「全選択」ボタンを押下後に
スクロールが一番下の状態となります。

このスクロールを一番上にするにはどのように
記述したらよいでしょうか。

ご教授のほどよろしくお願いいたします。

Me.ListBox.TopIndex
を追記してみましたが、エラーとなってしまいました。

Private Sub 全選択_Click()
Dim iintLoop As Integer

    With Me!ListBox
        For iintLoop = 0 To .ListCount - 1
           .Selected(iintLoop) = True
         Next iintLoop
    End With
End Sub

Answer 1

試してませんが、逆から選択してみてはどうでしょう。

For～Nextループを逆順に後ろから前に回す

Comments

[Beer_Rabbit]

逆順にして下記の記述で対応ができました！
ご提案くださり本当にありがとうとざいました。

For iintLoop = .ListCount - 1 To 0 Step -1