![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
初めて投稿します。
今後よろしくお願いします。
早速質問なんですが、
CSVファイルをインポートし、Excelファイルに貼り付ける下記処理なんですが、
Gobj_ExcelApp.Worksheets("W_" & Gtbl_NamePrsrvr(Wint_IterEN).Mstr_SheetName & "_" & Wint_IterSN).Activate
Set Wobj_CsvData = Gobj_ExcelApp.ActiveSheet.QueryTables.Add( _
Connection:="TEXT;" & Wstr_CsvPath & "\" & Gtbl_NamePrsrvr(Wint_IterEN).Mstr_CsvName(Wint_IterSN) & ".csv", _
Destination:=Gobj_ExcelApp.ActiveSheet.Range("A1"))
With Wobj_CsvData
.Name = Gtbl_NamePrsrvr(Wint_IterEN).Mstr_CsvName(Wint_IterSN)
.RefreshPeriod = 0
.TextFileStartRow = 1
.TextFileParseType = 1
.TextFileTextQualifier = -4142
.TextFileCommaDelimiter = True
.TextFileColumnDataTypes = Wint_DataType
.Refresh BackgroundQuery:=False
End With
Set Wobj_CsvData = Nothing
.Refresh BackgroundQuery:=Falseのところで"アプリケーション定義またはオブジェクト定義のエラーです。"というエラーでプログラムが終了します。
尚、同じプログラムを並行で10本実行しています。
なにかいい解決法はないでしょうか?
よろしくお願いします。
A 回答 (3件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
その時点で出るということはファイルのパスが間違っているというのが一番に考えられますが。
ためしにC直下にでもCSVファイルを置いて、パスも直打ちでやってみたらどうでしょう。
この回答への補足
すみません、情報不足でしたね。
コードを全てのせることはできなかったので一部分のみのせてます。ちなみに600ファイルできる処理でそのうち約10ファイルだけ毎回異常終了します。
ファイルのパスも間違ってないです。
多分、同時に10本走らすところに問題があると思うのですが(ちなみに1本だとこのようなエラーはでないです。)、どうしてもこちらのシステムの機能として必要なのです。
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) このVBAでExcelアプリケーションを作成は必要ですか? 3 2023/07/19 21:13
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) 複数のcsvファイルをExcelに一括変換したい 2 2023/03/03 12:44
- Visual Basic(VBA) vbaのエラー対応(実行時エラー7:メモリが不足しています) 4 2023/04/24 00:20
- Visual Basic(VBA) Excelのマクロ ブック間である範囲をコピー Workbooks(“a.xlsx“).Sheets 3 2022/05/12 17:02
- Visual Basic(VBA) ファイル全てを .xlsm に変更したところ、プログラムが途中で落ちてしまっています 17 2022/12/07 12:03
- Excel(エクセル) エクセルのVBAについて とあるサイトのコードを参考に、CSVの文字化けを直すVBAを作成しているの 7 2022/11/04 14:15
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
VBAマクロ実行時エラーの修正について
Visual Basic(VBA)
-
EXCEL VBA 1004 一般ODBCエラー1
IT・エンジニアリング
-
WebのデータをとりこむExcelマクロのエラーについて
Excel(エクセル)
-
-
4
外部データを取り込むマクロ
Access(アクセス)
-
5
「Excel VBA」 Webクエリ マクロ「実行時エラー1004"ファイルにアクセスできませんでした」"
Visual Basic(VBA)
-
6
Excel VBA で、データベースファイルの取り込みで動作が停止してしまいます
Visual Basic(VBA)
-
7
「予期しないエラーが発生しました。」
Excel(エクセル)
-
8
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
9
Excel VBAにて特定のサイトからのWebクエリ取得に失敗します。
Visual Basic(VBA)
-
10
一般ODBCエラーについて
PowerPoint(パワーポイント)
-
11
EXCEL VBA で指定した範囲に入力があるかどうか?
Visual Basic(VBA)
-
12
エクセルVBAのIf,Then 構文でOr条件とAnd条件の結合方法?
Excel(エクセル)
-
13
0バイトのテキストファイル
Visual Basic(VBA)
-
14
外部データの更新がうまくできません(Excel VBA)
Visual Basic(VBA)
-
15
ExcelVBAでのプロジェクトのロックの解除の方法
Excel(エクセル)
-
16
実行時エラー'1004': アプリケーション定義またはオブジェクト定義
PowerPoint(パワーポイント)
-
17
特定のPCだけ動作しないVBAマクロがあります。その理由は?
Visual Basic(VBA)
-
18
ExcelVBAでPDFを閉じるソース
その他(Microsoft Office)
-
19
【VBA】エクセルで選択した範囲の値のみをクリップボードにコピーするコードについて
Excel(エクセル)
-
20
VBA シートをコピーする際に Copyメソッドは失敗しましたのエラーが出てしまいます
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Microsoft Access エラー 3051
-
Refreshで落ちる
-
VBAでファイルパスが長すぎてコ...
-
ASPで,mdbファイルへのinsert...
-
Lubuntuでフォントをインストー...
-
EXCEL VBA ファイルが開かれて...
-
VBAでFTPファイル転送がうまく...
-
CSVファイルの出力に関して
-
ASP上でFileSystemObjectのDele...
-
ADODB.Recordsetを使用してExce...
-
ExcelVBAで、隠しフォルダにあ...
-
【Excel VBA】PDFを作成して,...
-
SDカード(16GB)に保存した動画...
-
エクセルVBA フォームを開く時...
-
グーグルドライブからコピーし...
-
Excelでdatファイルを作成??
-
batファイル処理でのテキストフ...
-
バッチによるショートカットの...
-
テキストファイルの文字色に色...
-
WindowsLiveメール2012の保存フ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBAでファイルパスが長すぎてコ...
-
Microsoft Access エラー 3051
-
Lubuntuでフォントをインストー...
-
【Excel VBA】PDFを作成して,...
-
FFFTPでサーバに新規フォルダが...
-
Refreshで落ちる
-
Excel VBA シートを指定して...
-
OCXのライセンス
-
フォルダ参照ではなくファイル...
-
エクセルVBA フォームを開く時...
-
OpenOfficeの書式エラーの質問...
-
ASP上でFileSystemObjectのDele...
-
ExcelVBAで、隠しフォルダにあ...
-
VBAでFTPファイル転送がうまく...
-
グーグルドライブからコピーし...
-
EXCEL VBA ファイルが開かれて...
-
BASP21のアップロードについて
-
【python】pandasでExcel(...
-
ASP.NETで、別サーバーへファイ...
-
web.configファイル内、valueに...
おすすめ情報