CommandButton1_Clickイベントプロシージャで他シートのセルを選択するには?
Question 86.1 Previous Next
今、Sheet1 にコマンドボタンがあるとします。 このコマンドボタンを押したら、sheet2 の cells(1,2) のセルを選択状態にしたいのですが、
Sheets("Sheet2").Select
Selection.Cells(1, 2).Select

とすると Sheet2 までは選択されるのですが、Cells(1,2) が選択されず、変な場所を選択してしまいます(規則性は無いように見えます)。
Cells(1,2) と Cells(1,4) と Cells(1,6) と Cells(1,8) ・・・に処理を加えたいので、Range("B1") みたいに B を使った書き方をせずに、2,4,6,8 を使った書き方をしたいのですが、何か良い方法はございますでしょうか?
もしご教示願えたら幸いです。よろしくお願いいたします。
Answer   Copyright (C) 2007.12.27 永井善王
ActiveXコントロールの「コマンドボタン」、つまり、右下図でいうと [CommandButton1] のことですね。
マクロは Sheet1 の CommandButton1_Clickイベントプロシージャですね。
下記のとおり1カ所修正して、お試しください。
Private Sub CommandButton1_Click()
    Sheets("Sheet2").Select
    Sheets("Sheet2").Cells(1, 2).Select
End Sub

 

Excel VBA Macro