Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


73181 / 76738 ←次へ | 前へ→

【8040】EXCEL97でテキストファイルをインポート時にメモリ不足
質問  maeda  - 03/9/27(土) 14:41 -

引用なし
パスワード
   みなさま、こんにちは

EXCEL97でテキスト(拡張子.txtのCSVファイル)ファイルをインポートする
マクロを自動生成したのですが、「メモリが不足しています。」というエラーが
出力されて困っております。
テキストファイルの各列に「G/標準」「文字列」「日付」などの形式を設定して
インポートするのですが、まず、マクロを自動記録しながら手動で
テキストファイルウィザードを使って取り込みました。手動で行う分には全く
問題無くEXCELに取り込むことができます。
しかし、そこで自動生成されたマクロ(下)を実行してみると
「メモリが不足しています。」というエラーが出力され正常に動作してくれません。

  Workbooks.OpenText FileName:= _
    "C:\work\CSVFILE.txt", StartRow:=1, _
     DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
     ConsecutiveDelimiter:=False, Tab:=False, _
     Semicolon:=False, Comma:=True, _
     Space:=False, Other:=False, _
     FieldInfo:=Array(Array(1, 1), _
Array(2, 1),Array(3, 1), Array(4, 1), Array(5, 1), _
Array(6, 1), Array(7, 1), Array(8, 1),Array(9, 2), _
Array(10, 2), Array(11, 1), Array(12, 1), ..<省略>.. _
Array(96, 1), Array(97, 1), Array(98, 1), Array(99, 1), _
Array(100, 2), Array(101, 2), Array(102, 2), Array(103, 2), _
Array(104, 2), Array(105, 1))

列が105列あるのですが、「メモリが不足しています。」が出力されるとカーソルが
Array59の位置にフォーカスされるので1文で文字数が多すぎるのかとも思います。
しかし、この文を分割したり短くしたりする方法もわかりません。
どなたか「メモリが不足しています。」というエラーを回避しながら105列あるテキスト
ファイルを取り込む方法をお教えいただけないでしょうか?
ちなみにEXCEL2000だと問題無く処理が完了します。
よろしくお願いいたします。

maeda

1 hits

【8040】EXCEL97でテキストファイルをインポート時にメモリ不足 maeda 03/9/27(土) 14:41 質問
【8041】Re:EXCEL97でテキストファイルをインポート... Hirofumi 03/9/27(土) 16:55 発言
【8048】Re:EXCEL97でテキストファイルをインポート... Hirofumi 03/9/27(土) 22:21 回答
【8050】Re:EXCEL97でテキストファイルをインポート... maeda 03/9/28(日) 12:55 質問
【8052】Re:EXCEL97でテキストファイルをインポート... Hirofumi 03/9/28(日) 15:01 回答
【8054】Re:EXCEL97でテキストファイルをインポート... Hirofumi 03/9/28(日) 17:51 発言
【8055】Re:EXCEL97でテキストファイルをインポート... maeda 03/9/28(日) 21:13 お礼

73181 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free