Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

32163 / 76734

←次へ　｜　前へ→


	【49810】Re:画面のスクロール PageUp PageDown について

ichinose - 07/6/23(土) 10:17 -


	引用なし

	パスワード

▼リキュールさん：
おはようござます。

>キーボードから[PageUp] [PageDown]を実行すると、スクロール後にアクティブセルも移動します。
>しかし、マクロでActiveWindow.LargeScroll up:=1 や ActiveWindow.LargeScroll down:=1
>を実行するとページは移動しますがアクティブセルは移動しせん。
>Offset(移動量).Selectで１ページ分の行をプラス、マイナスを行えば当座は大丈夫なのですが、
>１ページ分の移動量は表示されているウインドウの大きさで変化しますので特定できません。
>スクロール後にアクティブセルも移動するにはどうしたら良いでしょうか。

Sub sample()
　　With ActiveWindow
　　　 .LargeScroll Down:=1
　　　 .VisibleRange.Cells(1).Select
　　　 End With
End Sub

これで　どうですか？

4 hits

▼

【49809】画面のスクロール PageUp PageDown について リキュール 07/6/23(土) 9:48