LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 74
Default How to Loop

Hello,
I have to run totals on many rows/columns.
I started a little macro, but would like to learn how to loop thru this data.

Please explain as you go, so I can learn rather than just copy your
excellent code :-)

'Calculate Totals for every 15th row (3 in sample, 8 rows total)

Range("C2").Select
ActiveCell.FormulaR1C1 = "=SUM(R17C3,R32C3,R47C3,R63C3)"

Range("C3").Select
ActiveCell.FormulaR1C1 = "=SUM(R18C3,R33C3,R48C3,R64C3)"

Range("C4").Select
ActiveCell.FormulaR1C1 = "=SUM(R19C3,R34C3,R49C3,R65C3)"

'Move to next Column and calculate (2 in sample, 6 columns total)

Range("D2").Select
ActiveCell.FormulaR1C1 = "=SUM(R17C4,R32C4,R47C4,R63C4)"

Range("D3").Select
ActiveCell.FormulaR1C1 = "=SUM(R18C4,R33C4,R48C4,R64C4)"

Range("D4").Select
ActiveCell.FormulaR1C1 = "=SUM(R19C4,R34C4,R49C4,R65C4)"

Thanks in advance!
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
returning back to loop check condition without completing the loop ashish128 Excel Programming 13 April 3rd 08 12:53 PM
Loop to Filter, Name Sheets. If Blank, Exit Loop ryguy7272 Excel Programming 3 February 5th 08 03:41 PM
Naming Worksheets - Loop within a loop issue klysell Excel Programming 5 March 29th 07 05:48 AM
Advancing outer Loop Based on criteria of inner loop ExcelMonkey Excel Programming 1 August 15th 05 05:23 PM
Problem adding charts using Do-Loop Until loop Chris Bromley[_2_] Excel Programming 2 May 23rd 05 01:31 PM


All times are GMT +1. The time now is 04:32 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"