趣味はたぶん旅行です海外旅行やキャンプとITについて。Touringを借りたところ、自動運転技術が飛躍的に進化しているのに驚きました。それに味を占めて今回のキャンプにも借りてみました。前回は、一般道でもACC(追従クルーズコントロール)を使ってみたけれど、調子が良くないため使うのをあきらめました。今回、再度試してみたところ、これがかなり調子が良くて大きな国道等で使えるのはもちろん、先行車がいればそこそこの山道でも使えることがわかりました。ヘアピンカーブなどがある山道は無理でしたが。大きな道ではACCで走っていても妻が気が付かない程でした。ワインディングロードでは酔うからわかるという事でしたが。結構なカーブでもちゃんと先行車を見失わずハンドルを切っていくことが多くありました。車線を見失うこともしばしばありますし、まれですが中央分離帯や歩道に向かってハンドルを切る場合もあったので常に手綱を握っている必要はあります。馬は自殺行為をしませんが318iはするので今のところは馬以下です。平地の道でも、交差点で曲がる際に、前の車を見失った瞬間、設定された速度に向かって加速をするので、曲がる際にはいったんACCをキャンセルする必要があります。再開(Resume)は同じボタンでできるので簡単です。難点はあるものの、一般道でもかなり使えることがわかりました。帰りの高速はジャンクション以外はほぼ自動運転で、車線減少などを除けば人間の介入もほぼ不要でした。家に帰ってからの疲労がこれまでとは全然違いました。使える反面、乗っていて色々思うところはありました。現在のBMWのレベルでは残念ながら完全自動運転ははるか先の話です。曲がり角で先行車を見失うし、中央分離帯や歩道にぶつかろうとするし、自転車を追い越せばブレーキをかけるし、高速走行中にインター出口の40km等の速度制限を認識するし。その速度を自動的に適用していたら後ろから追突されかねないです。撤回はしたもののテスラが自動運転のソフトを配布したというのがすごいと思います。それだけ完成度が高いという事なのでしょう。2021ExcelのVBAで選択されているセル範囲を列単位、行単位で処理する方法について書いてみます。Excelで選択された範囲をVBAではApplication.SelectionでRangeオブジェクトとして取得できます。Selectionの処理方法について検索すると次のようなページがヒットします。この方法では、一つの行に対して列数分だけ繰り返し同じ処理が行われてしまいます。ユーザーがCtrlキーを押しながら複数の範囲(Area)を指定した場合には破綻します。ちなみに、Selection.Rows.Countは最初のエリア(Area)しかCountの対象としません。残りのエリアは対象外です。アイテム番号は左上から右方向に振られているように見えたので次のプロシージャを実行してみましたがダメでした。未処理の行があります。取得した順番を表示してみました。これは次の順番でCtrlキーを押しながら範囲を選択したためです。このように、Selectionは指定したエリア順に処理されるようで、上から順番に処理されるわけではないようです。SelectionはRangeのコレクションを順番に返しているだけなのでしょう。2021ロゴスの抗菌ウォータータンク16を購入してみました。2006年にキャンプを始めた時から使っていると思われるエバーニューのソフトタイプのウォータージャグです。15年くらい使っていることになります。蛇口をつけるのにコツがいり失敗すると漏れてくるのが難点でしたが、それ以外は特に問題もなく移動するときはコンパクトで、使う時にはそれなりに(10リットル)入って重宝していました。ところが今回、ケチってこのタンクからペットボトルに補充した水を飲んでみたところ、すっごい樹脂の臭いがしてオエッて感じでした。飲まなくてもボトルのふたを開けただけでたまらんて感じです。それとも経年変化で劣化してきたんだろうか。いずれにしろこれでは健康に悪そうで使い物にならないので引退していただくことにしました。本当はハードタイプがいいけれど車への積載を考えると今でさえ減らしたいと思っているのでやっぱりソフトにしました。やろうと思っている飛行機で移動してキャンプをするのにも必要ですし。Amazonで検索してその中で良さそうだったのがこのロゴスの抗菌ウォータータンク16。右がこれまでのエバーニュー。容量はこれまでよりアップして、持ち手もしっかりしました。蛇口も悪くなさそうです。たたまれていた状態から展開するのはとっても大変だったと妻が言いました。そのため売られていた状態には畳まないことになりました。私は気にはなりませんでしたが。水栓のレバーは、180度開くタイプでした。最初90度動かして出てこなかったので戸惑いました。180度の方がわかりやすいし、センター位置を気にしなくて良いので操作もしやすいと思いました。肝心のにおいは今回確かめるのを忘れました。使ってみると、水の出が少ないことが気になります。本体がしっかりしすぎていて変形しないのが原因かもしれません。Desktopでファイルをゴミ箱に送るフローを作ってみました。「ファイルの削除」アクションを使用してファイルを削除するとゴミ箱に入らず完全に消えてしまいます。これだと後から見たいときに困る場合があります。ゴミ箱に入れるアクションが見つからないのでVBScriptを使ってゴミ箱に送ります。一応テストはしていますが、よくコードを理解してテストをしてからご利用ください。VBAを使っていた時にはAPIを使って処理していましたが、シェルオブジェクト(実体はエクスプローラー)を使えば簡単に記述できるようです。DesktopからVBScriptを使う方法は次のページに書かれています。実際のコードは次の通りで、2行です。1行目は定数ssfBITBUCKETに10を指定しています。Namespaceに直接10を指定しても動作はしますが、10だと後から見た時になんだかよくわからなくなるため、名前付きの定数を使ってわかりやすくしています。Bucketとはヌルデバイス(Unixなら/dev/null)を指すようです。2行目はオブジェクト操作になれていないと意味が不明だと思うので、次のようにばらして書いてみました。ShellオブジェクトのApplicationプロパティ(値)からオブジェクトを生成します。Desktopを使って自動化する作業の一つはWebサービスだと思います。私は銀行の明細照会や送金等の自動化を試みています。いう作業をしていて必要になって来るのがダウンロードしたファイルの処理です。口座明細ファイルを保存するとか請求書を印刷するとかです。ダウンロードされたファイル名がわかっているのであれば簡単ですが、実際には毎回違うなんだかよくわからない暗号コードのようなファイル名が付けられて落ちてくるという事は結構あります。ファイル名が確定しなければアクションで指定してみようがないので困ります。今回はそういうファイルの処理方法について書いてみたいと思います。画像はクリックすると拡大できます。Desktopにはそのものズバリの「Webからダウンロードします」や「Webページのダウンロードリンクをクリックします」が用意されています。残念ながらこれはChromeではつかえません。使用したファイルのダウンロードはサポートされていません。ブラウザーの使用を検討してください」と言われてしまいます。Explorer)を指定しても同様です。オートメーションブラウザーってなんなのと思ったら、IEの起動モードの一つでした。それではと、オートメーションブラウザーを使ってみるとオートメーション用にすべてを削ぎ落した画面が表示され、これでは動かないサイトがありました。IEのサポート終了が来年2022年6月に迫っているというのもひっかかります。するかと検索してみると、次のページではダウンロードする前にダウンロードフォルダーをクリアするという荒業を使っている方がいます。いやこれ、私なんかはダウンロードフォルダーをデスクトップに設定しているので絶対に使えない方法です。202110月になったので世界と日本のコロナ比較をしてみました(グラフは10/17に取得)。画像はタップすると拡大できます。グラフは次のサイトからの引用です。世界と日本のコロナグラフを重ね合わせてみました。日本のグラフが世界のグラフを越えないように調整しています。日本の流行と世界の流行はシンクロしています。いわゆる第4波の時期で日本と世界が接するように調整してみました。見ても日本と世界はシンクロしていると思います。今回のいわゆる第5波はオリンピックによる海外流入にもたらされた特殊な流行だろうと思っています。先日世界の中でも特にアメリカと日本がシンクロしていることに気が付きました。わかりにくいので日本とアメリカのグラフが重ならないようにしてみました。アメリカが多いから世界のグラフと似たようなものになるのだろうと思われるかもしれませんが、ヨーロッパやアジアのグラフはアメリカとは異なっています。次のグラフはオリジナルのグラフです。日本の場合は、律義にピークが揃っています。私の考えをもう一度書いてみます。コロナが中国や韓国でブレイクする中、ついに日本に上陸して北海道で流行した際には、ああ、これはだめだ、終わった、と思いました。ところが、北海道の流行は時間がたつと終息してしまいました。そこで、あれっ?と思いました。コロナってそんなに感染力は高くないんじゃなくて?、と。その後欧米がひどいことになるのを見て、なんで日本はこんなに流行が少ないんだろうと思いました。当時納得したのはBCG説で、基本的に欧米では打っていないBCGを打っているため免疫力が高いというものです。BCGは結核菌のワクチンですがWikiによれば黄熱病ウィルスにもある程度の効果があるという事です。人の免疫力を強化させる効果があるのではと言われています。そもそもBCGを打つのは結核が多いからで、つまりそういう地域は肺が弱い人はとっくに淘汰されていて比較的強い人が生き残っているのではないかとも思っています。Touringを借りてキャンプに行ってきました。この車の自動運転支援のレベルに驚きを禁じえませんでした。19:00返却の丸5日間で利用料金は102,080円。絶対額としては高いけれど、ステップワゴンを借りるより一万円位高いだけでした。車検証を見ると型式は3BA-6K20と記載されています。令和3年6月の登録で今年のモデルのようです。プリウスの場合は次の通りなので318iに比べて少し小さい感じがあります。新型アウトバックは次の通りで318iよりさらに大きいです。幅が5cm増しというのは取り扱いが厄介です。SENSINGは全長は少し長いけれど全幅はプリウスよりもさらに狭く、狭い道では取り扱いやすい事がわかりました。ここのところステップワゴンを借りることが多くて狭い道は問題ないけれど旋回がしずらいと思っていたのは、全長やホイールベースを見ると納得です。今回借りた318iは旋回は違和感がなかったものの、幅が広くて都内での走りづらさを感じました。乗ってみて充実した装備に驚きました。これまで乗った車で最も多くの機能を搭載していました。感動したのはウィンカーを出すと自動で車線変更をしてくれる機能(軽く動かす。完全に倒すと動作しない)。ここまで来たかという感じがありました。Googleに流れてくるニュースのヘッドラインを見ていたら200万円の時計のコストは2万円と書かれていたので思わず読んでみました。これによると200万円とかする高級時計でもエンジン部の原価は4千円程度で、宝石などが埋め込まれているわけではないただの時計の場合には全体でも原価は2万円程度だという事です。時計に200万円なんてありえんと思っていただけにやっぱり高級時計を買わなくてよかったと思いました。上記記事では、逆にいいエンジンを使って中間マージンやマーケティング費用を抑えて個性的な時計を作って売っている話も載っています。以前次の本を読んだことがあります。マツダがBMWを超えるというタイトルは置いておいたとして、本の中身はマーケティングの教科書のようなもので、トヨタなどの一般的な車よりもBMWみたいな高級車の方がいかに儲かるかといったことが書かれていました。その中の一つにフォルクスワーゲンで高級車を作ったらさっぱり売れず、同じ車なんだけどポルシェブランドにしたら(アルファードとヴェルファイアのような兄弟車の関係)バカ売れしたという話が載っていたと記憶しています。価格もワーゲンよりポルシェの方がはるかに高かったと思います。それを読んでブランド品を買うのが馬鹿らしくなりました。それだけに今回高級時計の原価は1%という話を読んでますます馬鹿らしくなりました。次の話を読むと高級時計というのはもはや情弱御用達のアイテムではないかとさえ思います。PeakやApple製品等を購入しているけれど、これはブランド品だから買っているわけではなくコスパが良いものを購入した結果です。コスパが良ければコールマンの製品でも購入していますし、スマホについては以前はAndroidを使っていました。ElkanNK東京都在住で旅行が趣味かもしれない中小企業勤めのITエンジニア。