エクセルセル位置3
別シートへのハイパーリンクがあるセルで、セルをクリック後にハイパーリンクの表示文字列をクリックすると、表示位置がずれる確率が上がる。なんで?
で、次のように、取得から移動その後チェックに変えてみた。前回との違いは、データ的に1度一致した後に、もう一度処理を繰り返すことになると言うことだ。
無駄なことをしているわけだが、こちらの方が確実にずれなくなった。
おそらく、無駄な処理がウエイト代わりとなってタイミングを調整しているのだろうが、やはり謎のままである。まあ、ウエイトで遅らせるより、確実に移動を確認して止まるので、こちらの方が遅延は少ないとは思うのだが。
実使用上、こうなると知っていれば知覚は可能だが、体感的に遅くなることはないので問題はないだろう。あれ、今ちらついた?程度なので。
Private Sub Worksheet_Activate()
Dim MyRa, MyRb As Long
Do
MyRa = ActiveWindow.VisibleRange.Item(1).Row
MyRb = ActiveCell.Row
ActiveCell.Offset(-1, 0).Select
ActiveCell.Offset(1, 0).Select
ActiveWindow.ScrollRow = ActiveCell.Row
Loop Until MyRa = MyRb
End Sub
コメント
コメントを投稿