View Single Post
  #3   Report Post  
primeride2k primeride2k is offline
Junior Member
 
Posts: 3
Default

Quote:
Originally Posted by Claus Busch View Post
Hi,

Am Thu, 16 May 2013 18:21:31 +0100 schrieb primeride2k:

I am working with a two page workbook. On page one I have upper and
lower values of a range (example 0.0 to 5.0, or 0 to 100) and an
increment value (example 0.2 or 5). On page two I would like a column to
automatically fill with the series of values within the range according
to the increment value.


Start value in Sheet1 A1, stopp value in A2, increment in B1:

Sub FillLinear()
With Sheets("Sheet2")
.Range("A1") = Sheets("Sheet1").Range("A1")
.Range("A1").DataSeries Rowcol:=xlColumns, Type:=xlLinear, _
Step:=Sheets("Sheet1").Range("B1"), _
Stop:=Sheets("Sheet1").Range("A2")
End With
End Sub


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2
This works great when I choose to run the macro from the drop down menu. How would I set it up so I can use it as a template? I would like to open the excel file, input the range and increments, then have it generate the series on sheet 2 automatically. Also, if I change the range and/or increment on sheet 1, I would like the series to change accordingly on sheet 2 automatically.

Thanks for your help!