Excelの自動保存 (ID:91539)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 やはり間違ったほうにいってる気がしてきました（苦笑） とりあえずExcel自体にアドインがあるとのことなのでそっちから手をつけてみました Private Sub Workbook_Open() Dim str_name As String str_name = ActiveWorkbook.Name → ここでオブジェクトがないとエラー str_name = Replace(CStr(Date), "/", "") & Replace(CStr(Format(Time(), "hhmm")), ":", "") & str_name ChDir "C:\" ActiveWorkbook.SaveAs Filename:="C:\" & str_name,FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _ CreateBackup:=False End Sub がエラーがでまして、なんかどんどんへんな方向にいってるようです こういう場合ってどんな感じにしたらいいのでしょうか？ あとはプロセスが発生したときを調べてという方法があるみたいなのですが 自分が別の掲示板等で過去ログ調べてもレスがついてないので この方法というのは無理なのでしょうか？ また随時調べていきます