|
▼たぼん さん:
夜間の操作の際にファイルオープン時または作業開始示に
Public Atxt As String
Private Sub Workbook_Open()
Atxt = ActiveSheet.Name
End Sub
でシート名を保存して
Sub test()
Worksheets(Atxt).Activate
End Sub
作業終了前にシートを開くといいんじゃないですか?
>シートが10枚あるエクセルファイルがあります。
>
>シート名は「1」〜「10」です。
>シート「1」はデータベースとして使用していて、「2」〜「10」はユーザーが書き込んでいく為のシートです。
>元データベースは日々追加されて行くので、毎日深夜にマクロで「1」シートにデータを貼付して更新しています。
>「1」シートにデータを貼付してから保存している為、マクロ動作後にファイルを開くと、シート「1」がアクティブになっています。
>でも、本当はそのファイルが最後に保存された時にアクティブだったシートで保存をしたいのです。(ユーザーが入力している為「1」ではなく、「2」〜「10」になるはずなんです)
>
>ちょっと説明が分かりずらくて大変申し訳ないのですが、お分かりになる方いらっしゃいましたら、教えて頂きたいです。
>宜しくお願い致します。
|
|