NoraNora
Dec 20, 2011, 10:20 AM
My MACRO is too large so I need to break it out into smaller parts. I'm looping to pull values from 1 worksheet to another for a specified range, all value are posted along 1 row and them move to the next row for the next # in the specified loop range. The problem I'm having is maintaining this variable row in MACRO2 (and additional macros as well).
MACRO1:
Dim OutputRow As Integer
OutputRow = 1
Do Until xxxxxxxxxxx
Sheets("xxxx").Range("xxxx").Cells(OutputRow).Value = Worksheets("xxxx").Range("xxxx").Value
call to MACRO2
OutputRow = OutputRow 1
Loop
MACRO2:
Sheets("xxxx").Range("xxxx").Cells(OutputRow).Value = Worksheets("xxxx").Range("xxxx").Value
MACRO1:
Dim OutputRow As Integer
OutputRow = 1
Do Until xxxxxxxxxxx
Sheets("xxxx").Range("xxxx").Cells(OutputRow).Value = Worksheets("xxxx").Range("xxxx").Value
call to MACRO2
OutputRow = OutputRow 1
Loop
MACRO2:
Sheets("xxxx").Range("xxxx").Cells(OutputRow).Value = Worksheets("xxxx").Range("xxxx").Value