Help

K

Kevin

I have code in an application I am developing which sums
the values in rows of data. The code is as follows:

Do While curRow <= maxRow

Set sumrng = Range(Cells(curRow, 2), Cells(curRow, rowNum))
SumItemWt = Application.WorksheetFunction.Sum(sumrng)
Worksheets(1).Cells(curRow, rowNum+ 1).Value2 = SumItemWt

curRow = curRow + 1

Loop

My users will enter data into the spreadsheet where each
column represents a record. In each column over the width
of my spreadsheet (I am using 22 columns) has a formula
which performs calculations on data entered above in each
column. When the code shown above runs, the formula in
each cell gets pushed down the column. This code runs on
12 rows. The formula in the cell that the command
Worksheets(1).Cells(curRow, rowNum+ 1).Value2 = SumItemWt
runs on is pushed down the column by 12 rows. Why! Should
this not just replace the existing formula whith the
SumItemWt value?

Any help will be greatly appreciated!

Kevin
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top