Microsoft Access 掲示板

Microsoft Access 掲示板

縦スクロールバーをマウスでつかむときに表示される レコード：13/44　の値を取得したい / 15

19 コメント
views
4 フォロー
15
mae 2022/02/22 (火) 11:06:34 >> 9

hiroton 様
ヒントをもとに検証したところ、どんなヘッダ高さ、詳細高さでも安定して先頭レコードを表示することができました！

詳細高さ = Me.Section("詳細").Height
ヘッダ高さ = Me.Section("フォームヘッダー").Height
現在レコード = Me.CurrentRecord
curTop = Me.CurrentSectionTop
先頭レコード = (詳細高さ * 現在レコード - (curTop - ヘッダ高さ)) / 詳細高さ
まるめ = Int(先頭レコード + 0.5)

リンク先のコードよりもシンプルかつ分かりやすいコードになったと思います。
こちらで問題ないでしょうか？？

通報 ...