Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 577
Default trying to use sum with range & offest

The following gives me a Compile Error:Invalid Qualifier (highlights the Sum
word)

For x = 0 To 9
Range("B4").Activate
y = WorksheetFunction.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

Whats wrong?


  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,939
Default trying to use sum with range & offest

Give this a try...

For x = 0 To 9
Range("B4").Activate
y = Application.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

or

For x = 0 To 9
Range("B4").Activate
y = Application.WorksheetFunction.Sum(Range(ActiveCell .Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

--
HTH...

Jim Thomlinson


"Scott" wrote:

The following gives me a Compile Error:Invalid Qualifier (highlights the Sum
word)

For x = 0 To 9
Range("B4").Activate
y = WorksheetFunction.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

Whats wrong?


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 577
Default trying to use sum with range & offest

The second recommendation gave me the same original compile error. The first
got past the compile but gives me a runtime error '424' object required.
--------------------------------------------------------------------

"Jim Thomlinson" wrote:

Give this a try...

For x = 0 To 9
Range("B4").Activate
y = Application.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

or

For x = 0 To 9
Range("B4").Activate
y = Application.WorksheetFunction.Sum(Range(ActiveCell .Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

--
HTH...

Jim Thomlinson


"Scott" wrote:

The following gives me a Compile Error:Invalid Qualifier (highlights the Sum
word)

For x = 0 To 9
Range("B4").Activate
y = WorksheetFunction.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

Whats wrong?


  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 5,939
Default trying to use sum with range & offest

Get rid of the .Value at the end of the statement...

For x = 0 To 9
Range("B4").Activate
y = WorksheetFunction.Sum(Range(ActiveCell.Offset(x, 0), _
ActiveCell.Offset(x, 23)))
Next
--
HTH...

Jim Thomlinson


"Scott" wrote:

The second recommendation gave me the same original compile error. The first
got past the compile but gives me a runtime error '424' object required.
--------------------------------------------------------------------

"Jim Thomlinson" wrote:

Give this a try...

For x = 0 To 9
Range("B4").Activate
y = Application.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

or

For x = 0 To 9
Range("B4").Activate
y = Application.WorksheetFunction.Sum(Range(ActiveCell .Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

--
HTH...

Jim Thomlinson


"Scott" wrote:

The following gives me a Compile Error:Invalid Qualifier (highlights the Sum
word)

For x = 0 To 9
Range("B4").Activate
y = WorksheetFunction.Sum(Range(ActiveCell.Offset(x, 0),
ActiveCell.Offset(x, 23))).Value
Next

Whats wrong?


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
How do I enter formula sum(range+range)*0.15 sumif(range=3) tkw Excel Discussion (Misc queries) 2 October 1st 09 09:17 PM
Doing a copy-paste offest between 2 workbooks DtTall Excel Programming 0 June 29th 07 02:35 PM
Excel Addin:Setting the range to the Excel.Range object range prop Rp007 Excel Worksheet Functions 5 November 24th 06 04:30 PM
Page Numbering Offest by Two PJFry[_2_] Excel Programming 0 September 16th 05 05:48 PM
how to? set my range= my UDF argument (range vs. value in range) [advanced?] Keith R[_3_] Excel Programming 2 August 11th 03 05:55 PM


All times are GMT +1. The time now is 06:25 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"