- ベストアンサー
txt形式の電話番号をExcelに読込とゼロがない
Windows 10 Excel 2016を使用しています。 電話機の電話帳をテキストファイルでSDカードに保存しExcelで読み読み込んだのですが、電話番号の市外局番のゼロが表示されないのです。 1つずつゼロを付けてもよいのですが、何か関数であったような記憶があるのです。 わかる方、教えてください。
- みんなの回答 （5）
- 専門家の回答
質問者が選んだベストアンサー
その他の回答 (4)
- imogasi
- ベストアンサー率27% (4737/17070)
エクセルは、数字だけのデータを読み込む（データ手入力されたときも）ときは、数値に変換してシートセルにセットしてしまう。 それで先頭部の０・・０は無くなって、シートのセルに読み込まれ表示される。 エクセルの、有名な事項なのです。この作用は強力で、停止設定操作がなく、それでは、停止できないようだ。 色々調べたが、決定打が見つけられなかった。 接頭辞（アポストロフィ）でも（文字列化する方法でも）やってみたがうまく行かない。 参考 http://officetanaka.net/excel/function/tips/tips15.htm ーー メモ帳にテストデータとして 022341123 00231234567 として、zeroファイル.ｔｘｔで保存する。２レコードです。 ーー エクセルの標準モジュールに Sub test01() Open "C:\Users\ＸＸＸ\Desktop\zeroファイル.txt" For Input As #1 i = 1 While Not EOF(1) Input #1, a MsgBox a 'a = "’" & a Cells(i, "A") = Format(a, "0000000000") i = i + 1 Wend Close #1 End Sub 注意 C:\Users\ＸＸＸ\Desktopバック\は質問者の場合に合わせて変えること。 \は、普通は¥マークを使う。 事前に、シートのＡ列（電話番号の入る列）のセルの書式を文字列に設定する。 そして上記ＶＢＡを実行。 結果 上記テストデータでは、Ａ１，Ａ２セル 0022341123 0231234567 となった。 ーー ＶＢＡまで持ち出して大げさで、また、いろんなケースをテストで来てないのですが、参考にして、読み飛ばしてください。 多分、簡単な操作でこの目的を実現できる、操作はなさそうだが。 後続の他の方の回答を楽しみに。
お礼
ありがとうございました
- msMike
- ベストアンサー率20% (371/1817)
確認させてください。 》 電話帳をテキストファイルでSDカードに保存しExcelで読み読み込んだ 当該テキストファイルの拡張子は何ですか？.csv ですか？ それとも .txt ですか？それとも他の何？区切り文字は何ですか？ 此処ではCSVファイル(ファイル名 aabbccabc.csv と仮定)として、Excel 2013 の場合の手順を示しておきます。 新規ワークシートを開いておく ⇒ Alt+AZXFT ⇒ [ファイル名]として aabbccabc.csv を選択 ⇒ [インポート] ⇒ [データのファイル形式]として“カンマやタブなどの…”に目玉入れ ⇒ [次へ] ⇒ [区切り文字]として“カンマ”にチェック入れ ⇒ [次へ] ⇒ [データのプレビュー]窓内で電話番号列を選択して後で、当該窓外の上部にある[列のデータ形式]直下の“文字列”に目玉入れ(窓上端枠の“G/標準”が“文字列”に豹変 ⇒ 画面右下の[完了]をパシーッ ⇒ [OK]をツン
補足
電話機の電話帳データをSDカードにコピーする操作で、コピーした結果テキストファイルになっているのです。（ファイル形式は指定できません。） それは、ファイルの種類 テキストドキュメント（.TXT) 名前は00000000.TXT です。
- skp026
- ベストアンサー率45% (1010/2238)
読み込む時に、文字列として読み込む方法があります。 以下は操作の例です。 http://www.yakudatsujoho.com/post-1443/ もしくはテキストファイルの電話番号の部分を ダブルクォーテーションで囲うように編集すると、 この場合も文字列あつかいになるので 先頭のゼロが保たれます。
お礼
ありがとうございます
お礼
私の問いかけである「区切り文字は何ですか？」にはどう答えます？ 質問の意味が分かりません。.txtの区切り文字は あるのですか。 結論的の、最初からExcel のデータの読み込みでテーブルツールの形式になりましたが、テーブルツールの形式を解除して、目的のものができました。