事業所郵便番号をダウンロードしたら一部の地番が日付化して表示される

質問

事業所郵便番号をデータベース化するため、郵政公社のゆうびんホームページから事業所の個別郵便番号をＤＬ、フォルダを解凍したところ、Excel形式のCSVファイルが表示されました。
　このファイルを開いて見たところ、何と地番の一部が、「3月16日」や「Oct－42」のように日付表示となっているのです。
　早速公社の郵便サービスセンターに質問したところ、多分上記の例の場合は「3－16」「10－42」が何らかの理由で日付表示になったのだろうとのことで、（応答者自身も）おかしいと思うから本社に聞いてみるとのことでした。（本社からは未回答です。）
　何ともお粗末な話ですが、調べてみたところ、元の地番が「数字－数字」となっていて、左側の数字が1～12のものが日付表示に変わっているようでした。
　それにすべてが○月○日となっているのならまだしも、例示のように欧文表示のものも多数混在し、しかも右側の数字が31以下の場合でも例えば「5月13日」でなく「May－13」となっているものもあって全く不統一なのです。
　そこで質問ですが、この誤って表示された地番をすべて元どおり「数字－数字」に修正する最も簡単な方法（手順）又は計算式をお教えください。
　注：全事業所数は２万件を超えています。
　なお、参考までに付記しますと、郵便番号にも誤表示があり、ゼロから始まる北海道や東北の一部でゼロの部分が欠け、６桁の郵便番号となっていました。（この修正は簡単でしたが…。）

回答No.4

dou-de-show

> 直接テキスト文書として開く以外は正しい結果が出ない
直接テキスト文書とて開くことで正しく見える時点で郵政公社さんの責ではありません。利用者側の問題です。

http://www.post.japanpost.jp/zipcode/dl/readme.html
の（４）に注意書きが書いてあります。

シートに何か書式設定があるかもしれないので、取り込むブックは「新規ブック」で実行して見て下さい。

http://oshiete1.goo.ne.jp/kotaeru.php3?q=1605375
のNo４氏の答を使用して見ては？

ただし、ループの最深部の行
AC.Offset(i).Resize(, UBound(myArray) + 1).Value = myArray
を
AC.Offset(i).Resize(, UBound(myArray) + 1).Value = "'" & myArray
として、強制的に「文字型」にする必要があるかも。

結果をぜひ教えてください。

参考URL：

http://oshiete1.goo.ne.jp/kotaeru.php3?q=1605375

補足

ご回答ありがとうございます。
　実はこの問題は昨夜自分自身でいろいろ知恵を絞った結果、解決しております。
　その方法は後述しますが、まずご回答の中で
＞シートに何か書式設定があるかもしれないので、取り込むブックは「新規ブック」で実行して見て下さい。
　これは＃3氏への補足に記入のとおり、そのままではどうしても一部が月日表示になります。
　データ→外部データの取込み→テキストファイルのインポートも、ファイル→開くでテキストファイルを選択したのと同じで、これではダメなんです。拡張子の変更もムダでした。
　そのほかテキストファイルの編集→置換え→すべて置換え（例えば「－」を「～」に）も最初試して見たのですが、Excelファイルに取り込んだあと、表示形式を文字列にしても、編集→置換え→すべて置換えで「～」を「－」に戻すと、そこで再び自動キャスト機能が働くのか、元の月日表示に戻ってしまいます。当初の質問はその段階で投稿したものです。

　さて、問題解決の方法ですが、テキストファイルの編集→置換え→すべて置換えで「－」を「～」に変換するまでは前のとおりですが、そのファイルをExcelファイルに取り込んだ後、番地列（A列としておきます）のセルの文字列にすべてテキスト化する「‘」をつけました。
　そしてA列の表示形式を文字列に変更し、その状態で編集→置換え→すべて置換えで「～」を「－」に戻しました。この段階で置換え対象となったセルはなぜか「‘」が消えてしまいますが、地番はすべて正しく表示されました。
　次にB列を作業列とし、B1に
=MID(A1,IF(LEFT(A1,1)="’",2,1),30)
　と入力し、最下行までコピーしたところ、すべて正しく表示されました。
　老化現象のせいか、テキスト化の「‘」を思い出すのが遅かったという私のお粗末の一席です。
　なお、参考までに、C列にASC関数で全角英数を半角英数に変えて見ましたが、この結果もＯＫでした。

　それからお示しの参考ＵＲＬにあったWendy2さんのマクロは試しておりません。その理由は２か月ほど前、マクロ組立中に突然画面で「その機能はありません」としてCD-ROMの挿入を要求され、ドライブにROMを挿入したところ途中でハングアップ、以来マクロの登録が出来なくなったからです。（他にもシステムの不安定が原因と思えるエラーが頻発しております。）
　ハングアップの原因をPCメーカーに数回問い合せ、同時にこのサイトでも質問したんですが、あらゆる方法を試しても解消せず、結局リカバリするしかないという結論になっておりまして、諸般の事情でまだそれが出来ていないのです。

　最後に冒頭ご指摘の
＞直接テキスト文書とて開くことで正しく見える時点で郵政公社さんの責ではありません。利用者側の問題です。
　については確かに仰るとおりかも知れません。郵政公社サイトの（４）の注意書を読んでなかったのも私のミスでしょう。
　しかし＃3氏への補足にも書いているとおり、私は担当者（最初はPCにうとい方が電話に出られたので、詳しい方に代わってもらいました。なお、サービス案内センターは北海道に一元化されております。）に公社の配慮不足ではないかと質問し、相手もそれを認め、本社に伝えると言ったのであのような表現をした訳です。
　そのときのやりとりの中で、郵便番号データサイズの話も出ましたが、地域分も都道府県別だし、事業所も２万ちょっとだから、Excel形式のCSVファイルにするぐらいなら、直接Excelファイルにして地番が正しく表示されるように出来るはずだといったことに対しても、先方はそうですね、と同意を示しております。
　私の思いこみだけであのような表現をしたわけでは決してないことをご理解ください。

　末尾ですが、字数制限の関係でお礼欄でなく、制限数２倍の補足内容欄に記入したことをお許し下さい。ご回答心からお礼申し上げます。