郵便番号で住所入力(エクセル)

 ★ =ASC(LEFT(PHONETIC(B2),8)) ★ 
 ども。アラクリカエシキ(阿良々木)です。
 このあいだ、郵便番号のVBAをちょっとやったので、郵便番号関連の小技を覚書。
 IME>プロパティ>詳細設定>郵便番号辞書にチェックを入れる。
  ↓ B列に全角で郵便番号を入力しキーボードの変換キーを押す。
s-POSTtoADDR.jpg
郵便番号は、ASC,LEFT,PHONETIC関数を使ってA列に表示。
ただの覚書です。ではでわ^^
スポンサーサイト



ひさびさのらくがき

 ★ 更科るか ★ 
 ども。アラクリカエシキ(阿良々木)です。
久々にクリスタ起動して落書きです。
 彼女、お借りしますから、更科るかちゃん描いてみました。
 全然上手く描けません。orz
s-ruka.jpg

郵便番号・・・

 ★ =TEXT(ZipCode,"000-0000")★ 
 ども、アラクリカエシキ(阿良々木)です。
 母が退院するまで期間限定でブログの更新しようと思います。
 で、今日のネタは郵便番号についてです。
 10月にリニューアルしたうちの職場の基幹系システムですが、データをCSVで抜いた際に郵便番号を3列に分けて出力する仕様のようで、例えば、064-0941のような場合↓の図のような感じで頭の0が飛んで上手く連結できないと同僚からヘルプがかかりました。
ziocodesample.jpg
↑のようにTEXT関数を使えばなんてことないのですが、もっといい方法はないかと検索していくつかのぞいてみたのですが・・・
LEFT関数やRIGHT関数を使ったものが多く、北海道とか0から始まる郵便番号ではずれてしまうんですが大丈夫ですか?って思いました。
普通は7桁の数値でCSV出力されることが多いのですが、CSVで"0640941"となっていてもエクセルで開くと大抵は数値「640941」としいて認識されます。
=LEFT(ZipCode,3)&"-"&RIGHT(ZipCode,4)のような式では
640-0941といううようにズレてしまいます。気をつけてくださいね。
それではまた

追記 VBAにするとこんな感じ?

Sub Sample()
Dim i As Long
Dim lastrow As Long
lastrow = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lastrow
Cells(i, 1).Value = Format(Cells(i, 1).Value, "000-0000")
Next i
End Sub

ziocode2.jpg
でわでは

母が転んで骨折し入院・・・

 ★ 介護からしばらく開放? ★ 
 ども、アラクリカエシキ(阿良々木)です。
 ここのところ、母の介護で忙しくてここ(ブログ)も更新できませんでした。
 しかし、先日母が家の中で転んで骨折し入院しました。
 不謹慎かもしれませんが、結果的に介護から解放されることになってホットしてる自分がいます。
 早く退院できればいいなという思いと、しばらく病院でゆっくりしていてくれればとか・・・
 なんだか思い悩んでしまいます。

参照不可?

 ★ 参照設定 ★ 
 アラクリカエシキ(阿良々木)です(´・ω・)(´_ _)
 お久しぶりです。なんだか最近珍しく忙しくて・・・
 ここ最近、職場でエクセルの参照設定が「参照不可」になってマクロが止まる事態が頻発しています。大抵チェックボックスをオフにすると直るんですが。
 エクセルが2010(32bit)から2016(64bit)に変わりなおかつ大量にあったファイルメーカーファイルの代替品が数多くあり、かなりの確率で参照不可で止まります。orz
 「Date」や「INSETROW」などよく使うものがライブラリにないとひっかります。
 都度都度直してますが、もう少ししたら落ち着くのでしょうか?
 ちょっと憂鬱です。キャプチャ

基幹システムの入れ替えと使えなくなるファイルメーカー

 ★ なんかもう駄目… ★ 
 来月5日から基幹システムが入れ替わるんですけどその準備で悩ましい日々が続いてます。どうもアラクリカエシキです。
 使ってるPCもWIN7からWIN10になり、これまで使ってたファイルメーカーは使えなくなり。その代替のエクセルファイルを作る日々・・・
持病で三度休職し、復帰してから久々に忙しいです。ブログの更新も久しぶりです。あつ森もここ数日起動していません。10月中旬ぐらいになれば落ち着くかなと思ってます。落書きアップしたいなあ・・・
 では('ω')ノ

季節の変わり目

 ★ 今日から9月 ★ 
 こんばんわ^^アラクリカエシキ(阿良々木)です(´・ω・)(´_ _)
 相変わらずあつ森やってます。まだまだ暑い日が続いていますが、今日から9月
 出てくるムシやサカナが変わってきました。ゲームの世界では秋になったみたいです。
 サケやキングサーモンが釣れました。これからサンマとかも釣れるようになるのでしょうか?
s-さけ
s-きんぐさけ
島の地形をいじれるようになるまではまだまだかかりそうです。
次回は落書きアップしたいです。でわでは('ω')ノ
訪問者さま
カレンダー
11 | 2020/12 | 01
- - 1 2 3 4 5
6 7 8 9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30 31 - -
プロフィール

arakurikaesiki

Author:arakurikaesiki
阿良々木(あらくりかえしき)と申します。趣味はらくがき/アクアリウム、好きな小説は物語シリーズです。あと、仕事で楽したいためにExcelのVBAをちょくちょくいじってます。
なお、当ブログはリンクフリーです、よろしければリンク貼ってください。
また、ブロともさまも募集中です。コメントとかもらえるとすごく喜びます。

ブロとも様募集中ですm(_)m

この人とブロともになる

最新コメント
リンク(敬称略)
らくがき
新着記事
郵便番号で住所入力(エクセル) Nov 24, 2020
ひさびさのらくがき Nov 22, 2020
郵便番号・・・ Nov 20, 2020
母が転んで骨折し入院・・・ Nov 19, 2020
参照不可? Oct 20, 2020
基幹システムの入れ替えと使えなくなるファイルメーカー Sep 30, 2020
季節の変わり目 Sep 01, 2020
ロード長くね? Aug 19, 2020
ルフィを描いてみた Aug 17, 2020
囲んで塗る? Aug 14, 2020
カテゴリ
アクセスランキング
[ジャンルランキング]
ブログ
3326位
アクセスランキングを見る>>

[サブジャンルランキング]
イラストブログ
122位
アクセスランキングを見る>>
にほんブログ村(ビオトープ)
月別アーカイブ
人気ブログランキング
更新通知登録ボタン

更新通知で新しい記事をいち早くお届けします

検索フォーム