Excelマクロ覚書 HappyMonday算出

休日を自動的に作成するマクロを作成中、ハッピーマンデーってどうやって求めるのかを考えた。

色々サイトを見たのだけれど、「結局どうやってやるのよ!」とか、「なんでこんなにこねくり回してるのよ!」とか、まぁとにかくあんまり参考になりそうなロジックがきれいに提示されているサイトがなかったので自分で作った。

引数に、年、月、週を設定すると、Date型の日付が返る仕組み

Private Function GetMondayDateFromYearMonthWeek(ByVal y As Integer, ByVal m As Integer, ByVal w As Integer) As Date

Dim t As Date

t = DateSerial(y, m, 1)
t = DateAdd(“d”, (8 – Weekday(t, vbMonday)) Mod 7, t) ‘1週目の月曜日
GetMondayDateFromYearMonthWeek = DateAdd(“d”, 7 * (w – 1), t)

End Function

例えば、GetMondayDateFromYearMonthWeek(2012,9,3) とすると、戻り値は2012/9/17となる。

たぶんうまくいくと思うけど、2012年でしか試してない・・・

PostgreSQL覚書 列定義を変更

alter table [table名] alter column [column名] type numeric(1,0) using 0 ;
alter table [table名] alter column [column名] SET NOT NULL;
alter table [table名] alter column [column名] SET DEFAULT 0;

1つめは型変更(数値型に変える、すべて0に置きかえる)
 using to_number([column名],0)として、カラムの値を数値に置き換える場合もあり。
2つめは、NOT NULL定義にする場合。NOT NULLを外す場合はDROP NOT NULLとする。
3つめは、Default値の定義。こちらもDROP DEFAULT とすれば外れる。

コンビニで50%OFF

会社の近く(といってもそんなに近くないけど)のコンビニで閉店セール。

全品50%OFF!!

なので、行ってみた。

棚にほとんど商品がなくて、文句ばっかり言ってるおばさんもいたけど、私としては飲んでみたかった、Burnエナジードリンクが100円で買えるってのでうれしかった。

他にもお菓子がちょこっと残ってたし、ドリンク類もあったので2000円弱分購入。(ってコンビニで・・・)

でも、会計は1000円弱!

ラッキーだ!kao06.gif

アクアスキュータム破産手続き

英国の紳士服で有名なアクアスキュータム(ってカタカナで書くと軽く見えるけど老舗)が破産手続きに入るそう。

あんな有名なブランドでも破産するのか・・・

私がこのブランド名を知ったのは中学生ぐらいだったか。
母親のお古のブラウスがアクアスキュータムだった。

そして、大学生になってここのスーツ(スカート)を買ってもらったが、それで原付に跨って、当然のごとくスリット部分をビリっと破って親にたいそう叱られた。

って、こんな思い出しかないけど、結構身近なブランドだったので立て直してほしいな。

春麗・9 to 5

うららかな春・・・
休日は大阪城公園に程近いブラバ!にミュージカル「9時から5時」を観に行った。

まぁ、その前にせっかくだからと桜を鑑賞。

JR環状線


お花見客が多くて、大阪城公園周辺はごった返していたと思うけれど、京橋あたりはそうでもなかった。
駅前の「まんぞく屋」なる居酒屋でカルピスソーダを飲みながら昼ごはん。
(梅酒でも飲めばよかった)

その後、プラプラ桜の写真を撮りながら、大阪城公園のほうへ。
久しぶりに劇場へ行って、久しぶりに観るミュージカルとあって、気分は軽やか。
途中IMPに寄ってブ~ラブラしていたところ、イタリアンカフェのオープンテラスで周防監督発見。11738.gif

(そっか、奥さん出てるもんなぁ・・・)

なんぞ思いながら、IMPを後にしてブラバに向かう。
観劇人口は増えているからか、休日だからか、客席は見事に満席。

で、ミュージカル。
コメディで、まぁ笑えるんだけど、もっとアドリブがあればよかったかな。(ここ大阪だし)
主演3人の中で一番歌がうまいのが友近という、もっと頑張れミュージカルスター!と言いたくなる舞台だった。
石井一孝さんなど、ワキが奮闘して芝居がもっている・・・と言ってもいいかな。
まぁ、そこまで主演3人が悪いとは思わないんだけど、もうちょっとハメ外してもよかった。(大阪だし!!)

正直、友近がアメリカ人をやると、どうもビバリーヒルズ青春白書に見えてしまって、イカンイカン。
紫吹淳は高音に安定感と太さが出てくれば、歌はまぁOKかな。ダンスシーンが少ないのがね、残念だョ。(宝の持ち腐れ?)
3人の中で1人だけミュージカルだった感じ。
草刈民代。声が低いのとまだ不安定なのとで、イマイチ他の二人とは合っていないように思えたけど。
この人の芝居はある意味そっけないのだと思う。(だから余計に下手呼ばわりされるのだろう。)

今回は2階席での鑑賞で、細かい表情とかは確認できなかったけど、それなりに愉しめた。
できれば次はもうちょっと前の席で観たいな。

ルーマニアのチョコ

ショコ・レ タブレット エクストラダーク65%
 
ショコ・レ タブレット エクストラダーク65%



ルーマニアって、何を思い出すかな・・・

新体操?

まぁその程度。

ネットで買ったチョコレートの裏側見たらルーマニア産だった。
チョコレートってったら、私の場合は日本産、ベルギー産、将又、スイス産なのよ。
フランス産とかは、お土産では貰うんだけど、あの鼻につく香りがたまらんので、自分ではあまり買わない。

で、味はというと、なかなかステキだった。
カカオ65%ってダークって感じに思わなかったんだけど、食べるとダークだった。
豆からして違うんだろうな。
1枚しか買わなかったことをちょっと後悔。

PHP5技術者認定初級試験を受けてみる

PHPの試験を受けてみようと決めたのが月の初めだったか。
初級の後、続けて上級も受けようと、アールプロメトリックで予約を取ったが、あまりに時間がないので上級の予約をキャンセルして初級の試験だけにすることになった。

今月は会社で土日出勤しなければならず、とても上級試験に受かりそうもなかったから。
上級試験の合格率は10%強ということで、結構厳しいようだ。
そこへいくと、初級試験は7割弱は合格するレベルなので、まぁ頑張れば受かるかな・・・と。

まずはじめに、認定教材である「PHP5技術者認定初級試験対応 PHP公式資格教科書」を買って一読。
そして次に、ITトレメの模擬問題をやってみたのだが、教材レベルではとても解けそうにない問題が数多くあり、急いでオライリーの「プログラミングPHP 第2版」を買いに走る私。

「プログラミングPHP 第2版」を順に読んでいくものの、とても試験日までに最後のページまでたどり着けそうもないため、途中で断念。

試験の前々日、前日は、再度「PHP公式資格教科書」とITトレメの模擬問題をやって試験に臨んだ。

問題はよくわからないものもあったが、それでも大学受験とかと同じ要領で答えていけば大抵はあたるのではないかと思う。
たとえば、「必ず・・・」とかいうのは間違い、とか。

まぁ、そんなこんなで、100点には届かなかったものの、30分強で試験を終えて無事合格はできた。
試験問題について書くことはできないけれど、自分が間違えたのはマルチバイトのメール送信のところだった。
ちゃんと教科書にも書いてあることだったのに・・・
Mix-inって言葉が出てきて、なんじゃそれ?って思ったけど、多重継承のことだった。

認定教材だけでは合格できないと思うけど、ITトレメを一通りやれば受かるかなぁと思う。

簡単にランチを作る

昨日は会社からの帰りにスーパーに寄って、ホットドック用のパンと惣菜のフライ詰め合わせを買って帰った。
夜の9時過ぎて安くなってたから。

帰ってトイレ掃除。
さすがに、放置しすぎと思って、床や便座を一通り掃除。
っていっても、クイックルで拭くだけだが。

掃除後シャワーを浴びて、さっそく買ってきたホットドックとフライで昼御飯用のホットドックを作る。

フライの詰め合わせには、白身フライに、チキンフライ、コロッケの3種類が入っていて、それぞれトマトケチャップとチーズと一緒にホットドック用のパンの間に入れていく。

と、途中でチーズもケチャップも切れてしまった・・・
おまけにフライもきれいに消費され、パンだけが残ったので、これまた別の日に買ったフランクフルトなんぞ差し込んでおいた。
あとは、会社に持っていくだけ。1食100円ぐらいでお得だ。

しかし、野菜が足りんなぁ・・・

春なのにぃ~

寒い・・・
もう3月も終わりだというのに、なぜこんなに朝寒いのか?
お彼岸ももう終わったのに。

うちの子に、去年はウサギ、そして今年は辰の着ぐるみを着せている。
なかなかカワイイ・・・

辰年のプリモテディ
辰年のプリモテディ(元)

面白い恋人・・・

面白い恋人
後輩にもらった。
味はたいしたことないって思うけど、ネーミングは許してあげたらいいんでないの・・・って思う。
でも、ネーミングにあった菓子にすればいいのにとも思う。

というか、大阪のお土産って本当に困る。
ロクなものがない。

別の場所の土産のパッチもんみたいな・・・、あぁこれもそうか。

私の中での大阪名物って「岩おこし」だもん。
でもあれ持って行っても、あんまし喜ばれないよな。
本当に悩ましい。

スナック菓子が熱い!

と思っているのは私だけだろうか?

チキンラーメンチップス
ん~、チキンラーメンってどんな味だったけ・・・と思うようなポテチだった。
チキンラーメンって感じじゃないんだな。

かっぱえびせん
かっぱえびせんって色んな味付けが出ているけど、結局はスタンダードなものが一番おいしいと思う。
でも、たらこはそれなりにおいしかった。

チキンラーメンはもういいかなって思う。っていうより、チキンラーメンがどんな味だったか、チキンラーメンを買って帰ろうかと思ってしまう。
たらこは売ってたら買ってしまいそうだな。
(まぁ、私は、ポテチよりえびせんのほうが好きだからなんだな、きっとkao06.gif

RICOH CX5購入

RICOH CX5

あぁ~、買っちゃった。
もう、当分、新しいカメラはいいかなぁ・・・などと思ったけど、Joshinで在庫処分のラックの中にCX5を見つけた瞬間、吹っ飛んじゃった。

だって、15,000円だったから。
価格.comでも、16,000台半ばなので、こりゃお買い得。(モックがついていたから、展示品ではなさそう。)

ノートPCにカメラに・・・って散財しすぎでしょkao05.gif

CX3との違いは、超解像ズーム。
あとは、撮影シーンに花火とかが増えている点で、他はそんなに変わらない。
リコー公式サイト:CX3,4,5の違い

あぁ、早くこのカメラでなんか撮りに行きたいな!

SONY VAIO S購入

これまで使っていたVAIO Fがでか過ぎて・・・

まぁ、大きいのはいいんだけど、扱いにくい。

解像度はHD対応だからいいんだけど、もうそこまで大きいのはいらないかなぁ~というのと、もう少し軽ければ持ち歩きもできそうなので、新しいPCを探してみた。

私の理想とするところは、筐体が片手で持てること。
画像処理に耐えうるように、解像度がそれなりに高いこと。
あとは、仕事で利用できること。
もちろん、ブルーレイディスクがついてること。

SONY VAIO S (VPCSA)

ということで、結局VAIO Sに決めた。
いつもの通り、SONYストアーでカスタマイズ購入。
(割高になるけれど、思い通りの構成にできるし、カラーも決められるので便利だ)

届いたのは購入ボタンをクリックしてから2週間ほどしてから。
はっきりいって、もう何色に決めたのかすら覚えてなかったので、茶色のノートPC見たとたん、「あれ?」とか思ってしまった。
「私、この色にしたんだ~」みたいな感じ。
でも結構気に入った。金色までいかず、銅って感じに近い。なんかラグジュアリ~って感じだ。
ボタンが光っているけど、まぁいいか。部屋真っ暗にしても使えそうだな。

さて、これからApache入れて、php入れて、DB入れて・・・WordPressの3.3を試してみようか。

何故か食欲がべラボ~な日

亀田製菓 エビグラタン味せん
亀田製菓 エビグラタン味せん

昨日の夕方。
気分が悪かった。
野菜不足かなぁ・・・、なんでかなぁ~と9時までに仕事を切り上げて、スーパーでサラダを買って帰って貪り食った!

で、一旦満足したんだけど、1時間経つとまた無性におなかがすいて、麺とソースだけの焼きそば作って冷凍餃子解凍して、また貪り食った!

それでも、まだ飽き足りず、でももう11時だし・・・とせんべいを2,3枚食べた。

ん~まだ物足りんけど、寝なあかんし・・・と歯磨きした。

歯磨きしないと、永遠に食べ続けそうな日だった。

株価上昇!

株価が上がってる kao06.gif

ここ最近円安になってきたし、まぁ配当絡みなのかもしれないけど株も値上がりしているので、このままちょっとずつでも上がってくれればなぁ・・・と思う。

何より嬉しいのは、ここ2年ほど、含み損であったのが今日プラスに転じていたことだ。
これもまだ不安定だろうけど。
でも、なんか心のゆとり?ができた感じ。

facebook 出会い系に注意

facebookにメッセージが来て、なんだろ~とか思いながら見てみたら、知り合いでもなんでもない。

どうやら出会い系の様子。

facebookでもこんなことやるんだ・・・
スパム報告しないまま削除しちゃった。

Excel覚書 どのバージョンで起動させるか

例えば、2003と2007両方インストールしていた場合、後でインストールしたバージョンで起動するようになっているので、常に2003で起動させたいというときは、以下のコマンドをスタートボタン>ファイル名を指定して実行で実行させる。

“C:\Program Files\Microsoft Office\OFFICE11\excel.exe” /regserver

パスはインストール環境によって違うので注意。
OFFICE11ってのをOFFICE12とかに変えれば、常時2007で起動とかになるハズ。