サンプルマクロ

GET.DOCUMENTで取得できる値を書き出すサンプル
値を取得したいシート上でマクロを実行してください。

macro1(q)                                             マクロ名(ショートカット)
=ERROR(FALSE)                                   エラーを無視する
sheet=GET.DOCUMENT(1)                      現在のアクティブワークシート名を名前"sheet"に定義
=NEW(1,1,TRUE)                                    新しいワークシートを挿入
newsheet=GET.DOCUMENT(1)                新しいワークシート名を名前"newsheet"に定義
=FOR("loop",1,88,1)                                88回ループ
  getdoc=GET.DOCUMENT(loop,sheet)   GET.DOCUMENTの値を名前"getdoc"に定義
=    FORMULA(getdoc)                            名前"getdoc"の値を書き出し
=    SELECT("r[1]c")                              下のセルに移動
=NEXT()                                                "loop"にもどる
=RETURN()                                           マクロを終了

2008年03月30日 sample トラックバック:0 コメント:0












管理者にだけ公開する

エクセル 4.0 マクロ