サクラに誘われて

ちょっと都内を徘徊。 ルートはほぼ同じながら、豊洲のゆりかもめの市場前っていう駅のところに晴海通りに並行する橋が出来ていたのでそれを渡って、ちょっと行ってから右折して勝どきに出て晴海通りに入り、銀座、桜田門、半蔵門、千鳥ヶ淵の交差点から北の丸を通って竹橋に抜け、専大前、駿河台下、明大、御茶ノ水駅前、順天堂前、本郷消防署前で春日通りに入り、御徒町をかすめ三つ目通りから6号経由で帰ってきた。
--
☁ のち ☀

引きこもる

ダウントンは見たけど、コロンボを見るのを忘れる。 ダウントンは、あのタイミングでマシューを殺すという本が凄すぎるって云うか、よく考えついたなぁと思う。
--
☁ のち ☂

通院

先週の大腸外科のフォローアップ。 1時間待たされ診察。 CRPもさがっているし、きっと炎症が起きていたんでしょうと云う結論になった。 今後のことを考え、抗生剤を処方してもらい終了。 終わってから予定通り千鳥ヶ淵に寄ってみた。 サクラは、ほぼほぼ満開の様子。 人出もすごい。 コインパーキングの料金が半端なく、早々に退散した。 もう1度くらいゆっくりと見に来たいかも。 午後は、自宅に帰り予約していた『砂の器』を見る。 金が掛かっているなという感じ。 いや、面白かったですよ。
--
☁

引き続き

GASのコードを書いている。 てか、WEBアプリなのでhtmlも混ざっていたりするのだけど。 GASからは、しばらく遠ざかっていたので、文法とか仕組みとか忘れてしまい、始めるまでは気が重かったんだけど、始めてみると割と面白かったり。 ちょっと助かった。
--
☁

GAS

久しぶりにGASの開発。 すっかり忘れていて、入門書を読みながら、なんとか思いだす。 そう云えば、昨日、久しぶりに娘からメールが来て何かと思えば、『GASで二次元配列にフィルタかける書き方ってわかります……？』なんて書いてある。 そんなこと急に云われても知らない。 ネットでぐってみればと返事をしたら、すでに調べつくして見つけられずメールをしたとのこと。 ちょっと調べると、どうやらフィルターってスプレッドシートのメソッドみたいで、二次元配列だったら自分で実装しないといけないんじゃない？って回答したけど、合ってるかしら？
--
☀

Outlook.com で既定の差出人アドレスを変更する

フリーのWebメールは、GmailとOutlookを併用している。 Outlookは古くはhotmailなんて呼ばれていた。 で、ヘルプを見るとメールアドレスを追加できるみたいだったので、数ヶ月前に新しいアドレスを追加した。 そして、追加した方のアドレスをメインとして使う設定をした。 スマホからは問題ないんだけど、PCのブラウザからメールを作成してみると、アドレスが古い方のままになっている。 なんでだろうとか思いつつ、いろいろ設定を見たんだけど、デフォルトのメールアドレスを変更するところが見つからない。 ネットを探してやっと見つけた。 以下がそのページのコピーで、この通りやってみると無事変更することが出来た。

既定の差出人アドレスを変更する

1. ページの最上部で、[設定] Settings > [Outlook のすべての設定を表示]を選択。
2. [オプション] ウィンドウで、[メール]、[メールの同期] の順に選びます。
3. [既定の差出人アドレスの設定] で、ドロップダウンリストからアドレスを選びます。
4. [保存] を選択します。

まさか『メールの同期』って云うオプションだとは思わなかったよ。
--
☁ のち ☀

サクラウィーク2019

3月21日に開花した都内のサクラ。 地元のサクラは、やっと1分咲程度。 見ごろは、週末か、もうちょっと後かしら。 来週末だとちょっと遅すぎかな。 金曜日が通院になったので千鳥ヶ淵を回ってみようかしら。 でも天気が心配。
--
☀

所用で

実家に。 午前中、いい加減な時間に出たのに、京葉道路が混んでいる模様なので、東関道経由で向かう。 宮野木で少し混んだもののあとはすんなり進んだ。 所用を済ませ、お昼をご馳走になりちょっと高校野球を見て暇する。 野球は横浜の圧勝かと思っていたら、ニュースを見ている間に逆転。 その後も明豊が得点を重ねて勝利。 ちょっとびっくりした。 それから、名豊の校歌、声に聞き覚えがありネットで調べるとやっぱり南こうせつだった。 夜は、子供のリクエストで粉物。 お好み焼きともんじゃになった。
--
☀

メンテナンス

バルのオイル交換に小川町の吉野自工に向かう。 のんびりしていたら出発時間が遅くなり、途中でお昼を食べることにした。 いろいろ考えた末、むかし通っていた新所沢のたつみで蕎麦を頂くことにした。 昼過ぎに着くと、駐車場は一杯。しばらく待ってクルマを停め店内へ。 1人だったので待たずにカウンターに案内された。 むかしいつも食べていた蕎麦定食（蕎麦とごはん、日替わりの小鉢と漬物のセット）がまだあるか聞いてみると、まだあると云うのでそれをお願いした。 蕎麦は懐かしい味、小鉢は根菜の煮つけだった。 そしていちみん邸を目指し出発し、2時半ごろ到着した。 オイル交換をしてもらい、ついでに少し減っていたクーラントも補充してもらう。 しばらくおしゃべりをして缶コーヒーをご馳走になり4時半ごろ暇した。 高速の案内によると渋滞が酷そうだったので圏央道経由で帰ってきた。 それでも2時間くらいかかったものの無事帰還した。
--
☀

通院

きょうはカテ交換と腎臓内分泌内科。 腎内の検体検査のオーダーが入ってなかったので、受付けで先生に確認してもらいまず検体検査を済ませる。 続いて、カテ交換。 左はすんなり。 右は、抜けかけていたようで固定水を2cc入れられるもやっぱり痛い。 医者が機転をきかせ、手術以降太くなっていたカテーテルをもとの太さに替えてくれた。 これだと2ccでも痛くない。 細くなったせいで脇漏れがひどいけど、それもおいおい治まると思われこれで行くことになった。 次は、腎臓内分泌。 採血の結果もほぼほぼ。 クレアチニンの値も前回より改善した。 そして、先週から今週の初めにかけて、結構痛かった会陰部を大腸外科で見てもらえるよう腎内の先生にお願いする。 先生はすぐ了解してくれて手配をしてくれ、大腸外科へ。 既に痛みは治まっているものの、これまでの経緯を話すとCTを撮ることになった。 撮影後、再び診察。 やっぱり会陰部の溜りに大きな変化はない模様。 抗生剤と痛み止めを処方してくれ1週間後にフォローアップの予約を入れてくれた。
--
☁

食事会と遥かなる山の呼び声

月一の食事会。 上の子（孫）も大分しゃべれるようになってきた。 4月からは幼稚園に通うらしい。 そして、ボクの誕生日が近いこともありケーキで祝ってくれた。

■

夜、見るつもりはなかったものの『遥かなる山の呼び声』を見始めると、なかなか面白いのでついつい最後まで見てしまった。 昔は健さんが主人公だったのね。 阿部寛も健闘していた。 虻田役も筧くんだし。 最初は、吹越満かと思ったよ。

ニホンとニッポン

ラジオ深夜便でたまに『気になる日本語』と云うコーナーがあって興味深く聞いている。 今回のテーマは『ニホン』と『ニッポン』。 国名に言い方が2つあるのは珍しいらしい。 アメリカ合衆国を略してアメリカとかUSAと云う例はあるけどって。 で、本題。 チコちゃんでは、江戸っ子のせっかちな性格のせいだって云ってたけど、気になる日本語では普通はニホン、特別なニュアンスのときはニッポンになると云っていた。 同様の例として、『やはり』と『やっぱり』や『とても』と『とっても』などが紹介されていた。 促音だと特別感がつくらしい。 スポーツの応援のときは、ニホンとは云わずニッポンと云うと。 なるほどね。
--
☀

忘れられたスター

土曜日、ホテルについてTVをつけるとコロンボが佳境に入っていた。 子供のころにも見てるはずだけど、あんまり記憶にない。 病気のせいで自身の犯罪の記憶をなくした犯人。 そして余命は2ヶ月。 その事実を知った昔からの友人が自分が殺したとうその自白をする。 コロンボで泣くとは思わなかった。 良い話だ。
--
☀

神の火

先週末、上巻読了。 きょうから下巻を読み始める。 だんだん島田がのっぴきならない状況に追い込まれていく。 良もどうなっちゃうんだろう？ って、知ってるけど。 あの頃の時代状況がなんとも懐かしい。
--
☀ いちじ ☂

浜名湖への道（2日目）

朝食もバイキング。 適当な時間にチェックアウトし、浜名湖遊覧船の乗り場を目指す。 30分の船旅で浜名湖を周遊。 浜名湖に架かる東名の橋の下をくぐったりする。 船を降りると、クルマで数分のかんざんじロープウェイの乗り場に移動。 ロープウェイの人となった。 大草山山頂まで約4分。 ゴンドラからや山頂の展望台からの眺めは、流石にキレイ。 暫く山頂からの景色を堪能して下りのロープウェイに乗った。 朝、いっぱい食べたので昼はパスすることにして帰路についた。 浜松西I.C.から西進、浜名湖S.A.でお土産を購入。 三ケ日JCTから新東名に入った。 新東名は、最高速度120kmの試行区間があってちょっとびっくりした。 東名に合流後、結構ひどい事故渋滞で浜名湖を出てから6時間くらい掛かって帰還した。
--
☀ いちじ ☂

浜名湖への道（1日目）

先々週の箱根に続き、今週末は浜名湖に。 先々週より1時間ほど早く出発した。 東名までは、大した渋滞もなく順調に進む。 港北PAで小休止のあとイグニッションキーを回すもセルが動かない。 えっ、どう云うこと？ いままで走ってたんだからバッテリーが上がるってことも考えられない。 ボンネットを開けてバッテリーを見るも、これと云って問題なさそう。 もう一度、エンジンを掛けてみると普通に掛かった。 何だったんだろう？ 取り敢えず出発する。 中井PAでは、またセルが回らなくなると困るので、エンジンを切らずに休憩する。

■

次に寄ったのが足柄SA。 もう大丈夫かと思いエンジンを切るも、やはり掛からなくなった。 再びボンネットを開けバッテリーを見る。 プラス側の端子を触ってみると緩んでいる模様。 これかもしれないと思い、工具箱からプライヤーを取り出しネジを締め直した。 それ以降は、問題なくなったので、端子が緩んでいたせいらしい。 緩んだくらいで電気が流れなくなるんだとあらたな発見をした。

■

その後は、順調に進み11時過ぎに浜松西I.C.で高速を降りた。 昼のことは考えていなかったのだけど、ふとさわやかのことを思い出し、インター近くの店に向かった。 流石はさわやか！ 既にパーキングはいっぱいで道路で待っているクルマが2、3台。 交通整理のおじさんが80分待ちだと教えてくれた。 80分は厳しいなと思っていると、そのおじさんがクルマで15分ほどのところにある別の店を教えてくれた。 そこならそれほど混まないらしい。 そして、ここはインターから近いので特に混むとのこと。 店名を聞いてナビに入力してその店に向かった。

■

道が混んでいたので20分以上掛かったものの無事到着。 こっちは15分待ちくらいと云うことで暫く待つことに。 20分ほどで席に案内された。 オーダーは、初めてなのでお約束のげんこつハンバーグのランチにする。 むちゃくちゃ美味いというほどでもないけど、20分待ちなら十分おっけー。 80分待ちならパスかなと云う感じ。 食事のあと、はままつフラワーパークと浜松動物園を観光する。 そして、奥浜名湖の湖畔に立つホテルの人となる。 夕食は、バイキング。 場所柄のせいか、うなぎ、餃子、静岡おでんなんかが目を引いた。
--
☁ ときどき ☀

1週間

があっという間に終わる。 天気予報から、サクラの開花予報が聞こえてくる。 例年だと1番は高知だけど、今年は福岡らしい。 東京は20日とか21日とからしい。 来週には開花って割には朝晩の気温が低い気がするんだけど。
--
☀

と云うわけで

ピエール瀧は、結構大問題になっている模様。 いだてんにも出てるんだって？ 龍馬伝に出てたのは知ってるけど、いだてんは見てないから。 あと、あまちゃんにも出てたって？ ネットを見るとお寿司屋さんの大将の役だったらしい。 そう云えばそうだったかも。 犯罪を犯したのだから本人が処罰されるのは当然だとしても、過去の作品が見られなくなるのはどうなんだろう？
--
☀

24時間を超えたTimeシリアル値を"hh時間mm分"にする

勤務時間の計算を行っている。 計算は、まあいいんだけど"hh:mm"って表記された時間、例えば88:20とか（元はシリアル値）を”hh時間ｍｍ分”と表示させる（例だと88時間20分）必要があって、ググりながらいろいろやってみたけどなかなか上手くいかない。 ワークシート上では、DAY関数でシリアル値を日に変えてくれると云うページを見つけた。 この例だと、3を返してくれる。 ところがVBAのDay関数は任意の日付データから日を切り出す仕様で、例のシリアル値を喰わせると2が返ってくる。 と云うわけで、さらに調べてみると、DateDiff関数と云うのがあって、単位（時とか日とか月とか）を指定して開始日時と終了日時の期間を指定した単位で返すらしい。 で、単位を日、開始を0、終了を88:20のシリアル値にすると3が返ってきた。 あとはそれを24倍して時間にして、あまりはHour関数で普通に取ってこれるので足せば時間が求まる。 分の部分もMinute関数で普通に持ってこれるので、文字列にしてつなげればおっけー。
ソースはこんな感じ

    Dim strWhour        As String       ' 実働時間（時間）
    Dim strWmin         As String       ' 実働時間（分）
    Dim strTotalTime    As String       ' 実働時間

    ' 実働時間を作る
    strWhour = DateDiff("d", 0, ThisWorkbook.Worksheets("Sheet1").Range("J44").Value) * 24 + _
    Hour(ThisWorkbook.Worksheets("Sheet1").Range("J44").Value)
    strWmin = Minute(ThisWorkbook.Worksheets("Sheet1").Range("J44").Value)
    strTotalTime = "実働：" & strWhour & "時間" & strWmin & "分" 

■

ネット上では、ピエール瀧の話題が結構盛り上がってるみたい。
--
☁ のち ☀

エレベーター

今のエレベーターは賢いから、乗ってすぐボタンの前に立って開くボタンを押したりしなくていいから。 先に乗った人は奥に入ろう。 扉の所に立たれると邪魔なんだよ。
--
☀