Microsoft Access 掲示板

Microsoft Access 掲示板

クラスモジュールについて / 2

17 コメント
views
6 フォロー
2
hideki 2021/12/11 (土) 23:53:10 7cbc1@96514

hatena様　

エラーの場所の記載をしなくて申し訳ありません。

.ToExcel⇒ここで、デバックが発生します。

,,,jp

 If SaveBookName <> "" Then
        ex.ActiveWorkbook.SaveAs SaveBookName
    Else
        MsgBox "保存するブック名をSaveBookNameプロパティで設定してください"
    End If

,,,

F8で実行していくと、ここの部分でエラーが発生します。

通報 ...
  • 3
    りんご 2021/12/12 (日) 13:49:32 c564b@0e907 >> 2

    　とりあえず、これくらい試しましたか？

     If SaveBookName <> "" Then
        ex.ActiveWorkbook.SaveAs SaveBookName
　　　　　Debug.Print SaveBookName
　　　　　MsgBox SaveBookName
    Else
        MsgBox "保存するブック名をSaveBookNameプロパティで設定してください"
    End If