マクロの作成例

それでは、マクロエディタを開いて、日本語設定を行ってから、マクロを作成します。以下がその例です。

Sub Main
'住所録を読み込むマクロを作成します
'宣言
Dim t As Topic        '変数tをTopic型として宣言、トピックの属性を保存
Dim fname As String    '変数fnameを文字列型として宣言、読み込むcsvファイルのファイル名

'Path付きのファイル名をfnameにセットします
fname = GetFilePath$()

'住所録のcsvファイルを読み込みます
Open fname For Input As #1    '選択したファイルを#1の内部コードで記憶します
On Error GoTo XXX            '読み取りエラーが発生したらXXXに飛びます

'マップにデータを読み込みます
'中心トピックにcsvファイルの第一行の内容を表示させます
    Input #1,A
    ActiveDocument.CentralTopic.Text=A
'第二行以降を読みます
Do    'ファイルの最後まで読みます
    Input #1,NA,LA,EM$,AD                                'NA:氏名、LA:分類、EM:電子メール、AD:住所
    Set t = ActiveDocument.CentralTopic.AddSubTopic(NA)    'トピックに氏名を表示
    t.TextColor.SetARGB(255,255,0,0)                    '氏名の色を赤に
    t.TextLabels.AddTextLabel(LA)                        'トピックのラベルに分類を表示
    t.CreateHyperlink("mailto:"+EM)                        'トピックのハイパーリンクに電子メールを
    t.AddSubTopic(AD)                                    'サブトピックに住所を
Loop

'エラー時ファイルを閉じます
XXX:
    Close #1

End Sub

このように、WindowsのAPIをSax Basicはサポートしているので、外部からファイルを読み込んでマクロが実行できます。実行をすると、以下のようになります。上記のマクロファイル（20090214.mmbas）をダウンロードする場合はこちら

更に進んで

更にもう一歩進んで、MindManagerのマクロをメニューに登録することができます。先ず、マクロファイルを保存してから、以下の動画を参考に設定してみてください。

マクロをMindManagerのメニューに登録する 拡大した動画

 

---

▽▽　CM ▽▽

---

智恵出し、見える化で勝つ！今がチャンス！  可視化思考による経営戦略セミナー！ 東京新丸ビル　2009年2月20日参加募集

不況をぶっ飛ばせ！MindManager特別キャンペーン　2009年3月31日まで延長

「まとまらない」が自然に「まとまる」情報整理術～ＭｉｎｄＭａｎａｇｅｒ入門セミナー～　3月分募集中！

---

21日間体験できるMindManager Pro 7 体験版      

MindManager Pro 7とリアルタイム連携するガントチャートツールJCVGantt Pro 3日本語版