Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3
Default Summing a variable sized range programmatically

Help!! I need to insert a sum formua in first blank cell
to the right of a variable sized range of cells. I need
the sum formula inserted so that the amount in that cell
will automatically recalculate when a different number is
entered. I can select the range including the blank cell
to the right, but I can't get a sum formula to work.

Any ideas will be greatly appreciated.

Norma
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2,824
Default Summing a variable sized range programmatically

If I have data in A8:D8, I can put this formula in E8:

=SUM($A8:OFFSET(E8,0,-1))

I still used row 8 in this example:

Option Explicit
Sub testme()

Dim myCell As Range

With ActiveSheet
Set myCell = .Cells(8, "IV").End(xlToLeft).Offset(0, 1)
End With

myCell.FormulaR1C1 = "=SUM(RC1:OFFSET(RC,0,-1))"

End Sub

Norma wrote:

Help!! I need to insert a sum formua in first blank cell
to the right of a variable sized range of cells. I need
the sum formula inserted so that the amount in that cell
will automatically recalculate when a different number is
entered. I can select the range including the blank cell
to the right, but I can't get a sum formula to work.

Any ideas will be greatly appreciated.

Norma


--

Dave Peterson

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 1
Default Summing a variable sized range programmatically

I am trying to do almost the same thing as Norma, but am
trying to get a variable sized column to sum. I tried
different variations of the procedure you sent, any tips
on where the changes need to be placed to get this to sum
a column not a row would be appreciated.
Thanks for the help.

Dennis
-----Original Message-----
If I have data in A8:D8, I can put this formula in E8:

=SUM($A8:OFFSET(E8,0,-1))

I still used row 8 in this example:

Option Explicit
Sub testme()

Dim myCell As Range

With ActiveSheet
Set myCell = .Cells(8, "IV").End(xlToLeft).Offset

(0, 1)
End With

myCell.FormulaR1C1 = "=SUM(RC1:OFFSET(RC,0,-1))"

End Sub

Norma wrote:

Help!! I need to insert a sum formua in first blank

cell
to the right of a variable sized range of cells. I need
the sum formula inserted so that the amount in that cell
will automatically recalculate when a different number

is
entered. I can select the range including the blank

cell
to the right, but I can't get a sum formula to work.

Any ideas will be greatly appreciated.

Norma


--

Dave Peterson

.

Reply
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
Summing a variable range Ram B Excel Worksheet Functions 6 August 5th 08 08:50 AM
SUMIF/SUMPRODUCT Criteria are Variable Sized Thomas [PBD] Excel Discussion (Misc queries) 3 May 19th 08 05:19 PM
Using variable sized range in CountIf() [email protected][_2_] Excel Discussion (Misc queries) 1 October 24th 07 11:15 AM
Summing a variably-sized range Titan Excel Worksheet Functions 1 August 26th 05 06:20 AM
Summing a variable range of columns Richard Buttrey Excel Worksheet Functions 9 July 28th 05 06:52 PM


All times are GMT +1. The time now is 06:42 PM.

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

About Us

"It's about Microsoft Excel"