Excel VBA質問箱 IV

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

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


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

57577 / 76732

←次へ　｜　前へ→


	【23891】セレクトしたセルを画面中央にして表示したい

gedge - 05/4/6(水) 18:50 -


	引用なし

	パスワード

はじめまして。皆様に質問があります。

データシートの１列目に、１行目から100行目まで数値データが入っているものとします。ここでセルの中身を上から順に参照し、「０」の入ったセルを見つけたらそのセルをセレクトして画面をいったんストップし、「これですか？」というダイアログを表示させる、というコードを書いています。だいたい以下のようなものです。

Sub Find_zero()
　 For i = 1 to 100
　　　If Cells(i, 1).Value = 0 Then
　　　　 Cells(i, 1).Select
　　　　 MsgBox "これですか？"
　　　End If
　 Next i
End Sub

さて、このコードを実行すると、画面がストップしたとき、ちょうどセレクトしたセルが画面の一番下に来てしまうことがあります。そうではなく、画面がストップするときには常にセレクトしたセルが画面の中央付近に位置するようにしたいと考えています。きっと簡単にできるはずだとヘルプを探したのですが、要領が悪いのか見あたりません。どなたか解決法をご存じの方がおられましたらご教示ください。よろしくお願いします。

0 hits

▼

【23891】セレクトしたセルを画面中央にして表示したい gedge 05/4/6(水) 18:50

≪