【Access】フォームをスクロールさせる

フォームのGoToPageメソッドを使ってフォームをスクロールさせることが出来ます。

書式

Me.GoToPage ページ番号, 横移動量, 縦移動量

移動量に指定する数値の単位はtwipです。

twipの大きさはおよそ次ように変換できると考えてください。

約567twip = 1cm
約15twip = 1ピクセル

例

たとえば、このようにフォームにフレームが縦に３つ並んでいるとします。


この各フレームに対してフォームヘッダー部にあるボタンで移動するには次のように記述します。

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

Private Sub buttonFrame1_Click()       Me.GoToPage 1, 0, 0   End Sub   Private Sub buttonFrame2_Click()       Me.GoToPage 1, 0, 4536   End Sub   Private Sub buttonFrame3_Click()       Me.GoToPage 1, 0, 9072   End Sub

実行結果

スポンサーリンク

https://hosopro.blogspot.com/2017/10/access-vba-gotopage.html 【Access】フォームをスクロールさせる