Microsoft Access 掲示板

AccessからExcelへ出力する際にエラー / 3

8 コメント
views
4 フォロー
3

まずは、動作確認中(デバッグ中)は、エクセルを表示させて実行しましょう。

'    xl_app.Visible = False '可視設定
    xl_app.Visible = True

エラーが出て中断すると、非表示のエクセルの残ってしまいますので。非表示のエクセルはPCをシャットダウンしないかぎり、閉じるのが難しいので。

エラーが出る前の行に下記のようなデバッグ用のコードを挿入して実行してみてください。

           Debug.Print rs!A.Value
           Debug.Print line_no
           Debug.Print .cells(line_no, 1).Address
           .cells(line_no, 1) = rs!A 'ここでエラー

これでエラーが出て中断したときのイミディエイトウィンドウに出力されたものをコピーしてもらえますか。
それで原因がわかるかもしれません。

通報 ...