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

質問

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

回答No.3

ja7awu · ベストアンサー

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

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

お礼

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

回答No.2

0shiete

最初って、いつなのでしょうか？
「エクセルファイルを開いたとき」
「ユーザーフォームを起動したとき」

回答No.1

mousengoke

Option Explicit

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

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

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

お礼

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