マクロを元に戻す
1.マクロ冒頭に
ActiveWorkbook.Save
を入れておく
2.マクロ終了後、以下を実行。
Sub 元に戻す()
Dim CurName As String
CurName = ActiveWorkbook.Fullname
ActiveWorkbook.Close Savechanges:=False
Workbooks.Open CurName
End Sub
1.マクロ冒頭に
ActiveWorkbook.Save
を入れておく
2.マクロ終了後、以下を実行。
Sub 元に戻す()
Dim CurName As String
CurName = ActiveWorkbook.Fullname
ActiveWorkbook.Close Savechanges:=False
Workbooks.Open CurName
End Sub