エクセルＶＢＡに関する質問です。

質問

フォームのコマンドボタンを押すと、シート１のＡ１が選択され、その後、何もせず数字を入力すると、シート1のＡ１にその数字が入るようにしたいのですが、どうすればよいのでしょうか？

フォームはメニュー代わりに使いたいので、常に表示させておきたいです。

よろしくお願いします。

回答No.2

end-u · ベストアンサー

[AppActivateステートメント]を使ってExcelをアクティブにする必要があります。
#モードレスUserForm前提

AppActivate Application.Caption
Application.Goto Worksheets("Sheet1").Range("A1")

お礼

回答ありがとうございます。
思った通りに動きました。
大変、助かりました。
また困った時にはよろしくお願いいたします。

回答No.1

mpascal

Worksheets("Sheet1").Activate
Range("A1").Select

で良かったんじなかったでしたっけ。

補足

すみません。これでは、コマンドボタンを押した時点でフォームの方がアクティブになるため、コマンドボタンを押した後、エクセル本体（シート）をクリックしアクティブにしなければ、Ａ１に数字は入りません…。
コマンドボタンを押して、その後シートをアクティブにするという動作をせずに数字を入れたら、Ａ１にその数字が入るようにしたいのです。