dateserialとdataaddでexcel/access+vbaの日付を制す

DateSerial and DateAdd are usefull and perfect.

ThisMonth firstday : DateSerial(Year(Date()),Month(Date()),1)
Today a month ago : dateAdd("m", -1,Date())

辻村深月さんの「ツナグ」という小説はずっと前に読んていた。先日、ブルーレイレンタルで映画を観た。その中で原作にはない、「最上のわざ」(Life's Greatest Task)という詩が出てきた。「老いは神様からの賜物（ギフト）」。「最上のわざ」とは、まず、「To grow old with a cheerful heart,」（楽しい心で年をとること）。生きていること、そのことがギフトだし、老いてもまさに、楽しくありたいものだ。

access docmdコマンドではクエリのパラメタを設定できない。じゃ、どうすればいいんだ？

　accessのクエリをDocmdコマンドで自動化しようとしたのだが、そのクエリでは日付をパラメタで指定する必要があるにもかかわらず、Docmdコマンドではパラメタを設定できないことが判明した。それが仕様だ。どうしよう（仕様）もない、しよう（仕様）がないらしい。 やれやれ、

　何かいい手はないものかと、つらつらと考えた。要するに、日付のパラメタを止められればいいわけだ。幸い、ワタシの場合、前日、前々日、前月前日、前年前日の４パターンでクエリーを動かせば事足りる。それならば、日付別に４つクエリーを作れば、パラメタをやめることができる。クエリの日付の抽出条件にそれぞれの日付、つまり、前日にはDate()-1を、前々日にはDate()-2を,前月前日にはDateAdd("m", -1, Date())を、前年前日にはDateAdd("yyyy", -1, Date())をそれぞれ設定すればよいことを思いついてしまった。どうだろう。逆転とまではいかないが、いい感じでしょ。あきらめないこと、それが大事だ。 

　村上春樹さんの「走ることについて語るときに僕の語ること」では「考えるために書く」ことを述べている箇所がある。書かないと考えがまとまらない、深められないのだと。そういえば、Writing is thinkingもしくはThinking is writingみたいなことをスティーブン・キング氏（Stephen Edwin King）が言っていたとおもう。そういうタイトルの本を出していた。いや、On writingだった。