ImportCybozuSchedule.vbs v0.05で、VBAからVBScript化

Outlook2003からOutlook2007にバージョンアップして、動かなくなってしまった「サイボウズv3のスケジュールをOutlookにインポート」するマクロです。

v0.05 2007/10/22 VBS版初版。VBS版に修正途中で、ソースが汚い。
2007/10/22 以前のVBAのコードを、そのままコメントアウトして残してあるので、きれいにすること。

とりあえずのバージョンですが、http://ymiz777.googlepages.com/outlook関連のマクロに、バックアップがてら、置いてみました。


まぁ、基本的には、同じ言語で、それが、動作しているものなので、それほど、苦労しませんでしたが、以下が、主な修正内容になります。

・ Asで型指定をしているDim宣言文をコメントアウトしてしまった。
・ Open/Input文のファイル操作を、FileSystemObjectを使って、ForReadingモードでOpenTextFileメソッドでオープンし、RegExpオブジェクトを使って、正規表現で、パタンマッチ結果を取り込むようにした。
・ 日付の比較は、CDateでコンバートするようにした。

あと、家のVistaマシンに、Script Debuggerをインストールしてみたのですが、//Xオプションをつけて起動したり、stop文を入れてみたりしたのですが、デバッガが立ち上がりません。このため、MsgBox文で、デバッグをしていました。それで、会社のXPマシンで、さらに、昼休みをつぶして、デバッグをして、なんとか動作するようになりました。(デバッガは、ありがたい、、。)

ウォークラリー経過:今、「富士山」

先週の金曜日から、ウォークラリーが始まっています。

日付 歩数
2007/10/19(金) 13838
2007/10/20(土) 13095
2007/10/21(日) 8077
2007/10/22(月) 3843

順位：
300位以内
歩数： 38,853 歩 （１日の平均歩数 9,713 歩）
完歩まで：
残り１日平均 8968歩 でゴール歩数達成です。

======【　富士　】======

雄大な富士山を眺め、元気に歩きましょう！

「富士山」

（距離 27.2 km） 275,000歩 550,000歩


土曜日までの順位は、10位以内と表示されていたのですが、ここにきて、300位まで、急落です。
ちなみに、まだ、つけていませんが、今日の朝も、Outlook2007のマクロを調整していたら、ジョギングにでられるような時間でなくなってしまって、今の時点でも、6786歩しかありません。
昨日は、ジョギングの休息日に加えて、朝、出発するのが遅くなって、歩くと、遅刻しそうになってしまって、自転車を出してしまったので、極端に、少なくなってしまいました。

ラリーを始めるまで、昨日、今日みたいなことは、なかったので、よりによって、ラリーが始まってから、気が緩むなんて、、、。

Outlook2007へのバージョンアップ

仕事で、一番、使用するソフトは、メーラで、朝、まずは、起動して、Outlookで直近の業務やスケジュールを確認したり、常時、起動しているソフトなので、時間がくると、アラームで通知してくれたりと、まさに、私のパーソナルデジタルアシスタンスという感じで使わせてもらっています。

このため、たぶん、メーラの善し悪しが、業務の効率に、そのまま、直結している感じがしています。このため、やはり、メーラは、少しでも、使いやすくて、高機能のものを使いたいわけで、これまで使用していたOutlook2003からOutlookだけを2007にバージョンアップしました。(つまり、他のExcel、Work、PowerPointなどは、そのまま2003)

以下は、このバージョンアップしたときのメモです。

■ 設定
Windowsデスクトップサーチ(WDS)を入れる必要があるとのことで、長年使ってきたGoogle Desktop Search(GDS))をアンインストールしてしまいました。(インデックスも削除したときには、感慨深い感じがしました。(GDSをインストールして、その検索速度の速さには、びっくりしました。このGDSは、最近のソフトの中で、パソコンの使い方を激変させたソフトと言えるでしょう。)

GDSのときも同じでしたが、ただでさえ、狭いタスクバーにWDSの窓が出て、さらに、狭くなってしまって、邪魔だったので、タスクバーから、WDSを消したりしました。

■ インストール
Outlook2003からOutlook2007へのバージョンアップで、途中で、インストーラが飛んでしまって、(裏で、Firefoxで、大量にページを開いていたら、そもそも、パソコン全体が動作しなくなってしまって、そのうち、インストーラが死んだ。)

途中から、インストーラを動かすことになってしまって、データをバックアップをとっていない状態で、こんなハメになってしまって、後悔をしたが、時間がないので、そのまま、インストーラを動かしたら、なんとか、そのまま、インストールが途中から復帰して、ほっとした。

異常なインストールでドキドキしたが、何もしないで、そのまま、移行できている。というか、レイアウトが、そのままなのは、すごい。

見た目は、今までのOutlook2003と、あまり、変化はなく、まずは、Shift+Ctrl+MやCtrl+2などの頻繁に使用するショートカットキーは、そのままで、新鮮味はないが、非常に使いやすい。


■ プレビューア
http://office.microsoft.com/ja-jp/marketplace/EY100979951041.aspx
やはり、Office2007というか、Word/Excel/PowerPoint2007がないとだめらしい。使えると、便利そうだが、、、。

テキストやPDFは、参照可能で、気持ちが良い。やはり、Office2007全体をインストールしたくなりますね。

■ 分類項目
これまで長年、メールは、仕訳ルールや手作業で、フォルダに移動して、受信トレイは、常に、空の状態にするようにしていました。
ただ、Outlook2007では、結構、この分類項目の機能が、充実をしてきたので、基本的に、受信トレイの中で、分類項目とフラグをつけて、整理をしてみようと考えています。
GDSを使うようになって以来、分類することに意味がなくなってきたような気がして、少し前からは、以前の非常に細かい分類より、かなり、大雑把な分類にするようにしてきました。Outlook2007でも、この方針で、かなり、大雑把な分類しかしないようにしようと考えています。

とりあえず、以下の粒度の分類にしてみました。

001-最重要
003-重要
005-注意
007-参考
100-事務 Ctrl+F11
200-情報 Ctrl+F12
290-通知文書
500-プロジェクト Ctrl+F5
590-レポート

2007からは、分類項目にショートカットキーを割り当てられるので、仕訳ルールと組み合わせて、非常に快適に、分類ができるようなりました。

■ マクロ
Outlook2003から2007にバージョンアップして、最大の問題がマクロになっています。

まずは、起動が、異常に遅くなってしまっていて、非常に困っています。

とりあえずは、ツール →　マクロ　→　セキュリティで、「すべてのマクロに対して警告を表示する」に変更しないと、そもそも、自作の実行ができないのですが、これが原因のような気がしてなりません。

やはり、署名をつける手法を確立した方が良さそうです。

一番、まいっているのが、グループウェアの自分のスケジュールを、Outlookに取り込むためのマクロが、動かなくなっていることです。

なぜか、Left、Mid、Rightなどの文字列操作関連の関数で、「コンパイル エラー:プロジェクトまたはライブラリが見つかりません。」と表示されてしまうのです。

これが原因不明で、どうやっても、エラーがとれず、さらに、Left関数の数行のサンプルコードからとってきたものを試しに実行しようとして、エラーになるのです。

しょうがないので、先ほどから、家のVistaマシン(Outlook2007を含めて、Office2007Personalを入れてある)で試したら、問題なくOutlook2007のVBAとして、Left関数のサンプルが動作するではないですか。

もう、訳がわからないので、とりあえず、グループウェアの自分のスケジュールを、Outlookに取り込むためのVBAマクロをVBSScriptに置き換えてみました。