EXCELで漢字をカタカナに変換、張り付けたデータも変換できましたよ。

EXCELで漢字の読みカナを自動生成するときによく使われるのが

PHONETIC関数

http://www.jimcom.co.jp/excel/function02/000214.html

でもこれは、EXCELで手で入力したものだけしか変換できないのです。

わたしがしたいことは、コピーや読み込みで取り込んだ感じ交じりの文字データをすべてカタナカに変換したいのです。

それで必死で探しました。そうしたら、マクロでカスタム関数を追加して解決できることがわかりました。神様みたいなブログ記事でした。これいろいろなところで使えますね。見つからなかったら手で入力していました、3000以上も。

Function GetPhoneticf(i)

GetPhoneticf = Application.GetPhonetic(i)

End Function

VBAの関数は漢字をすべてカナに変換できるようですね。候補が複数あるときはループを回せばいいそうです。EXCELの関数にこの機能をいれたらいいのにね。プラグラマでなくてもいろいろ出来ていい時代になりました。

筆者のたかきさんに感謝です。

Excel VBAで漢字のふりがなを自動作成する（2017年の記事）

https://quzee.hatenablog.com/entry/2017/06/05/193000

モニター３つにしてみました

モニター３にしてみました。

だんだん、デイトレーダーのホームオフィスのようになってきました。

これで、プライム・ビデオ流しながら、仕事できます。

BIの仕事は画面は大きいのが一番。

週末ハーブ＆野菜栽培20200729

インゲンが大量に生り始めました。

これ気を付けて見ておかないとすぐに大きくなるので、大きくなりすぎて固くなってしまうのですね。昨年は虫にやられてあまり生りませんでしたが今年は順調です。

ローリングストーンズで一番好きなアルバム

ローリングストーンズの中でこのアルバムが一番好きです。

これは中古で購入したのではなく、高校生の時に安売りセールで購入したレコードです。何十年ぶりに聴きます。

コロナ禍、時々言っていた王将が閉店 「卒業」だとか

昨日、六甲山の帰り、

王将でビールでも飲んで帰ろうかなと駅前の王将が無くなっていました。

ドアの張り紙の「卒業」という文字がとても悲し気です。

この店、娘の病院の帰りに時々使っていました。だからそれなりに思い出のある店。

飲食店は今、本当にたいへんですね。他人事ではないですが。

雨の合間を縫って、六甲山ショートコース 20200726

連日の雨で、なかなか六甲山を走れませんが、本日は午前中は雨が降らないかも、自宅から六甲山まで走ってきました。

もっと早く起きればいいのですが、連日遅くまで仕事が終わらないので通常どおりの時間に出発。結局一山越えて雨となり早々に下山となりました。