2010年01月11日

サイボウズ8→Outlook フリーマクロ

職場のスケジュール共有はサイボウズで行っています。

今年に入って、今まで使っていたサイボウズ6がサポートアウトに
なるとのことで、サイボウズ8にバージョンアップしてしまいました。

サイボウズ6の際は、サイボウズ社が無償提供していた
サイボウズ6→Outlook連携ソフトがあったのですが、
サイボウズ7以降有料になってしまったようです。。。

サイボウズからWindowsMobile機にはOutlookを経由するしか
連携の方法がありませんが、それに1万円以上もかけられる
財政状態ではありません。

ということで、サイボウズ8のスケジュールCSVファイルを
Outlookに取り込むマクロを急増で作りましたので公開します。
(ネットで拾ったソースのつなぎ合わせですが)
使い方やインストール方法は質問が多ければ、このエントリーに
追記しようかと思います。

---
動作確認対象:WinXP + Outlook2003 SP3 + サイボウズOffice8
(サイボウズOffice7も同じファイルレイアウトとのことなので
 おそらくいけると思います)
ライセンス:フリーソフト(著作権はInfantileにあります)
その他:不明な点などありましたら本エントリーにコメントで
ご質問ください

ダウンロード(zip)

---


Office Standard 2007 アップグレード Office 20周年記念 優待パッケージ

Office Standard 2007 アップグレード Office 20周年記念 優待パッケージ

  • 出版社/メーカー: マイクロソフト
  • メディア: CD-ROM



posted by infantile at 03:34| 東京 ☀| Comment(6) | TrackBack(0) | ソフトウェア | このブログの読者になる | 更新情報をチェックする
この記事へのコメント
ありがとうございます.このマクロでmobile.me経由でiPhoneに同期できました!
Posted by こやま@ at 2010年01月14日 00:26
>こやま@さん

コメントありがとうございます。
そうですね、iPhoneもいったんどこかにインポートしないと同期できないですね。

お役に立ててよかったです。
Posted by infantile at 2010年01月14日 21:50
フリーでインポート可能なものを
探していたのでとても助かりました。
ありがとうございます!

終了時刻を設定していない予定があると
204行目付近の判定でエラーがでてしまうので


(203行目): If strAppoEndDay <> "" Then
の前に

(202行目): If strAppoEndTime = "" Then
(203行目): ' 終了時刻を設定していない場合
(204行目): strAppoEndTime = strAppoStartTime
(205行目): End If

とするようにして動かしています
Posted by た at 2011年03月10日 17:56
お手数ですが、本ツールの使い方を教えていただけますでしょうか。
Posted by ponta at 2011年03月23日 12:04
私の勤め先もOffice6からOffice8になり、こちらのお世話になります。ありがとうございます。

で、「た」さんもご指摘の終了時刻の件ですが、私はこうしてみました。ご参考までに。

If strAppoEndTime = "24:00:00" Or strAppoEndTime = "" Then
' Outlookは、"24:00:00"を扱えないため、"23:59:59"にする。またブランクの時も "23:59:59"にする
objAppointment.Duration = DateDiff("n", objAppointment.Start, strAppoEndDay + " " + "23:59:59")
Else
' 開始と終了から予定の時間(分)を設定
objAppointment.Duration = DateDiff("n", objAppointment.Start, strAppoEndDay + " " + strAppoEndTime)
End If
Posted by kei at 2011年03月30日 17:19
>たさん、keiさん

ご利用ありがとうございます。
また、ご自分での修正ありがとうございます。
私自身終了時刻のない予定を入れないので
まったく気づきませんでした。

>pontaさん

下記サイトなどをご参考にしてみてください。

http://outlooklab.wordpress.com/2007/02/18/outlook-vba-マクロ、はじめの一歩/
Posted by infantile at 2011年04月08日 21:55
コメントを書く
お名前:

メールアドレス:

ホームページアドレス:

コメント:

認証コード: [必須入力]


※画像の中の文字を半角で入力してください。
この記事へのトラックバックURL
http://blog.seesaa.jp/tb/137951384

この記事へのトラックバック
×

この広告は1年以上新しい記事の投稿がないブログに表示されております。