Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Range of averages
Can anyone help
I have a value for T1 and a value for T11 (which might be greater or lesser.) I want to fill T2 through T10 with a series of averages to smoothly fill the gap so to speak. So if T1 were 1 and T11 were 11, the series would count out 1 to 11 And if T1 were 22 and T2 were 2, then the series would count backwards from 22 to 2, even number only. Anyone know how? |
#2
|
|||
|
|||
Range of averages
Sub LinearFill()
Dim StepValue Range("T1:T11").Select StepValue = (Selection(Selection.Count) - Selection(1)) / (Selection.Count - 1) Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _ Step:=StepValue, Trend:=False End Sub -- Regards, Tom Ogilvy "teepee" wrote in message ... Can anyone help I have a value for T1 and a value for T11 (which might be greater or lesser.) I want to fill T2 through T10 with a series of averages to smoothly fill the gap so to speak. So if T1 were 1 and T11 were 11, the series would count out 1 to 11 And if T1 were 22 and T2 were 2, then the series would count backwards from 22 to 2, even number only. Anyone know how? |
#3
|
|||
|
|||
Range of averages
In T2 put:
=T1+($T$11-$T$1)/10 and copy down to T10. -- Gary's Student "teepee" wrote: Can anyone help I have a value for T1 and a value for T11 (which might be greater or lesser.) I want to fill T2 through T10 with a series of averages to smoothly fill the gap so to speak. So if T1 were 1 and T11 were 11, the series would count out 1 to 11 And if T1 were 22 and T2 were 2, then the series would count backwards from 22 to 2, even number only. Anyone know how? |
#4
|
|||
|
|||
Range of averages
Some wordwrap problems:
Sub LinearFill() Dim StepValue Range("T1:T11").Select StepValue = (Selection(Selection.Count) - _ Selection(1)) /(Selection.Count - 1) Selection.DataSeries Rowcol:=xlColumns, _ Type:=xlLinear, Date:=xlDay, _ Step:=StepValue, Trend:=False End Sub or manually select your range and do Edit=Fill=Series. select Row and linear -- Regards, Tom Ogilvy "Tom Ogilvy" wrote in message ... Sub LinearFill() Dim StepValue Range("T1:T11").Select StepValue = (Selection(Selection.Count) - Selection(1)) / (Selection.Count - 1) Selection.DataSeries Rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, _ Step:=StepValue, Trend:=False End Sub -- Regards, Tom Ogilvy "teepee" wrote in message ... Can anyone help I have a value for T1 and a value for T11 (which might be greater or lesser.) I want to fill T2 through T10 with a series of averages to smoothly fill the gap so to speak. So if T1 were 1 and T11 were 11, the series would count out 1 to 11 And if T1 were 22 and T2 were 2, then the series would count backwards from 22 to 2, even number only. Anyone know how? |
#5
|
|||
|
|||
Range of averages
"Gary''s Student" wrote in message ... In T2 put: =T1+($T$11-$T$1)/10 and copy down to T10. of course. brilliant yet obvious. Thanks |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Help PLEASE! Not sure what answer is: Match? Index? Other? | Excel Worksheet Functions | |||
Match function...random search? | Excel Worksheet Functions | |||
How do I edit a Named Range using macro's | Excel Worksheet Functions | |||
Cannot Expand Named Range - when size of the Range exceeds | Excel Discussion (Misc queries) | |||
Define a range based on another named range | Excel Worksheet Functions |