From: Li Chen <chen_li3@...>
Date: 2009-10-10T20:56:33+09:00
Subject: for loop in excel macro

Hi all,

Here is an off -Ruby topic. Recently I need to do a lot of work in Excel
with repeated work.   And macro might be some help.
I wonder how  I can  loop some ranges of cells using a for loop in
Excel.

Thanks,

Li


For i =0 To 4 Step 1
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlColumnClustered
    ActiveChart.SetSourceData Source:=Range("A1:D1,A2:D2")

    MsgBox i
    Next


###############################
  after each step the following line should change as follows:

  Range("A1:D1,A2:D2")

  Range("A1:D1,A3:D3")

  Range("A1:D1,A4:D4")

  .....
-- 
Posted via http://www.ruby-forum.com/.