昨日とは一転、雨も降る寒い1日になった。 そんな中、末っ子が卒業旅行と称してプーケットに旅立っていった。
--
くもり のち あめ
印象に
--
はれ
リニューアルオープン
--
あめ のち くもり
予定通り
週末は、引きこもり。 きょうは、午後中昼寝をしてしまい、気がつくと笑点の大喜利がはじまっていた。 夜は大河を見て、ダウントンアビーを見て...。 大河は、普通に面白い。 当時、それなりの地位の人は、権謀術数に長けていないとやっていけないんだろうなと思う。 ダウントンアビーは、十分面白いんだけど、ちょっとあざとさが鼻につくようにな気がする。
--
くもり
--
くもり
80%
一日に使う体力を100％とすると、朝の通勤に80％を使っている気がする。 帰りが15％、あとは残り。 家から駅まで歩くのがしんどい。 普通に混んでいる電車に乗り乗換駅まで10分足らず。 乗換駅には、エスカレータがなく階段を登ってホームにたどり着くとへろへろだ。 暫らくホームで待っていると始発電車がやってきて座ることが出来る。 これで、やっと一息つける感じ。 20分ほどで仕事場の駅に着き、コンビニに寄って仕事場に到着。 途中から座れるので良いようなものの、座れなかったら無理かもしれない。 帰りも、乗換駅まで座って帰るので、運動量は同じはずだけど、朝に比べて全然楽だ。
--
はれ
--
はれ
昼前
相当伸びていた髪を切りに行ってきた。 なかなか都合がつかず、やっと切ることが出来た。 夕方、久しぶりに長男一家がやってきて夕食をいっしょに食べる。 約1月半ぶりに見た孫は、大分顔のつくりもしっかりしてきて、人間らしくなってきた。 以前は、寝ているだけだったのが、ぐずったりミルクを飲んだり笑ったりと、いろんな反応を示して見ていて飽きない。
--
はれ
--
はれ
お土産
をもって実家まで行ってきた。 この正月には弟に会えなかったので久しぶりだ。 久しぶりに見た弟は、母親の弟によく似ているのを改めて実感した。 持っていたお土産以上にお土産をもらって帰ってきた。
--
はれ
--
はれ
平穏
ハードオフ明けから1週間、これと云った問題もなく過ぎた。 無理は禁物だけど、まぁまぁ普通の生活ができるくらい体調も回復してきたってことかしら。 もうすぐ春だし、寒くなくなったらもっと楽になるかも。
--
はれ
--
はれ
ハードオフ2016（3日目）
--
はれ のち くもり
ハードオフ2016（2日目）
--
はれ
ハードオフ2016（1日目）
--
あめ のち くもり
忘れたころ
以前、話題になった東京駅開業100周年記念Suicaがやっと手元に届いた。 すでに2年が過ぎている。 最初からわかっていたことではあるけれど、定期にできないのは痛い。 てか、実際つかいみちないし。
一夜明けて、ほぼ痛みは消えた。
--
はれ
一夜明けて、ほぼ痛みは消えた。
--
はれ
通院
きょうはカテ交換。 前回から担当は女医さん。 きょうは、左が痛い痛い。 抜くときから痛くて、その後も終日痛みが続く。 痛いの、イヤ！ そんな中、午後は帰省の準備で、給油と洗車、お土産買いと動き回った。
--
はれ
--
はれ
ルート
C2大橋JCTから3号渋谷線、東名、第2東名、伊勢湾岸道、東名阪道、新名神、名神に戻り、西宮まで。 阪神高速3号線、第2神明道路から阪神高速5号湾岸線をかすめ、神戸淡路鳴門道路で淡路島を経由し四国に上陸。 徳島道から高知道、最後は国道381号。 Googleマップによれば約900kmの道のり。 天気がイマイチっぽいのがどうにも。
--
はれ
--
はれ
三寒四温
昨日の陽気はどこへやら、また寒くなってしまった。 おまけに小雨まで降っているし。 三寒四温て、冬が終わりだんだん春になっていく頃のことを云うんだと思っていたら、冬に寒い日が3続いた後、暖かい日が4日続くパターンの冬型の気圧配置ことを云うらしい。
--
くもり ときどき あめ
--
くもり ときどき あめ
サルベージ
先週、修理の終わったバルを回収する予定だったのに、インフルのせいで叶わず、きょうリベンジとなった。 関越は、スキー渋滞みたいなので、東北道から圏央道経由にする。 きょうは、途中の川島I.C.で降りて、あとは254号で向かった。 久しぶりに対面したバルはやっぱりかっこいい。 しばらくだべって帰りに所沢のたつみそばに寄ってそばを食べて帰ってきた。
--
はれ
--
はれ
米大統領予備選
クリントン氏が楽勝かと思っていたら、サンダース上院議員の圧勝。 ボク的には予想外だった。 ニュースによるとサンダース氏は、社会的弱者から絶大な支持を得ているらしい。 今後の展開が気になるところ。
--
はれ
--
はれ
確定
--
はれ
発熱
明け方から悪寒がして、熱を計ると38度。 腎臓の問題では無さそうなので、インフルな気がする。 仕事場で2名発症している。 その後も熱が上がり9度4分になった。 明日、休日診療の病院に行くことにしよう。
--
はれ
--
はれ
デミグラまん
デヴィッド・ボウイ、イーグルスのグレン・フライに続き、アース・ウインド＆ファイアーのモーリス・ホワイトも逝ってしまわれたんですね。 きょう知りましたよ。
--
はれ
ハードオフ2016
祖母の七回忌にバルで向かう計画を立てている。 公共交通機関でとも思ったんだけど、元気なうちにクルマで行くのも良いかと思い直した。 21日が法要なので、19日の深夜出発、20日午後着の予定。 帰りは、22日朝出発、22日中に到着の予定。 今回、ぷーの長女と最後の春休み中の二男も行く模様。 長女は両親と飛行機で先乗り、2週間滞在する。 二男は、ボクのナビゲーターとして同行。 短期の保険に入って彼にもちょっと運転してもらおうと画策中。
--
はれ
--
はれ
平穏に
過ぎていきますよ。 今朝は、いつもより寒い気がしたけど。
今期のTVドラマ、『お義父さんと呼ばせて』と『フラジャイル』がツボ。 『お義父さんと呼ばせて』はくだらないと云えばくだらないんだけど、なんだか楽しい。 『フラジャイル』は、長瀬君がいい役をやっている。“せーかーい”のときも良かった。 もしかしたら長瀬君、好きかも。
--
はれ
今期のTVドラマ、『お義父さんと呼ばせて』と『フラジャイル』がツボ。 『お義父さんと呼ばせて』はくだらないと云えばくだらないんだけど、なんだか楽しい。 『フラジャイル』は、長瀬君がいい役をやっている。“せーかーい”のときも良かった。 もしかしたら長瀬君、好きかも。
--
はれ
バグ
コンビニで収納したデイリーのデータを銀行経由で受け取っている。 それを集計して1月分のデータをExcelのシートに集計するプログラムが完成して、先週末からテストしてもらっていた。 そした、ある月のデータだけ元の処理と差異が生じると云われた。 いろいろ調べた結果、元データが違っていることがわかった。 1レコード120バイトの固定長のデータが途中からずれていて、プログラムが必要なデータを見つけられなかったせい。 年末年始でデータの切り貼りをしたときに間違えたらしい。 原因がわかってすっきりした。
--
くもり
--
くもり
バースディケーキ
--
あめ のち くもり
通院
--
あめ
行く末
今月で閉店する件の中華屋。 明日は、通院で仕事を休むのできょうが最後。 帰りにちょっと挨拶したら、改装の後3月から和洋の定食屋になるらしい。 中華より選択肢が増えそうなので良かったかもしれない。 3月が楽しみになった。
--
はれ
--
はれ
通院
きょうは眼科。 前回の処方で作ったメガネでどうなったかの診察。 新しいメガネでも残念ながら、普段は問題なく見えるんだけど、ダメなときにはやっぱり二重に見える旨を話す。 一通り、眼球の動きを調べたり視力検査をして終了。 結局、全面的な解決には至らなかった。
--
はれ
--
はれ
半日
いま作っているExcelのVBA。 金曜日の帰りに保存したときにはなんの問題もなかったのに、今朝起動すると『オートメーションエラーです。エラーを特定できません』なんてエラーが出る。 なんでだろうと不思議に思いながらぐぐってみると、WindowsUpdateのあと起きるとか書いてあるページを見つけた。 確かに金曜日の帰り、WindowsUpdateが走っていたのを思いだした。 ページに書いてあった対処法を試してみるものの、上手くいかない。 いろいろやっているうちに、昼ごろ上手く行くようになった。 あれこれしたせいで、どれをしたから直ったのかよくわからない。 直ったからいいようなものの困ったもんだ。
--
はれ
--
はれ
ひきこもり
どうも週末は引きこもることが多い。 アマゾンから届いた大野雄二のMy Little AngelをiTunesに取り込んだりiOSのアップデートをしたり。 琴奨菊は、きのう、きょうと危なげない取り組みで1敗、白鵬はきょうも精彩を欠く取り組みで3敗。 琴奨菊の初優勝となった。
--
はれ
--
はれ
琴奨菊と通院と
3横綱を破って優勝争いのトップを走っている。 きょうは豊ノ島と対戦する。 いつもなら豊ノ島を応援するんだけど、きょうは琴奨菊に勝ってほしい。 このまま全勝で初優勝して欲しいと思っていたのに、豊ノ島が勝ってしまった。 これで白鵬と1敗で並んだ。 優勝は厳しいかも...。
きょうも、病院。 先月キャンセルした上部内視鏡検査のリベンジ。 下部内視鏡に比べると、結構厳しい。 とは云えたかが知れてるけどね。
--
はれ
きょうも、病院。 先月キャンセルした上部内視鏡検査のリベンジ。 下部内視鏡に比べると、結構厳しい。 とは云えたかが知れてるけどね。
--
はれ
あと数日
仕事場近くの中華屋が今月一杯で閉店する模様。 客もそれなりに入っているし、味もそこそこなのになんで閉店なんだろう？ ヘビーローテてか、ほぼ毎日通っていただけにショックがでかい。 2月から昼食難民になりそう...。
--
はれ
--
はれ
通院
きょうはカテ交換。 4W、今回はこれと云った問題もなく平穏に過ぎた。 交換する医者がまた今月から変わった。 今度は、女医さんだ。 今回も、すんなり交換できた。 いつも終了後は、鈍い痛みがしばらく続くのだけど、きょうはそれもない。 午後は、自宅でなはなは。 大相撲は、琴奨菊が白鵬に勝って全勝を守った。 優勝できるといいね。
--
はれ
--
はれ
人間ドック
この職場に入って初めての人間ドック。 保険組合と提携している医療機関に予約をして受診するシステム。 暮れに予約をして、きょうが受診日。 場所は、文京区小石川、最寄駅は、都営三田線の春日駅。 受付時間が朝の7時15分から30分とやけに早い。 いつもより1時間くらい早く家を出た。 7時過ぎに到着、しばらく待って受付のあと診察が始まった。 どこでもメニューはおんなじ感じで、いままでやったことがないのは肺活量の検査くらいか。 1時間ほどで終了して仕事場に向かった。
--
はれ
--
はれ
ナビゲーター
子供に代車の話をしたら乗ってみたいというので、ツーリングに出かけた。 午前中の中途半端な時間に出発。 子供に、昼に何を食べたいか聞くと魚と云うので、沼津方面に寿司を食べに行くことにした。 C2を大回りして大橋JCTから3号渋谷線から東名に入った。 子供の運転に多少の不安を感じつつも、取りたてに比べれば随分上手くなったのも事実。 渋滞にもあわず昼前に御殿場の回転寿司屋に到着。 ここは、いつぞやバルのツーリングで訪れたことがある店だった。 十分堪能して帰路についた。 帰りは、横浜青葉から保土ヶ谷バイパス経由で湾岸線に出て葛西からC2を北上、これまた渋滞知らずで快適に帰ってきた。
--
はれ のち くもり
--
はれ のち くもり
入庫
車検の時に間に合わなかった左側ドアミラーの不調。 いちみんさんから準備ができたとの連絡があり、きょう行くことにした。 前回と同じように練馬からの関越は避けて、東北道、圏央道経由で関越に入った。 ずっと順調で予定より早く到着した。 車検の費用を払ったりして、ふとバルを見ると右前のタイヤがパンクしている。 え？そんなバカな、来るときはなんともなかったぞとか思いながら、いちみんさんが手際よくタイヤを外し、空気を入れた後、水を張ったあのタイヤを入れるやつでパンク箇所を調べ始めた。 どうやらパンクではなくて、タイヤバルブのところからぽこっ、ぽこっと空気が漏れていることが分かった。 どうやって修理するんだろうと思っていると、ホイルからバルブの部分だけを外して別のバルブをつけてくれた。 なるほど、ボクはホイルごと変えないといけないのかと思っていたよ。 再び空気を入れて水につけてみると、大丈夫のようだ。 よくこのタイミングで空気が抜けてくれたもんだと感謝。 アルファGTVの代車をかりて帰路に着いた。
--
はれ
--
はれ
トルーマン カポーティ
高村薫の冷血の文庫が出てないかぐぐっていたら、本家の冷血を高村と間違えて『ああ、出てるじゃん』とか思い画像をクリックしてみると、本家カポーティの冷血だった。 それはいいんだけど、同じページに『ティファニーで朝食を』が出ていて、えっ？ティファニーもカポーティが書いたの？とびっくりしてしまった。 全然、知らなかったよ。 両方とも、読んではいないんだけど...。
--
はれ
--
はれ
ここ数日
冬らしい寒さになってきた。 昨夜の『相棒』、主役の女優、どっかで見た顔だと思っていたら、多岐川裕美だった。 暫らくは、誰だか分らなかったよ。 相変わらず『春の雪（豊饒の海・第1巻）』はスローペースで読んではいるけど挫折しそう。 やっと清顕と聡子の逢瀬がはじまるあたり。 そうそう、つい最近知ったんだけど、1年の最初の節句って1月7日なのね。 ずっと1月1日だとばかり思っていたですよ。
--
はれ
--
はれ
初雪
明け方、都心にも雪が舞ったらしい。 ボクが、見たときは雨だったけど...。 この冬は、ずっと暖冬傾向だけど、ここにきて結構寒くなってきた。 昨夜は、寝るのに失敗して2時頃まで起きていたので、きょうも眠い眠い。
--
くもり
--
くもり
大相撲も
昨日からはじまった。 昨日は、午後昼寝をして、気がついたら6時を過ぎていて、完全に見逃してしまた。 きょうは、既に見た記憶のある『相棒』を見てから見始めた。 松鳳山が日馬富士を破って金星。
10日、デヴィッド・ボウイ氏死去享年69歳、衝撃。
--
はれ
10日、デヴィッド・ボウイ氏死去享年69歳、衝撃。
--
はれ
復習
今夜からダウントンアビーのシーズン4がはじまった。 金曜日にシーズン３の再放送に気がついて、金土と夜中に後半の数回を見た。 メアリーとマシューの間にやっと子供も生まれて、これからって云うときにマシューが交通事故死をしたんだった。 波乱のシーズン4、どうなるのかしら？
『真田丸』も今夜から。 こっちもそれなりに面白い。
--
はれ
『真田丸』も今夜から。 こっちもそれなりに面白い。
--
はれ
宮詣り
--
はれ
春眠 or 冬眠
それなりに眠ってはいるはずなのに、昼食の後、睡魔に襲われる。 イカンなと思い、食事の帰りにコーヒーを買って帰るんだけど、あまり効果はなく、ついうとうとしてしまう。 顰蹙だよなぁ。
--
はれ
--
はれ
今朝も
眠かったので朝の読書はパス。 昼休みにちょっとと、帰りの電車で読む。 そう云えば、いちごうさんが去年は、年間200冊以上読んだとFBに書いていた。 すごいなぁ。 ボクが一番読んでた時期ですら50冊くらいがやっとだったから4倍以上だ。
--
くもり
--
くもり
仕事始め
きょうから仕事始め。 ことしはどんな年になるんだろう？ 長期入院はさけたいなあ。 通勤の慰めに『アメリカの影』も終わったので『豊饒の海』を引っ張りだしてきた。 朝、電車の中で数ページ読んだら眠くてうとうとしてしまった。 読了できるのかしらん？
--
はれ
--
はれ
年始
--
はれ
走り納め
410号が通行止めなのでどうしようか悩んだ末、久留里から県道32号で月崎に出た。 養老渓谷から会所林道に入り麻綿原高原 から天津林道で天津にでて海沿いの国道で鴨川を抜た。 長狭街道で内陸に入り 182号を北上、マザー牧場を掠めて九十九谷公園で写真を撮る。 小糸から木更津に出て、アクアラインから湾岸線、中央環状で昼過ぎに帰ってきた。
--
はれ のち くもり
--
はれ のち くもり
仕事納め
去年は、いろいろあって仕事納めの日は休んでしまったので、いまの職場では、はじめての納会。 今年もいろいろあったけど、後半は比較的平穏に過ごせたかもしれない。 明日か、明後日は走り納めかな。
--
はれ
--
はれ
年の瀬感
今年は、あまり感じてなかったんだけど、ここに来て感じるようになった。 寒さのせいもあるかもしれない。 朝のうちに完成した年賀状を郵便局に持っていく。 昼ごはんの後、バルの車検代を振り込もうと銀行に行くと長蛇の列。 これはイカンと思い、コンビニのキャッシュコーナーに向かうも、現金での振込はできなさそう。 諦めて、職場に戻ろうと歩いていると、北海道のアンテナショップの隣が地方銀行だったことを思い出し、行ってみた。 ちょうどATMから人が出てきたところで、すぐに振り込むことが出来た。 手数料がハンパなかったけど。
--
はれ
--
はれ
サルベージ
やっと車検が終わり、きょうサルベージにいちみん邸に向かった。 きょうも、混んでる感のある練馬からの関越道はパスして東北道から圏央道で関越に入った。 リアスクリーンが一部外れて酷いことになっていたのを縫い合わせてもらい、ちゃんとホロにつながっていた。 さらに追加の補修をしてもらった。 これでしばらくは大丈夫そうだ。
--
はれ
--
はれ
年末進行で
きょうも病院。 腎臓内分泌と大腸外科のフォローアップ。 予定では、検体検査、腎臓内分泌、大腸外科の順だったけど先に大腸外科から呼ばれた。 発熱でキャンセルした上部内視鏡検査のリベンジを年明けにしてもらうことになった。 今回は、内視鏡検査に向けワーファリンの服用を数日前から中止するらしい。 続いて、腎臓内分泌。 クレアチニンは問題なし。 アルブミンが低いので更に利尿剤が処方された。 左腎臓の鈍痛はきょうは感じない。
--
はれ
--
はれ
『下町ロケット』まつり
いよいよ最終回。 7時からは、おさらいの総集編をやっている。 途中から見たけど。 随分、駆け足で終わらせちゃった感があるけど、収まるところに収まった感じ。 なんちゃら孝太郎がロケットの発射場に、ひげ面で出てきたときには、改心して農家にでもなったのかと思ったよ。
--
はれ
--
はれ
ほぼ1年
今の会社に入社してほぼ1年が過ぎた。 2月に長期の入院があったものの、それ以降はほぼほぼ出社している。 仕事もそれなりに面白いし、無茶な納期を強要されることもないし、なかなか良い職場に巡り合えたと思っている。 この前の面談でも、よほどのことがない限り契約は更新するつもりだと云われたので、しばらくはここを居場所にしよう。
永続敗戦後論読了
--
はれ
永続敗戦後論読了
--
はれ
アクティブなセルに色をつける
エクセルで選択されているセルに色をつける必要があって、また例によってググってみた。 アクティブセルの位置はRow、Column、あるいはAddressで取ってこれるのがわかった。 色をつけるには、Rangeオブジェクトを使用しないといけないらしい。 Rangeオブジェクトに、どうやって取ってきた値を設定すればいいんだろうと悩んでいたら、なんのことはないAddressを直接設定すればいいことがわかった。
こんな感じ。
--
はれ
Range(ActiveCell.Address).Interior.Color = RGB(200, 200, 200)
こんな感じ。
--
はれ
通院
ほぼ普段と同じ時間に家を出て病院に向かう。 受付開始時間前に病院に到着した。 受付けを済ませ、しばらく待っていると処置室に呼ばれ点滴が始まった。 きょうも30分ほどで終了、抜針するのかと思ったら明日も点滴をすると云われ、またヘパロック。 東大構内に乗り入れている都営バスで上野広小路に向かう。 10時ごろには到着した。 昨日、止まってしまった腕時計の電池交換のため、松坂屋に寄る。 すぐに交換してもらい、そのまま地下に降りて銀座線で仕事場に向かった。
--
くもり
--
くもり
トラブル
早朝、右の腎臓に痛みを覚える。 腎ろうを見ると、どうやら詰まっている模様。 早速腎洗をすると、澱のようなものが出てきたあと尿が流れ出した。 痛みも徐々に引いていき良かった良かったと思っていると、悪寒がしてきた。 をいをい、このタイミングですか。 悪寒が治まると熱が39.2℃まで上がっていた。 これじゃぁ内視鏡どころじゃないし、泌尿器科に診てもらわないといけないと思い、子供に頼んで病院まで送ってもらった。 受付けで内視鏡検査のキャンセルをして、泌尿器科の当日予約を取る。 泌尿器科で検体検査を指示され、採血をして戻ってきて待つことしばらく。 白血球の値が出た段階で抗生剤の点滴開始。 きょうは、比較的簡単にルートが取れた。 手背だけどね。 入院するか聞かれるも、しなくても大丈夫そうな感じなので通院で様子をみることになった。 点滴はベースが生食なので小一時間かからずに終了。 明日また点滴して、明後日採血というスケジュールになった。 ルートは当然、ヘパロックですよ。 子供に迎えを頼み、病院の人にはならずに自宅に帰ってきた。 自宅で熱を測ると36℃台までさがっている。 大したことにならずに済みそうだ。
--
くもり
--
くもり
明日のために
明日は、上部内視鏡検査なので、夕食は早めに消化の良いものを食べるように指示されている。 なので5時過ぎにうどんを食べた。 花燃ゆは最終回、もうそんな季節なのね。 そして、下町ロケットも佳境、来週が最終回だ。
--
あめ
--
あめ
視察
--
はれ
Excel VBA の罠
パスワード付きのzipファイルを解凍するコードを書いている。 ネットを見ると、いろいろ出ててテストプログラムを作ってやってみるとすんなりできた。 簡単じゃんと思いながら本チャンでやると解凍できない現象が...。 更にググってみると、同じような現象が出ていた。 解凍するパスをダブルクオートで括って実行すると上手くいくのに変数に入れてやるとエラーになるというボクのと同じ現象。 『そんなことはない、なんか間違えてるんだろう』みたいな回答しかなかったんだけど、ソースを良く見ると、パスを入れる変数の型がVariantになっている。 ボクは、String型でやっていたのでVariant型に変えてみると、あぁら不思議、ちゃんと解凍できるじゃありませんか。 まったく、ボクにはよくわからないよ。
--
あめ のち はれ
====================================================
' ダメなパターン
Dim strUnzipPath As String
' 出力パスを拾って
strUnzipPath = Worksheets("Sheet2").Range("A1").Text
Set zipObj = shellObj.Namespace(ActiveCell.Text).Items
Application.SendKeys strPass & "{Enter}"
' 解凍する
ret = shellObj.Namespace(strUnzipPath).CopyHere(zipObj)
====================================================
' おっけーなパターン
Set zipObj = shellObj.Namespace(ActiveCell.Text).Items
Application.SendKeys strPass & "{Enter}"
' 解凍する
ret = shellObj.Namespace("C:\Unzip").CopyHere(zipObj)
====================================================
' ダメなパターンの変数をVariant方にするとおっけーになる
Dim strUnzipPath As Variant
' 出力パスを拾って
strUnzipPath = Worksheets("Sheet2").Range("A1").Text
Set zipObj = shellObj.Namespace(ActiveCell.Text).Items
Application.SendKeys strPass & "{Enter}"
' 解凍する
ret = shellObj.Namespace(strUnzipPath).CopyHere(zipObj)
--
あめ のち はれ
Windows 10 Mobile
--
はれ
OutlookからFileDialogを開く
ExcelのVBAで普通にできることがOutlookのVBAでは大変だったりする。 パスを設定するのにFileDialogを開こうと思ったら、そんなものは無いよと云われた。 ググってみると、Excelのオブジェクトを作って、そいつにやらせれば良さそうで、サンプルコードが載っていた。
なるほどね。 自分がわからなければ、知ってるやつにやらせればいいって、ある意味オブジェクト指向ぽいよね。 早速やってみたら、「ユーザー定義型は定義されていません。」てエラーが出る。 何だよ、だめじゃん。 とがっかりしながら、更にググってみると解決法が出ていた。 メニュー>ツール>参照設定と進んで、開いたダイアログの”Microsoft Excel ほにゃららLibrary”にチェックを入れれば良いらしい。 やってみると、ばっちりでしたよ。
--
はれ
'=========== BEGIN CODE ===========
Public Sub TestFileDialog()
Dim otherObject As Excel.Application
Dim fdFolder As office.FileDialog
Set otherObject = New Excel.Application
otherObject.Visible = False
Set fdFolder = otherObject.Application.FileDialog(msoFileDialogFolderPicker)
fdFolder.Show
Debug.Print fdFolder.SelectedItems(1)
otherObject.Quit
Set otherObject = Nothing
End Sub
なるほどね。 自分がわからなければ、知ってるやつにやらせればいいって、ある意味オブジェクト指向ぽいよね。 早速やってみたら、「ユーザー定義型は定義されていません。」てエラーが出る。 何だよ、だめじゃん。 とがっかりしながら、更にググってみると解決法が出ていた。 メニュー>ツール>参照設定と進んで、開いたダイアログの”Microsoft Excel ほにゃららLibrary”にチェックを入れれば良いらしい。 やってみると、ばっちりでしたよ。
--
はれ
嘉門雄三 & VICTOR WHEELS LIVE!
--
くもり
永続敗戦後論
街場の戦争論からの流れで、白井聡の『永続敗戦論』も購入。 昨日届いて、今朝から読み始めた。 思想史家、政治学者だけあって、物言いがまわりくどいきらいはあるけど、それなりに面白い。
--
はれ
--
はれ
対面
--
はれ のち くもり
バル忘年会
恒例のバル忘年会がいちみん邸で開催された。 今回はきりたんぽ鍋。 きりたんぽはどうも好きになれない。 鍋の後、焼きそば、ソーセージ焼き、焼肉と続いた。 バルは車検なので預けて、ムルチプラを出してもらい10時半ごろ暇した。
--
はれ
--
はれ
本物のじじい
明け方、第2子から、嫁の陣痛がはじまったのでこれから病院に行くと云うメールが届いた。 その後、昼過ぎに産まれたと云うメールが届く。 これで、押しも押されもしない正真正銘のじじいですよ。
日本戦後史論読了
--
はれ
日本戦後史論読了
--
はれ
手帳
--
はれ
Subscribe to:
Posts (Atom)