0

セル A1 からセル B1、セル A2 から B2 などに数値をコピーして貼り付けるマクロがあるとします。このマクロを記録します。A に数値の列がある場合、マクロを毎回手動で実行することなく、マクロを複数回実行するにはどうすればよいでしょうか?

次に例を示します。

    A    B
    1    1    #copies number from column A to column B
    2    2

マクロを実行するために A の各セルでホット キーを押す必要はありません。列 A のすべての値に対して同時にマクロを実行したいだけです。

4

2 に答える 2

2

あなたはただできませんでした：

Columns("A").Copy Range("B1")

これにより、列 A のすべてが列 B にコピーされます。

于 2013-08-16T20:07:32.420 に答える
1

これを試してみてください。これは、3 が 0 になるまでカウントダウンします。これを、埋められた行数のカウント - 1 に置き換えることができます。

Sub Test()
Call RunMainMacro(3) 'run macro 3 times
End Sub

Sub RunMainMacro(ByRef Times)
Do
    Application.Run " 'project1.xlsm'!MainMacro"
    Times = Times - 1
    DoEvents
Loop Until Times = 0
End Sub

から

于 2013-08-16T18:17:24.870 に答える