スキップしてメイン コンテンツに移動

2010/01/25桜上水まで

昨日はついついさぼってしまった足慣らしに行く。
今日は南へ。先日と同じ片道2時間、地図だと16kmの道のり。実際はもう少し歩いたと思うけど、、、。


阿佐ヶ谷住宅、作りそのままの建て替えじゃだめなんですかねぇ。そうならぜひ住みたい。


無人になった建物に残る、まだ新しい手すり(庭に降りる階段も)。
ここで長く暮らして年を取ったのだろう人の愛着を感じる。


公園もねぇ、そこらへんの児童公園と段違いに良い。ゆるさ、開放感。
柵がないし、周りが2階建てで明るいの。


珍しく鮮やかな色が並んでいたので。


先日、高円寺ではじめて気づいた「白い送電塔」。
なかなか美しい。海まで続いているようで。いっそミナレットを目指したらいい。

折り返し地点。桜上水交番前。

当店人気No.1「②たるめん」って何?!



笹竹の生垣がさわやか。

と思ったら、ここも塩漬け物件。なんだかなぁ。手前は元公園っぽい。


樹木と木材とデコボコ楽しい家でいいなぁと思ったら玄総合設計というプロのお宅でした。
浜田山から成田東も住む人の好み楽しみが感じられる家が多くて、なかなか日本もやるなぁ。
でもやっぱり日本の戸建は庭があっての美しさだと思う。

コメント

このブログの人気の投稿

その4 Excel VBAでAmazon Product Advertising API

引っ越すためついに本気で書籍リストを作っていると、どれほど少しでも省力化したくなり、しつこくバージョンアップ。 ISBNのない外国の本も検索したい ISBNのない本が思ったより多かった。フランス語のアクサンとか入力したくない。ISBNでの検索はamazon.com, amazon.frなど検索先を切り替えているように、タイトル等での検索も各国サイトを利用したい。 最初は「jpで見つからなければcom、見つからなければfr、、、」と思ったけど、だいぶ待たされちゃうし、その本のデータをどこで探したいかは決まってるので、それぞれ別のプロシージャを定義して実行できるようにした。 Public Sub searchBookInfoFromAmazonFr(dummy As Integer) searchBookInfo (amazonFr) End Sub さて、クイックアクセスツールバーに登録するのだけど、用意されてるアイコンじゃわかりづらい。各国の旗がいいんじゃないか。と思ってからが長かった・・・が、まとめれば: 旗アイコンは ここ で入手。 Ribbon Editor でリボンに自前のタブ・ボタンを登録 対象のExcelファイルを開く 右のDocument Explorerペインで「CustomUI Parts」を追加 表示される編集ペインのImageタブを開き、好きな画像を追加(From File System) Codeタブに下記Xmlを書いて保存、終了 Excelを開くとカスタム・ボタンが登録されているので、ふつうにクイックアクセスツールバーにも登録 <customUI xmlns="http://schemas.microsoft.com/office/2009/07/customui"> <ribbon startFromScratch="false"> <tabs> <tab id="customMacro" label="custom macro"> <group id="custo...

GAS 同一カラムを複数条件でfilterできない件

Google Apps Script でSpreadsheetをデータベース代わりにwebアプリをポチポチ作ってて、スクリプトからSpreadsheetにフィルタかける場合、同一カラムに複数条件を設定できないことを知って残念……。 フィルタのかけ方はこんな感じ。 日付を範囲指定したいけど、After、Before片方しかつけられない。 var dataFile = SpreadsheetApp.openById(DATA_FILE_ID); var sh = dataFile.getSheetByName(LOG_SHEET_NAME); var criteriaDateAfter = SpreadsheetApp.newFilterCriteria().whenDateAfter(new Date(targetDate)).build(); var criteriaUserEqual = SpreadsheetApp.newFilterCriteria().whenTextEqualTo(user.id).build(); if (sh.getFilter()) { sh.getFilter().remove(); } var r = sh.getRange(1, 1, sh.getLastRow(), sh.getLastColumn()) .createFilter() .setColumnFilterCriteria(DATE_COL, criteriaDateAfter) .setColumnFilterCriteria(USER_ID_COL, criteriaUserEqual) .getRange(); FilterCriteriaに2回条件設定してみたり var criteriaDateRange = SpreadsheetApp.newFilterCriteria() .whenDateAfter(new Date(date1)) .whenDateBefore(new Date(date2)).build(); 同じカラムに2回条件設定してみたり var r = sh.getRange(1, 1, sh.get...

その2) Excel VBA で Amazon Product Advertising API

ISBNでAmazonデータを取ってくるマクロが完成して喜んでたけど、まだまだ面倒な作業が残っているのを思い出した。 ISBNがない本 発行年が昔だったりカバー無かったり。奥付にしか書かない拘りデザインとか。 洋書 amazon.co.jp未登録なこと多し。これがまた手入力しづらい。キーボード切り替えたり、奥付(ていうか表紙裏)の読み方もよくわからないし。 そして 雑誌、、、 特集を書かないと特定できないとか、年月・巻の書き方悩ましいとか、一番の難物。 とりあえず1と2に対処して Github に置きました。 タイトル・作者・出版社でAmazonのデータを検索する たとえばタイトルの一部を入力して、マクロを実行すると: 妥当なのを選んで「入力」。ほ~ら嬉しい。 ユーザーフォーム作ったり、なんだかんだ半日はかかっちゃった。ユーザーフォームのことって毎度忘れてる! ユーザーフォームと呼び出し元プロシージャのデータ授受に フォーム名 .Tag が便利。 ということを知りました。 ISBNに応じてリクエスト先(endpoint)を切り替える Product Advertising APIのDeveloper guide に各国のURLが載っていた。 Locale Endpoint CA http://ecs.amazonaws.ca/onca/xml CN http://webservices.amazon.cn/onca/xml DE http://ecs.amazonaws.de/onca/xml ES http://webservices.amazon.es/onca/xml FR http://ecs.amazonaws.fr/onca/xml IT http://webservices.amazon.it/onca/xml JP http://ecs.amazonaws.jp/onca/xml UK http://ecs.amazonaws.uk/onca/xml US http://webservices.amazon.com/onca/xml ASINすなわちISBN10は、先頭1~3桁が国・言語・地域を示す。 Internationa...