http://www.matsuaz.com/tak_kawasaki/ 川ちゃんの日々の出来事を徒然に書いていきます ja tak_kawasaki Fri, 21 Nov 2008 09:46:28 +0900 Tanalog http://backend.userland.com/rss http://www.matsuaz.com/tak_kawasaki/files/thumbnail/myblog.jpg http://www.matsuaz.com/tak_kawasaki/ http://www.matsuaz.com/tak_kawasaki/2008/11/21/1227228388626.html 書くと宣言しても、やはり、書かないねえ…これからは、月、水、金にこのＶＢＡを書いていこう。それ以外の日は気が向いたら、書こうかな。それで、今日はＶＢＡ。開始日を把握する関数では、では。指定した日付と締め日からその開始日を求める関数例えば、日付が2008/10/15で、締め日が20日締め（その場合は20を指定）した場合、求める日付は2008/09/21になる。また、日付が2008/10/15で、締め日が月末締め（その場合は99を指定）した場合、求める日付は2008/10/01になる。Public Fu... アクセスＶＢＡサンプル http://www.matsuaz.com/tak_kawasaki/2008/11/21/1227228388626.html#comments http://www.matsuaz.com/tak_kawasaki/2008/11/21/1227228388626.html Fri, 21 Nov 2008 09:46:28 +0900 http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225363654158.html アクセスの中から MicroSoft Outlook を呼び出して、ファイルを添付し、メールを発信する。ソース例 Dim mypath As String Dim myOL As Object Dim myMail As Object mypath = "c:\test.lzh" 'メールに添付するファイルをフルパスで指定する Set myOL = CreateObject("Outlook.Application") Set m... アクセスＶＢＡサンプル http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225363654158.html#comments http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225363654158.html Thu, 30 Oct 2008 19:47:34 +0900 http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225362648080.html ほぼ1年何も書きませんでした。気持ちも新たに書いてみます。それで、何を書こうかと思ったら、自分はマイクロソフトアクセスというデータベースソフトを10年以上携わってきたので、そのプログラムをサンプルとして、少しずつ公開していこうと思います。これから不定期にぼちぼちと公開していきます。 アクセスＶＢＡサンプル http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225362648080.html#comments http://www.matsuaz.com/tak_kawasaki/2008/10/30/1225362648080.html Thu, 30 Oct 2008 19:30:48 +0900 http://www.matsuaz.com/tak_kawasaki/2007/10/24/1193234545000.html 今週の月曜日に畑のトマトを片付けた。その際にたくさんの熟していない青いトマトがとれたので、何にしようと考え、ピクルスを作ってみた。インターネットで作り方を調べて、初めて作ってみた。青い小さいのは梅っぽく見えるが、ミニトマト。ちょっと縦長のもトマトの一種。中にラディッシュも少し入れてみた。食べれるのは1ヵ月後。楽しみ。 農業・家庭菜園 http://www.matsuaz.com/tak_kawasaki/2007/10/24/1193234545000.html#comments http://www.matsuaz.com/tak_kawasaki/2007/10/24/1193234545000.html Wed, 24 Oct 2007 23:02:25 +0900 http://www.matsuaz.com/tak_kawasaki/2007/07/05/1183640759025.html 先日のアイドリングストップ宣言をしてから、初めてガソリンを入れた。 そうしたらリッター１０キロ超えた～ 今までリッター８キロくらいだったから、やはり効果はあるぞ。 しかも、今回は前回満タンにして途中からアイドリングストップを始めたから、次のガソリンを入れる時が楽しみ。 そして、さらにエコ。最近は車を運転しているとき、なるべくエアコンをいれずに、窓を開けて走るようにした。さすがに市街は車が多くて、やりにくいが、ちょっと郊外に出たら、気持ち良い。 今日も仕事で長野まで行ってきたが、行きも帰りも高速を使わ... エコ 日記 http://www.matsuaz.com/tak_kawasaki/2007/07/05/1183640759025.html#comments http://www.matsuaz.com/tak_kawasaki/2007/07/05/1183640759025.html Thu, 05 Jul 2007 22:05:59 +0900