やって来た３号機を駆って、いちみん邸まで。
きょうは高速の渋滞もさほどではなく予定していた時間に到着。
久しぶりに2号機と対面した。
うだうだしながら、すぐ移せるものを3号機に移動する。
しばらくすると藤野くんもやってきた。
お昼になったので、いちみんさん、藤野くんと、きょうで車検が切れるというイプシロンに乗って『麺やHikari！』というラーメン屋に向かいランチ。
ボクはただの醤油ラーメンにした。
なんだか麺が日本そばのよう。
なんとなく身体によさそうな感じ。
そして、食後にメニューに出ていた『世界一旨い珈琲牛乳』も頂く。
ボク的にはラーメンはイマイチな感じだけど、珈琲牛乳は、懐かしい味で美味しかった。
午後には、鉄男さんもやってきてプチオフ状態。
こまごましたメンテと移設、そして塗り絵をお願いして帰ってきた。
出来上がりは来年になりそう。
--
プレゼント
孫の誕生日（2人とも）が近づいてきたので、何かプレゼントをと思い、絵本を贈ることにした。
上の子（男）には、ボクのお気に入りのHans de Beer著『しろくまくん、どこへ?』にした。
下の子（女）には、『100万回生きたねこ』も考えたけど、まだ小さいので『おおきなかぶ』にすることにした。
仕事の帰りに、表参道で寄り道して『クレヨンハウス』へ。
ここに来るのは何年振りだろう。
しろくまくんは店になくて取り寄せになった。
おおきなかぶは取りおいてもらって届いたときに購入することにして店を後にした。
喜んでくれるといいんだけど。
--
--
通院
きょうは、カテ交換と腎臓内分泌内科のフォローアップ。
泌尿器科で、今後の展開について聞いてみた。
時期の明言は避けたものの、人工透析は既定の路線みたいで、まあ、それはわかっていたのだけど...。
実際に始める半年から3ヶ月前にシャントを造設すること、透析が始まると尿が出なくなること（これは初耳）、ボクの場合は、カテを抜く（尿が出なくなるので）タイミングが悩ましいことなど。
交換は、いつものようにサクッと終了。
--
■
それから採血をして、腎臓内分泌の受診を待つ。
ほぼほぼ予定通りの時間に呼ばれ、診察開始。
クレアチニンの値はちょっと回復していて、このままなら当分経過観察で良さそう。
ときどき、えらいしんどくなるって話しをしたのだけど、それは貧血のせいではないと云われた。
それから、またワーファリンが効きすぎているようで次回の循環器内科の受診まで3mgから2mgにすることになった。
診察のあと、貧血の注射をして終了。
--
パスワード付きの
zipファイルを解凍するコードを書いている（Outlook VBA）。
なんか昔は、そのままできたみたいだけど、今はツール（DLL）をインストールしないと難しいみたい。
ネットを見てたら、自分のブログの記事（2015年）が出てきて笑った。
そう云えば昔、zipファイルを解凍するプログラムを作っていたような気がする。
でも、同じコードを書いてみても、今の環境だとエラーになって動かない。
やっぱ、ツールをインストールするしかないのかも。
--
--
納車
昨日の予定だったのが諸般の事情できょうになった。
仕事を早退して、午後2時過ぎに無事引き渡された。
値段も値段だし、そこそこやれているものの2号機よりキレイなところもある。
想定外だったのは、
--
ときどき
- ルームランプが点かない
- 時計のバックライトが切れている
- フューエルキャップのカギがイグニッションキーと違う
- フェンダーに小さなへこみがある
- リヤバンパーに傷
- シフトチェンジのときの違和感
--
ときどき
食事会
熱はあるものの、ドタキャンするのもナニなので、抗生剤と解熱剤を飲んで予定通り開催。
きょうは、子供のリクエストで、実家に集まることに。
雨の中、京葉道路の幕張PAで合流。
2時半すぎに到着した。
最初は、人見知りしていた孫たちもしばらくすると慣れてきたようで、姪っことボール遊びをしていた。
5時ごろ暇して、近くのファミレスで夕食を頂いて散会となった。
--
--
通院
きょうは、半年に1度のストマ外来。
ほぼ予定通りの時間に始まり、さくっと終了。
次回、半年後の予約を入れてもらう。
もしかしたら、次回は人が変わっているかもしれないと云われた。
いつも、こんな風にちゃっちゃと終わればいいんだけど。
--
■
午後から悪寒がしはじめ、熱が夕方9℃台まで上がる。
腎臓だとは思われるものの予定もあり、以前処方された抗生剤を飲んで様子を見ることにする。
--
呑み会
きょうは、仕事場でいつも登場するF氏の企画で呑み会。
メンバーは、F氏と浅草時代に勤めていたS氏とボクの3人。
場所は、尾久の焼肉屋。
店は、ボクがリクエストした。
むかし通っていた職場のそばの店だ。
仕事を終え、2人で尾久に向かっていると、S氏から急に来られなくなった旨の連絡が入りびっくり。
店に予約していることもあり、2人で呑むことになった。
久しぶりだったけど、牛すじ煮込みは絶品。
肉も普通に美味い。
S氏が来れなかったのは残念だけど、それなりに楽しい呑み会だった。
--
--
やっと
調子が出てきた。
OutlookのVBA、基本的にはExcelと同じと云えば同じなのでどかすかコードを書いている。
フォルダを選択するダイアログを表示するコードを書いて実行したら、そんなオブジェクトはサポートされていないとかなんとか。
えっ？と思いネットを見ると、やっぱりOutlookではサポートされていないので、表示させるには一旦、ExcelかWoedのオブジェクトを生成して、そいつにファイルダイアログを表示させるらしい。
云われるがままやってみると、上手く表示することができた。
コードは、こんな感じ。
Private Sub CommandButtonFilePath_Click()
'
' @brief フォルダ選択ボタンがクリックされた
' @param
' @note
' @date Nov 20, 2019
'
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim appWord As Object ' Word.Application
Dim dlgFile As FileDialog
Dim wshShell As Object ' WScript.Shell
Set appWord = CreateObject("Word.Application")
Set dlgFile = appWord.FileDialog(Office.msoFileDialogFolderPicker)
Set wshShell = CreateObject("WScript.Shell")
With dlgFile
' 初期設定
.InitialFileName = Me.TextBoxFilePath.Value ' 表示するフォルダを指定
.AllowMultiSelect = False ' 複数選択させない
.Title = "ファイル保存パス選択"
.InitialView = msoFileDialogViewDetails ' 表示するアイコンの大きさを指定
If .Show = True Then
' 有効なボタンがクリックされた
' 選択されたファイルを保存
Me.TextBoxFilePath.Value = .SelectedItems(1)
End If
End With
End Sub
--OutlookのVBA
久しぶりにOutlookのVBAを開発することになった。
OutlookのVBAはExcelとちがっていろいろとめんどくさいんだよね。
実装の仕方もほぼほぼ忘れていて、ネットの力でやっと思い出したと云うか...。
午後からは、また別の案件の説明会があったりで、急に忙しくなった。
--
--
新譜
基本的に、聴くことはほぼほぼないのだけど、仕事場のBGMがJ-POPのヒットチャートになっているので、このところ俄リスナーになっている。
因みにトップ20は以下の通り。
--
- 馬と鹿 / 米津玄師
- その先へ / PiXMiX
- 君へ届け / プラチナボーイズ
- りんどう / WANIMA
- YPE MODE / Reol
- 悪友 / 上々軍団
- Raspberry Lover / 秦 基博
- こんなに好きになっちゃっていいの？ / 日向坂46
- パプリカ / Foorin
- Night Rainbow / Have a Nice Day！
- Pretender / Official髭男dism
- Sissy Sky / 宮川愛李
- イエスタデイ / Official髭男dism
- 夜明けまで強がらなくてもいい / 乃木坂46
- 宿命 / Official髭男dism
- ROB THE FRONTIER / UVERworld
- KILL THIS LOVE（JP Ver.） / BLACKPINK
- 空の青さを知る人よ / あいみょん
- マリーゴールド / あいみょん
- Lemon / 米津玄師
--
データの最後
件のRPAに喰わせるデータをExcelで作っているのだけど、実データがないところまで読み込んでしまい上手く動かないとクレームが来た。
実データ以降は空でデータは入っていそうにないのでどうしたもんかとネットを見ると『Excelが認知している最終行を取得する』と云うページをみつけた。
そこに出ているコードで試してみると、確かに実データより後ろまでデータがあることになっている。
なんでそんなことが起きるんだろう？
原因は不明のままだけど、対応しないといけないので、実データ以降を削除することにした。
削除後に、同じコードで試してみると、実データと一致した。
因みにデータが登録されている最終セルを取得するコードは、以下の通り。
--
のち
ActiveSheet.Cells.SpecialCells(xlLastCell).Address
--
のち
車庫証明（その2）
きょう出来上がると云われたので、仕事を早退して取りに行ってきた。
自宅から警察署まではちょっと離れていて、前回は病院の通院がてらチャリで行ったのだけど、それもしんどかったので、クルマで行って、近くの家電量販店の駐車場に止めることにした。
受け取った書類を用意していた封筒に入れ、近くの郵便局からクルマ屋に宛てて投函した。
--
いちじ
--
いちじ
通院
近所の病院の整形外科で事故の首の捻挫のフォローアップ。
ほぼほぼ問題ないと思うと話したのだけど、もう一度診てもらうことになった。
前回は、無茶苦茶混んでいたのに、きょうはがらがら。
病院のあとは、昨日の車庫証明の書類を持って警察署に。
書類を書いたことはあったけど、警察署での手続きは生まれて初めて。
云われるがまま申請の書類を書いて、料金を払い割と簡単に終了。
13日に出来上がるそう。
家に帰り、保険屋に連絡をして、きょうのご用は終了。
なんだかしんどくて仕方がない。
この前の腎臓内分泌内科の診察では、貧血の指標は問題ないと云ってたけど、悪くなってるような気がする。
--
ときどき
--
ときどき
車庫証明
契約している駐車場の管理をしている不動産屋に行き、車庫証明の書類を作ってもらう。
車庫証明なんて、20年振りくらいかしら。
--
■
きてぃん&美樹さんからレターパックが届いた。
中身は、谷保天満宮の御守りとお菓子。
心遣いに感謝。
新しいクルマが来たら御守りを貼らせて頂くこととする。
--
下見
先週に引き続き、2台目の下見に行ってきた。
子供が休みだったので、一緒に行くことに。
ネットで見つけた熊谷のショップは、怪しげな雰囲気。
AudiのR8やFerrariのF40が置いてある。
すぐに試乗をさせてもらい、久しぶりにバルに乗った。
ギアの入りに違和感があるものの、他は自分のクルマに乗っているよう。
外装は、先週のに比べるとちょっと落ちるけど十分綺麗。
ほぼほぼ、これに決まった感じ。
帰りにいちみんさんのところに寄り、経緯を話す。
色を塗る件も、今のクルマとコンバートすることで多少は安くなるらしい。
--
--
悪循環
ここ1週間くらい、早くに寝付くのはよいのだけど、夜中に目が覚めて朝まで眠れず、そのまま出社する。
当然ながら、昼間は眠くてしょうがない。
そして夜、夕飯も早々に眠ると、また夜中に目が覚めると云う。
まあ、このところ仕事はヒマなのでいいっちゃいいんだけど。
--
--
冬の定番
寒くなってきたので、昨夜クラムチャウダーを作ってみた。
市販のルウを使えば、相当簡単に作れる。
ルウの箱を見ながら食材を買いそろえたのだけど、作るときにじゃがいもを入れるのを忘れてしまった。
じゃがいもがなくても普通に美味しかったけどね。
(`･ω･´)
--
(`･ω･´)
--
謎熱その後
あの後も夜の微熱は続いていたのだけど、31日のカテ交換の日に処方してもらった抗生剤を試しに飲んでみると、熱は出なくなった模様。
血尿は相変わらずだけど...。
これでクレアチニンの値が下がってくれると嬉しいけど、無理だろうなあ。
--
--
実家に
暫く顔を見ていなかったので、両親の様子を見に千葉まで。
途中、ネットで見ていた中古車屋に寄ってバルを見てきた。
やれてはいるものの、幌とかリアスクリーンはなかなか綺麗でちょっと気に入ってしまった。
もう1台、目当てのバルがあるので、そっちを見てからどちらかに決めようかなと思う。
--
--
追悼
八千草薫の追悼番組で山田太一の『シャツの店』最終回を見ることができた。
平田満も出ていたのは忘れていた。
他にも、佐藤浩市や杉浦直樹、美保純とかが出ている。
番組にも平田満が出ていて久しぶりに顔を見た。
他にも『岸辺のアルバム』やインタビュー番組が紹介されていた。
先日は、ラジオ深夜便に山田太一が出ていて、ちょっと山田太一づいている。
--
のち
--
のち
きょうは
事故の相手とお茶をすることになっている。
駅前で待ち合わせて、近くのコメダに行くも並んでいる。
そんなに人気があるの？
で、ちょっと歩いて昭和の香りのする喫茶店にした。
30分ほど世間話をして、終了。
彼は、これから小田原まで自分のクルマを見に行くらしい。
ボクは、家に帰って軽く昼を済ませて髪を切りに行ってきた。
--
--
Subscribe to:
Posts (Atom)