エクセルでＶＢＡ起動とともにセルの移動

セルがどこにいてもユーザーホームを起動したら、最初いた行の左から３番目（Ｃ列）にセルが移動するＶＢＡを教えて下さい。よろしくお願いします。

No.3 ベストアンサー 回答者： ja7awu 回答日時： 2003/10/04 18:22

そのフォームの「Initializeイベント」に次のように記述します。

Private Sub UserForm_Initialize()
　　Cells(ActiveCell.Row, 3).Select
End Sub

この回答へのお礼

この１行でできるなんてビックリです。ありがとうございました。

お礼日時：2003/10/04 21:26

No.2 回答者： 0shiete 回答日時： 2003/10/04 17:53

最初って、いつなのでしょうか？

「エクセルファイルを開いたとき」
「ユーザーフォームを起動したとき」

No.1 回答者： mousengoke 回答日時： 2003/10/04 16:17

Option Explicit

Private Sub UserForm_Initialize()
　　Dim nowrow As Integer
　　Const tocol = 3

　　nowrow = ActiveCell.Row
　　Cells(nowrow, tocol).Select
End Sub

もっとスマートな方法もありそうなんだけど。

この回答へのお礼

初心者にとっては、この４行ができないのです。本当ＶＢＡて難しいですね。ありごとうございました。

お礼日時：2003/10/04 21:25