|
>恐ろしくて、まだ、試していません。
実際に印刷せずに、PrintPreviewとしているのだから、
試された方が良いと思いますよ。
どんどん試して、どんどんエラーを体験されて経験を増やしてください。
> 'フォーカスをボタン「登録・更新」ボタンに移動する
> Range("cmd登録・更新").Select ←ここがよく分かりません
実際、どんなボタンなのか解りませんが、表示 → ツールバー → フォーム の方のボタンだと、ただ選択するだけです。
選択した後、エンタキーを押しても反応しません。
一応コードにするとこんな感じ。
ActiveSheet.Shapes("Button 1").OLEFormat.Object.Select
表示 → ツールバー → コントロールツールボックスだと
ActiveSheet.OLEObjects("CommandButton1").Activate
(こちらは、エンタキーで反応します。)
>変数tbSRangeと、tbFRangeは、前回も使ったんですが、また、今回も使ってもだいじょうぶでしょうか?
予約語を使っているわけでもなく、プロシジャー内でしか使われていないようなので大丈夫ですよ。
|
|