ショッピングカート WebCart 2.31
http://www.cgis.biz/
と言うフリーのPHPスクリプトを試しているのですが、商品一覧データをcsv形式でダウンロード出来き、アップロード出来る機能があります。
ダウンロードしたcsvデータをExcel2003で開き、そのまま上書き保存してアップロードすると意図しない表示となります。
ダウンロードしたデータを何もせずアップロードすると正常表示となります。
ダウンロードしたcsvデータをテキストエディタで開くとカンマで区切られたデータが全て「"」で括られていて文字列として扱われていました。
Excel2003で開くときに各データにダブルクォーテーションで括られた形式に出来ないものでしょうか。
よろしくお願い致します。

このQ&Aに関連する最新のQ&A

A 回答 (3件)

Excel2003で開くとき、CSVファイルを直接ひらくのではなく、一旦エクセルを立ち上げ、メニューの「データ」、「外部データの取り込み」、「テキストファイルのインポート」を指示すると、ダイアログが開くので、「ファイルの種類」を「テキストファイル(*.txt)」から「すべてのファイル(*.*)」に変更します。


ここに当該CSVファイルが現れたらインポートし、ウィザードに従い、「カンマやタブなど区切り文字うんぬん」にチェックして次へ。
区切り文字にカンマをチェックして「文字の引用符」を「なし」にして次へ。
    • good
    • 0

要は、Excel で作成したCSVの各データをダブルクォーテーションで括られた形式にしたいということですね。



それなら、[参考URL]に示した質問に対して Wendy02さんが ANo.5 で提示されたツール「CSVを加工するWSHプログラム」がとても便利で、私はしょっちゅうお世話になっています。→ Wendy02さんに感謝!

参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?qid=2442823
    • good
    • 0

まず、Excelで開くファイル名を *.csv から、*.txt に改名します。



(※ *.csv のままでは、無条件で csvファイルと認識して、"" を文字列の引用符として捉え、読み込む際に取り除いてしまいます。)

次に、ファイル(F) ==> 開く(O) の操作をして、開くファイル( *.txt )を選択します。

 この時、テキストファイル ウィザードが起動します。
  ・ 1/3 では、カンマやタブなどの区切り文字によって・・・ を選択
  ・ 2/3 では、"区切り文字" には カンマのみを選択し、 "文字の引用符" は、なし を選択。
  ・ 3/3 では、なにも設定を変更せずに、完了 ボタンをクリック

 以上の操作をすれば良いと思います。
    • good
    • 0

このQ&Aに関連する人気のQ&A

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q大量のCSVファイルをExcel形式に変換する

お世話になります。
大量のCSV(.csvファイルをExcel(.xls)ファイルに変換したい
と考えております。
リネームソフトを使って、(.csv)⇒(.xls)の一括変換を
したところ、拡張子は確かに.xlsに変換されたのですが、
中身はCSVのままとなっておりました。
(↑ファイル名とシート名が同期を取っているので)

このCSVを確実にエクセル形式へと変換したいのですが、
どなた様かいいお考えをお持ちでしたら教えてください。
ググってみたところ、そういったアドインがあるのですが、
できれば費用をかけずに行いたいです…。

Aベストアンサー

こんにちは。

すでに、マクロが1つ出ているようですが、私も作ってみました。

これは、ファイルをマルチセレクトして、そのファイル群を、Excelのマクロにより、一気に、CSV から XLS(Excel標準フォーマット)変換するマクロです。出来上がったら、Explorer 等で、確認してみてください。

>アドインがあるのですが、
私の個人的な意見ですが、この程度のものは、アドイン化すべきものではありませんから、よほど付加価値をつけないと公開用のアドインにはなりませんが、一般的にみて、アマチュアの作ったアドインは、押しなべて、あまり出来の良いものが少ないように思います。ですから、なるべく、一般のマクロで解決するように望みます。


'---------------------------------------------------

'<標準モジュール>
Sub CSV2XLS()
  'CSV を XLS に変換するマクロ
  Dim myArray() As String
  Dim FileName As Variant
  Dim fn As Variant
  Dim xlFileName As String
  Dim xlFileBaseName As String
  Dim TextLine As String
  Dim FileNo As Integer
  Dim i As Long
  Dim k As Long
  '基本となるフォルダ
  'BASE_DIR=""なら、マクロのあるブックと同じ場所のフォルダ
  Const BASE_DIR As String = ""
  If BASE_DIR <> "" Then
   ChDir BASE_DIR
   Else
   ChDir ThisWorkbook.Path
  End If
  FileName = Application.GetOpenFilename("CSV ファイル(*.csv),*.csv", MultiSelect:=True)
  If VarType(FileName) = vbBoolean Then
   Exit Sub
  End If
  Application.ScreenUpdating = False
  For Each fn In FileName
   On Error GoTo NextStatus
   With Workbooks.Open(fn)
     xlFileName = Mid$(fn, 1, InStrRev(fn, ".") - 1) & ".xls"
     Do
      k = k + 1 '同名の時枝番をつける
      If k > 3 Then Exit Do
      If Dir(xlFileName) = "" Then
        .SaveAs xlFileName
        xlFileBaseName = Mid$(xlFileName, InStrRev(xlFileName, "\") + 1)
        Workbooks(xlFileBaseName).Close False
        k = 0
        Exit Do
        Else
        xlFileName = Mid$(fn, 1, InStrRev(fn, ".") - 1) & "_" & CStr(k) & ".xls"
      End If
     Loop
   End With
NextStatus:
  Next fn
  Application.ScreenUpdating = True
  MsgBox "終了しました。",64
End Sub

'---------------------------------------------------

こんにちは。

すでに、マクロが1つ出ているようですが、私も作ってみました。

これは、ファイルをマルチセレクトして、そのファイル群を、Excelのマクロにより、一気に、CSV から XLS(Excel標準フォーマット)変換するマクロです。出来上がったら、Explorer 等で、確認してみてください。

>アドインがあるのですが、
私の個人的な意見ですが、この程度のものは、アドイン化すべきものではありませんから、よほど付加価値をつけないと公開用のアドインにはなりませんが、一般的にみて、アマチュアの...続きを読む

QWORDで縦書きのダブルクォーテーションが出ない

WORDで「かっこ」と入力するとその中に””というダブルクォーションが出てきます。これは横書きならいいのですが、縦書きにすると囲んだ字よりその上や下の字にくっついてしまい、非常に醜い結果になります。ずっと前からこの改善を待っているのですが、Microsoft社はもともと外国社であるためか、日本語表記に対して誠実な対応が欠けているのではないかと危惧されます。外字でわざわざ作ってみたのですが、これでは送信したときなど、他のパソコンでは表記されません。何とか対策はないものでしょうか。

Aベストアンサー

No.4です。返信が遅れてしまい、申しわけありませんでした。

「ノノカギ」というのは、おっしゃるとおり「ノの形が二つ並んだ括弧」のことです。手持ちの本には「ダブルミニュート」や「チョンチョン」などと紹介されており、前の回答で紹介させていただいたURLでは文末で図解されています。ほかにも呼び名があるそうですが、とりあえずWordの場合、メニューバーの《挿入(I)》→《記号と特殊文字(S)》をクリック。《コード体系(M)》から「日本語シフトJIS(16進)」を選択し、《文字コード(C)》に「8780」または「8781」と入力、あとはノノカギを選択して《挿入(I)》ボタンをクリックするだけです。あるいは簡単に、「かっこ」と入力して変換していく方法もあります。

ただし、フォントの種類によって成功する場合と失敗する場合があるようで、参考URLでも長々と説明されています。とはいえ私のところ――WindowsXP・Word2002 SP3――では、MS明朝・ゴシックともに問題なく表示されます。この掲示板では機種依存文字が使用できないため似た記号を代用しましたが、おおむね以下のとおりです。

 愛のある ``ユニークで豊かな、、 書体
 の
 あ
 る

  //
 ユ
 ニ
 |
 ク
 で
 豊
 か
 な
//

 書
 体(文例は写研の書体見本帳より)

このように、縦書きはもちろんのこと横書きでも違和感なく表示されます。反対に、DF平成明朝体などでは「囲む対象の文字から括弧が離れて」しまい、いかにも素人くさい文字組になりました。「どのフォントを使うか」に応じて成否がわかれそうですので、いろいろなフォントでお試しください。

私自身「文字」や「印刷」というものに興味を持っており、そういった関心から回答させていただきましたが、下調べが不十分なようでご迷惑をおかけしました。これ以上の回答はできかねますが、何らかの参考にしていただけたら幸いです。

参考URL:http://homepage1.nifty.com/akshiba/kotoba_mozi/yakumono02.html

No.4です。返信が遅れてしまい、申しわけありませんでした。

「ノノカギ」というのは、おっしゃるとおり「ノの形が二つ並んだ括弧」のことです。手持ちの本には「ダブルミニュート」や「チョンチョン」などと紹介されており、前の回答で紹介させていただいたURLでは文末で図解されています。ほかにも呼び名があるそうですが、とりあえずWordの場合、メニューバーの《挿入(I)》→《記号と特殊文字(S)》をクリック。《コード体系(M)》から「日本語シフトJIS(16進)」を選択し、《文字コード(C)》に「8780」または「...続きを読む

QエクセルデータからCSVファイルへの変換について

現在エクセルファイルにあるデータをCSVファイルへ変換する作業(エクセルでデータを作成して、保存時にCSVファイルを選択)をしているのですが、以下の例の場合うまく変換ができません・・・。
基本的な質問かもしれませんがどなたかご存知でしたら教えていただけると助かります。
よろしくお願いします。

【例】
        (エクセル) ⇒  (CSV)

うまくいく   12345     12345

うまくいかない 01234     1234


上記のようにエクセル上は文字列で管理されている
ケースだとCSVファイルに変換した時数列に変換
され、上記例のうまくいかないケースのように
頭に0がある場合CSVだと0が消えてしまいます。

よろしくお願いします。

Aベストアンサー

> CSVファイルに変換した時数列に変換

ちがいます。
いったんCSVで保存したものをエクセルで開いたときにそうなるのです。
CSVをエクセルでそのまま開かず、メニューの「データ」、「外部データの取り込み」、「すべてのファイル」、で取り込み、書式で文字列を選べばOKです。
あるいはCSVを拡張子を.TXTにしてテキストで取り込んでもOK

QCSVファイルをxslに大量に変換する方法

CSVでデータ作成したものが有るのですが、これを普通のXLSに
変換したいのです。1個や2個なら簡単なのですが、大量に有り(1000個)、一気に出来ないものかと相談した次第です。
よろしく御願いします。

Aベストアンサー

一括してXLSに変換するマクロを書いてみました。
同じフォルダにあるCSVファイルを1つずつ開いて別フォルダにXLS形式で保存する、というのを繰り返す処理を行うマクロです。

●前提
・CSVファイルは全て同じフォルダにある。
・ファイル名はすべて*.csvというふうに拡張子がCSVである。
・CSVファイルの各フィールドはコンマで区切られている。
・CSVファイル名に、拡張子の.csv以外の.(ピリオド)は含まれていない。

●準備
・CSVファイルがあるフォルダにXLSという名前のフォルダを作る。
・Excelを起動し、適当に名前をつけて「CSVファイルがあるフォルダ」に保存する。
・そのExcel上でAlt+F11を押してVBAの画面を出し、「挿入」>「標準モジュール」を選択する。
・右の画面に以下のマクロをコピーして貼り付ける。

Sub Csv2Xls()
 Application.ScreenUpdating = False
 Dim WB As Workbook
 Dim FN As String
 Dim F As Integer
 Dim i As Integer

 F = ThisWorkbook.FileFormat
 FN = Dir("*.csv")
 Do While FN <> ""
  i = i + 1
  Application.StatusBar = i & "番目:" & FN & " 変換中"
  Set WB = Workbooks.Open(FN)
  WB.SaveAs "XLS\" & Left(FN, InStr(FN, ".")) & "xls", F
  WB.Close
  FN = Dir()
 Loop
 Application.ScreenUpdating = True
 Application.StatusBar = ""
End Sub

●実行
・Alt+F11でExcelの画面に戻り、Alt+F8から上記のマクロ「Csv2Xls」を実行する。
・CSVファイルがXLSファイルに変換されて、XLSフォルダに、XXX.csvというファイルならXXX.xlsというファイル名で保存される。

●注意
・実行中はステータスバー(一番下の部分)に、何個目のファイルを処理中か、ファイル名と一緒に表示されます。1000個もあると非常に時間がかかるかもしれませんが、進み具合はその表示を目安にしてください。
・処理中はファイルを次々に開いて閉じて、というのを繰り返すためにタスクバーがちらちらしますが、気にしないでください。
・途中で処理を止めたいときは、Ctrl+Breakキーを押してください。マクロの中断画面が出るので「終了」ボタンを押し、処理中のファイルが開いていたら閉じてください。
・途中で止めて再度やりなおす(あるいは一度やったけどもう一度やりなおす)場合は、XLSフォルダのファイルは全て削除し、空にしてから実行してください。

何か不明な点がある場合や、あるいは希望通りの動作にならない、前提が違う、などの場合は補足をお願いします。

一括してXLSに変換するマクロを書いてみました。
同じフォルダにあるCSVファイルを1つずつ開いて別フォルダにXLS形式で保存する、というのを繰り返す処理を行うマクロです。

●前提
・CSVファイルは全て同じフォルダにある。
・ファイル名はすべて*.csvというふうに拡張子がCSVである。
・CSVファイルの各フィールドはコンマで区切られている。
・CSVファイル名に、拡張子の.csv以外の.(ピリオド)は含まれていない。

●準備
・CSVファイルがあるフォルダにXLSという名前のフォルダを作る。
・Excel...続きを読む

QCSVファイルをEXCELに変換の自動化作業

CSVファイルをEXCELに変換の自動化作業
{CSVファイルをEXCELに変換するため、
excel  ツールバーよりデータ(D)→外部データの取り込み(D)→テキストファイルのインポート→ファイルの種類変更→全てのファイル→○○.csvのファイル指定→“,”の区切り選択、、ウィザードに従って変更し次へで進む→A1が指定されるのでそのまま完了→CSVがEXCELファイルに変換された。
参照したabc1.csvの名前に対して新しいabc1.xlsとなずけて登録する。これらの作業をMYドキュメントのhenkan ホルダーに入っているCSVファイルに同様に作業して同じくhenkan ホルダーに入れる。}
上記の{ }内の作業を何か,excelのVBAのマクロのようなもので実行することはできませんか。
やり方を教えてください。

Aベストアンサー

もともと、CSVとはカンマ区切りのはずですから、そうではないということなら、このコードは、違っています。こういう質問系掲示板は、質問者が分らない部分をお助けするような形で出来上がるものだと思いますので、回答者の回答を最初から否定するような発言は控えていだきたいと思いました。なお、フォルダーの中を一気に変換してしまうようなコードは、必ず変換後の様子を確認してからでなくてはなりませんので、それを確認していただくつもりでした。

私自身は、ここのカテゴリで、私は、一ゲンではありませんので、後々のためにコードを掲示しておきます。以下は、私が考えていたコードであって、その処理後の状態を保証するものではありません。

'<標準モジュール推奨>
Sub DirectryCSV2XLS()
  Dim myCSVFnames() As String
  Dim myCSVFname As String
  Dim xlFileName As String
  Dim i As Long
  Dim j As Long
  Dim n As Variant
  Dim msg As String
'=====================================
  '以下 フォルダー要設定
  Const MY_FOLDER As String = ""C:\Documents and Settings\<User>\My Documents\"
'=====================================
  If Left$(MY_FOLDER, 1) <> "\" Then MsgBox "フォルダーの設定の最後は、「\」が必要です。": Exit Sub
  If Dir(MY_FOLDER, vbDirectory) = "" Then _
   MsgBox "そのフォルダーは存在しません。", vbCritical: Exit Sub
 
  myCSVFname = Dir(MY_FOLDER & "*.csv")
  Do While myCSVFname <> ""
   ReDim Preserve myCSVFnames(i)
   myCSVFnames(i) = myCSVFname
   i = i + 1
   myCSVFname = Dir()
  Loop
  If i = 0 Then MsgBox MY_FOLDER & " には、CSVファイルが存在しません。", vbCritical: Exit Sub
  Application.ScreenUpdating = False
  Application.DisplayAlerts = False
  For Each n In myCSVFnames
   xlFileName = Mid$(n, 1, InStrRev(n, ".csv")) & ".xls"
   If Dir(MY_FOLDER & "\" & xlFileName) = "" Then
     With Workbooks.Open(MY_FOLDER & "\" & n, Format:=2)
      .SaveAs MY_FOLDER & xlFileName
      Workbooks(xlFileName).Close False
      j = j + 1
     End With
   End If
  Next n
  Application.DisplayAlerts = True
  Application.ScreenUpdating = True
  If i <> j Then msg = "既に" & CStr(i - j) & "個のCSV ファイルは、XLSに変換されています。"
  MsgBox i & "個のCSVの内、" & j & "個のファイルをXLSに変換しました。" & vbCrLf & msg
End Sub

もともと、CSVとはカンマ区切りのはずですから、そうではないということなら、このコードは、違っています。こういう質問系掲示板は、質問者が分らない部分をお助けするような形で出来上がるものだと思いますので、回答者の回答を最初から否定するような発言は控えていだきたいと思いました。なお、フォルダーの中を一気に変換してしまうようなコードは、必ず変換後の様子を確認してからでなくてはなりませんので、それを確認していただくつもりでした。

私自身は、ここのカテゴリで、私は、一ゲンではありませ...続きを読む

Qcsvファイルについて

csvエディッタ?ソフトで下記のような事を出来る無料ソフトありませんか?

もしあれば教えてください。

やりたい事

CSVエディッタ?で開いたらこのようなCSVファイルがあるとします。そのCSVを入らない行列、列を消して残ったデーターが画像のようなデーターです。

そしてこのデーターをTXTファイルで保存したいのですが

<div>
<div class="a">りんご</div>
<div class="b">200円</div>
<div class="c">赤色</div>
</div>

<div>
<div class="a">いちご</div>
<div class="b">300円</div>
<div class="c">赤色</div>
</div>

<div>
<div class="a">みかん</div>
<div class="b">150円</div>
<div class="c">オレンジ色</div>
</div>

のようにTXTファイルで保存したいのですが?

テーブでhtmlで保存できるソフトは結構あるのですが。
上のに出来るソフト、マクロ?等でやり方があれば教えてくださいお願いいたします。
現在使ってるソフトはSmoothcsvです。

出来る限り無料ソフトでお願いいたします。

csvエディッタ?ソフトで下記のような事を出来る無料ソフトありませんか?

もしあれば教えてください。

やりたい事

CSVエディッタ?で開いたらこのようなCSVファイルがあるとします。そのCSVを入らない行列、列を消して残ったデーターが画像のようなデーターです。

そしてこのデーターをTXTファイルで保存したいのですが

<div>
<div class="a">りんご</div>
<div class="b">200円</div>
<div class="c">赤色</div>
</div>

<div>
<div class="a">いちご</div>
<div class="b">300円</div>
<div class="c">...続きを読む

Aベストアンサー

出来合いのものはちょっと思いつきません。

エクセルでもCSVの操作やテキストの出力はできるのでマクロを組むのが早いと思います。

QCSVをExcelに変換したい

お世話になります。

CSVファイルをExcelファイルに変換する場合、CSVファイルをExcelで開いて拡張子を「xls」もしくは「xlsx」を指定して保存すればよいかと思いますが、PCにExcelがインストールされてない環境の場合、Excelに変換することは不可能でしょうか。

今回、Accessにてツールを作成し、CSV(カンマ区切り)のデータを読み込もうとしておりますが、そのデータの中には単語の中にカンマが含まれているものがある為、普通にCSVをインポートしようとすると、ズレてしまいます。

なので、インポートする前準備としていったんExcelに変換したいと考えているのですが。。そのPCにExcelがインストールされてないと、やはり変換することは出来ないでしょうか。

もしくは、カンマ区切りのCSVファイルをタブ区切りに変換したりすることは出来ますでしょうか。

ご教授の程、宜しくお願い致します。

Aベストアンサー

>Accessにてツールを作成し、CSV(カンマ区切り)のデータを読み込もうとしておりますが、そのデータの中には単語の中にカンマが含まれているものがある為、普通にCSVをインポートしようとすると、ズレてしまいます。

毎回同じCSVのフォーマットだったら
(項目数やデータ型など)
一度インポートウィザードで進めて行って
設定ボタンから定義を保存し
次回からはその定義名を使用してインポートしては?
VBAならDocmd.transferText のヘルプにあるSpecificationNameに定義名を入れます。
・・・じゃダメかいな?

>インポートする前準備としていったんExcelに変換したい
CSVファイルを直接開くとExcelのお節介機能で
電話番号などの前ゼロがなくなったり、ハイフン付きのデータが日付と解釈されたり・・・
ということががあるので、拡張子CSVをTxtに変えてから
Excelで開こうとするとウィザードが立ち上がって・・・と出来ますが
結局のところ二度手間です。

ご参考まで。

QCSVファイルでの文字化け

CSVファイルで英語は問題はありませんが、日本語が文字化けします。どうすればよいでしょうか

Aベストアンサー

 この様な質問では、情報が不足し過ぎていて、正直お答えできかねます(作成時、及び閲覧時に何のソフトを使って開いたのか等)。
 ここのサイトでもみて、質問の方法くらいは最低限勉強しましょう。
  →http://www18.atwiki.jp/live2ch/pages/161.html#id_9232692a

 ただ、推測で事を進めますが、単純に「文字コード」が合っていない為、日本語が文字化けすると考えられます。

QCSV形式に変換

プログラミング(C言語)で、ファイルの内容をCSV形式に変換し、指定した出力ファイルに出力するプログラムを作成せよ。という課題がありましたが、
ファイルの内容をCSV形式に変換
がわかりません。どのようなプログラムをかいたらよいのでしょうか?

Aベストアンサー

#5です。
よく見たらフィールド内での入れ替えが居るようなので、
#5で書いたやり方ではできませんね。。。
#参考だしいいのかな。。。

読み込みを一行ずつにして、
中を入れ替えて・・・
という作業が必要になります。

Qcsvファイルが開けません

CSVファイルが開けません、OpenOffice.org3.3で開けるはずですが、なぜか開くことが出来ません。以前は開けたはずですが、なぜなのかわかりません。いろいろやって見たりしたのですが、いろんなものが入ってきたりしてダメでした。OS MSxp 機械はFujitsu2001年モデル 

Aベストアンサー

OPEN OFFICE.orgのどのセクションを使われましたか。わたしが試したのは、表計算機能ですが、開くことが出来ました。報告いたします。


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング

おすすめ情報