エクセル　セル位置

 　エクセルのＶＢＡで、別シートのハイパーリンクで特定シートへ飛んだ時、リンク先のセルを左上に表示するという物を組んだのだが、以前はうまくいっていたのに2024にしてから、飛べる時と飛べない時が発生するようになった。

　飛んでから、ホイールでスクロールさせたりすれば、ちゃんとした位置に飛ぶので、タイミングらしいのだが、二回スクロールさせたり、ウエイト入れたり、いろいろやってみたのだがうまくいかない。

　要は、アクティブセルにスクロールする前に何か入れてやればいいわけだが、キー入力を入れてやるのはバグでナンバーズロックが外れるので使えない。

　で、結局、該当シートにセル移動を入れてやっと解決。

　まあ、なんか無駄なことしている気もするが、これで解決した。

Private Sub Worksheet_Activate()


    ActiveCell.Offset(-1, 0).Select

    ActiveCell.Offset(1, 0).Select

    

    ActiveWindow.ScrollRow = ActiveCell.Row

    

End Sub

コメント

コメントを投稿

このブログの人気の投稿

下水管のチェック

 　また、変な怪しいセールスが来た。 　下水管のチェックをさせてくれと言う。 　地区の下水管の状態を調べていると言うが、当然そんなことは水道局では行っていない。 　それを指摘すると、個人の敷地内は水道局ではなく民間の管轄なのでという。 　つまり、水道局の指示や業務ではない、勝手な調査だと言うことだ。 　帰れ。 　変に調べる振りして壊されたらたまった物ではない。瓦・水道・リフォーム関係のセールスは、まともな会社は一切していないので、要注意ではある。 　おそらくは、勝手に調べて、詰まっているので高圧配管掃除をしましょうといってくるつもりだったのだろう。 　ちなみに、よほど長年油を流したとでも言わない限り、配管の清掃は必要ない。あと、トイレにティッシュを流したとかない限り。 　だいたい、シンクから水が流れないとかない限り、問題はない。つまり気味でも、配管の洗剤や、熱いお湯を流すことや、一度に溜めた水を流すことである程度は流せるっぽい。ちなみに、熱湯は、流されることを想定されていないので、沸騰したお湯を流すと配管に逆にダメージを与えてしまう場合もあるので注意らしい。 　ティッシュは真面目に詰まるので、古い家の下水管が老朽化と共に詰まって壊れたりするようだ。 　油は、流しに捨てることは極力避けて、薬で固めるか、ティッシュで拭き取るのが良い。 　食べ物のタレなども、細菌のコロニーができて詰まる要因なので、油や栄養のありそうなタレなどはキッチンペーパーなどに吸収して、スーパーの袋などに入れてしばって、燃えるゴミで出せばいい。 　高圧洗浄は、老朽化した配管だと圧力で破裂することもあるので、築年数を考慮に入れて、水道局などに聞いて紹介された地域の水道屋に頼んだ方が無難である。
Read more »

フォルダの読み取り専用とコピーの管理者権限

 　ファイルをコピーしようとしたら、突然、管理者権限を求められた。 　今まではこんなことはなかったので、プロパティを見てみると、読み取り専用となっている。 　いつの間にと思って解除しようとするが、何度やっても解除できない。 　で、毎度のように色々とやるはめになってしまったのだが。まあ、過程よりも、解決した結論の方が簡単よね。 １．フォルダの読み取り専用のチェックマークは、「－」が通常らしい。この状態で、読み書きは可能。そのためか、チェックのない空白の状態だと元の「－」に戻ってしまう。 　「　」と「－」と「／」の３種類があるらしく、「／」のチェックマークがついていると読み込み専用になるらしい。チェックボックスを押していくと、この３つが切り替わる。 　なので、実際は、読み取り専用になってはいなかったわけだ。まあ、ややこしいというか、なんというか。 ２．共有が原因らしい。 　タブレットでアクセスできるように、共有設定をしていたのだが、　フォルダのプロパティでセキュリティタブを見てみると、エラー表示のでるフォルダには、マイクロソフトアカウントのユーザーが表示されていた。 　エラーの出ないフォルダには、そのユーザー名はない。共有してないからね。 　おそらく、タブレットからはマイクロソフトアカウントでパソコンの共有フォルダにアクセスするので、それが悪さをしているっぽい。 　タブレットからは読み取りのみにしようとしたので、読み取り専用にしたのだが、これが原因かなあ。 　ということで、フォルダのプロパティから＞マイクロソフトアカウントのユーザーを選んで＞詳細設定＞同じく該当のユーザーを選択＞編集＞フルコントロールでエラーは出なくなった。
Read more »

インターネット障害

 　突然、ネット回線が切れた。 　端末で確認するも、反応なし。屋外配線も切れてない。 　ルーターでは、インターネット回線に赤ランプがついている。 　ルーター再起動で変化なし。 　終端を再起動で復帰。 　やれやれと思っていると、また切断。 　今度はルーターの再起動で復活。 　あわや、終端が２０年近いので寿命かと思ったが、どうも回線っぽい。 　今のところは様子見だが、正月だからパンクしたか、中継器がエラーでも起こしてるんだろうか。謎だ。
Read more »