- ベストアンサー
EXCEL2010でCSVを開けない
- EXCEL2010でCSVファイルを開けないという問題が発生しています。
- EXCEL2010の環境でCSVファイルを開こうとすると、EXCELが動作を停止し、セーフモードでのみ開くことができます。
- CSVファイルを開く際には、メモ帳で開いて貼り付けるか、EXCELをセーフモードで起動する必要がありますが、症状は変わりません。
- Yepes
- お礼率94% (1652/1746)
- Excel（エクセル）
- 回答数4
- ありがとう数3
- みんなの回答 （4）
- 専門家の回答
質問者が選んだベストアンサー
再度、確認なのですが ”テキストファイルウィザード”で取り込んだらどうなのでしょう？ 「データ」タブ 「外部データの取り込み」 「テキストファイル」
その他の回答 (3)
- heisukewada
- ベストアンサー率58% (93/160)
いちおう、確認なのですが・・・ ファイル → 開く この時 ファイルの種類を、テキストファイルにしていますか？ 画像の矢印のところですが・・
補足
ありがとうございます。はい、そのようにひらこうとしています。セーフモードだと開けます。
- imogasi
- ベストアンサー率27% (4737/17069)
下記はＣｓｖファイルをＶＢＡで読み、シートのセルにセットするコードです。 これを実行して、途中で止まるとか、おかしいところがあるか判りませんかね。 実際は、そう単純なものでないようなので、その場合はすみません。無視してください。ファイルが壊れているのかもしれない。CSVアイルは構造がごく単純なのでうまく行かないと、原因は素人的に単純でない恐れがある。 原因を切り分けるためのテストのつもりです。 下記の "テスト１.csv"の部分は実際のパス名付き・ファイル名で書き換えること。 ーー 操作 新規シートを出して、ＡＬＴキー＋Ｆ１１。VBE画面になる。 挿入ー標準モジュールで出た白紙画面に、下記コードを貼り付け、ファイル名を自分のものに修正する。 F5キーを押して、実行。 Sub test02() Cells.Clear Open "テスト１.csv" For Input As #1 i = 0 Do Until EOF(1) Line Input #1, x 'MsgBox x kanma = Len(x) - Len(Application.WorksheetFunction.Substitute(x, ",", "")) y = Split(x, ",") 'カンマで分割 i = i + 1 For j = 0 To kanma Cells(i, j + 1) = y(j) 'Ａ列i行目にデータをセット Next j ’If i > 10 Then Exit Do Loop Close #1 End Sub ーー シートに書き出して、途中で止まるようなら、出ている行のレコードまでは、データ的に正しく、その次の行のデータに異常があるかもしれない。 上記を実行しようとして、そのCSVファイルを、オープンできましたか。
お礼
ありがとうございます。VBAのコードまで頂いて。勉強になりました。
- oboroxx
- ベストアンサー率40% (317/792)
何が問題が切り分けましょう。 1.通常のエクセルファイルが開けるかどうか。 2.問題のCSVファイルと同じファイル名で、ファイルの中に1つの数字だけで開けるかどうか。 3.問題のCSVファイルと同じファイル名で、1行目だけで開けるかどうか。 ここまで全部開けたら、恐らく問題のファイルのフォーマットがおかしいのだと思います。 1行ずつ増やしていき、エラーが出る行を特定してみてください。
補足
ありがとうございます。 通常のEXCELファイル：正常に開けます csvファイル：ファイル名変更、内容を空欄に変更してもNGです。 Officeの再インストールをやりましたがレジストリに何か残っている可能性がありますので引き続き挑戦します。
お礼
ありがとうございます。上記の処理は問題ありませんでした。
補足
2度もおつきあいくださりありがとうございます。自己解決しました。 解決手順 1.Officeをアンインストール 2.レジストリで office14 のキーをすべて削除 3.再起動 4.Officeの再インストール