Do Loops

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I want to make a Do while loop for keeping a running total
of account. I am writing a program to create an automated
capital budget. I want to keep a running total of the
different sub accounts, then when it come to an empty cell
in the sub account number line, to print the total to
another worksheet.
 
do while not isempty(activecell)
dblTot = dblTot + ActiveCell.Value
ActiveCell.Offset(1,0)
Loop
worksheets("Sheet1").Range("B9").Value = _
dblTot
 

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

Back
Top