[[20070916115303]] 『VBA』(おたすけ) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『VBA』(おたすけ)
マクロを作ったのですが、何回かにわけて作ったので、結局何回もマクロを実行しないといけません。つなぐ方法ありませんか?1回の実行で4つのマクロが続いて作動していくとよいのですが。

マクロ 1,2,3
マクロ 2をコピーマクロ 1の後ろへ貼り付け の繰り返し


 最初に実行するマクロが test だとして

 Sub test()
 .
 . 
 .
 .
 .
 次に実行するマクロ名
 その次に実行するマクロ名
 最後に実行するマクロ名
 End Sub
 (seiya)

 衝突!

 記録マクロをサブプロシジャにしてしまう方法もあります。
標準モジュールに以下を書き込み(マクロ名は推測で書いています)、Testを実行すればOK。
(ROUGE)
'----
Sub Test()
Call Macro1
Call Macro2
Call Macro3
Call Macro4
End Sub

seiyaさんありがとうございます。
さっそくやってみましたが、うまくいきません。マクロはしろうとなので、わからないのですが、マクロ名を記入したあと
上書き保存とかやるのですか?
よろしければ、教えてください。

ROUGEさんもありがとうございます。
すみません、サブプロシジャの意味もわかりません。ごめんなさい。


 どのようにうまくいかないのですか?
 それでうまくいかないのなら、おそらく各コードに問題があるのでしょう。
 (seiya)

マクロの実行を行なうと、コンパイルエラーSubまたはFunctionが定義されていません と出ます。
なんどもすみません。お願いします。

 コードを見ないとわかりません。
 (seiya)

ありがとうございました。

こんなのも試してみてください
 マクロの中に下記のように書いているとそのマクロも実行されます。
 Application.Run "ファイル名.xls!マクロ名"
 (shota)


あの〜私も初心者ですが。
一つ一つのマクロの

sub マクロ名 ()

中身

end sub

の上記の部分の中身だけを順にコピーして、貼り付けていけばいいと思うのですが・・・

例えば

マクロ名をそれぞれ、1、2、3、4、5とします。

sub 1 ()

中身マクロ名1

中身マクロ名2

中身マクロ名3

中身マクロ名4

中身マクロ名5

end sub

マクロを実行したい順に上から並べたらいいと思います。

出来なかったらごめんなさい。

(みかん)


seiyaさん、できました。
同じファイル内にあるマクロは、できました。
はじめにやろうとしたのは、別別のファイルの中のマクロを開いておいて、それをつないでやろうとしたのでやれませんでした。
ところで、別々のファイルのマクロでもつなぐことはできますか?よろしければ教えてください。

shotaさん、みかんさんもどうもありがとうございました。


 >別々のファイルの中のマクロ....

 Application.Run "マクロが記述されているブック名.xls!マクロ名"

 で出来るはずです。
 (seiya)

seiyaさん、できました。感激です。
ありがとうございました。(おたすけ)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.