| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Subtotal
Why won't this or any other way I have tried to write this line work?
Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
from
rng = ("b" & rc & ":" & "l" & rc) to set rng = Range("b" & rc & ":" & "l" & rc) "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
x = rng.Subtotal(groupby:=1, Function:=xlSum)
and set x = rng.Subtotal(groupby:=1, Function:=xlSum) still returns Argument not optional error "Joel" wrote in message ... from rng = ("b" & rc & ":" & "l" & rc) to set rng = Range("b" & rc & ":" & "l" & rc) "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
What are you trying to do??? You have declared X as long. Then you try to
assign it to the Subtotal Method of the range. What number were you thinking would end up in X since subtotal adds subtotals to a range of values??? -- HTH... Jim Thomlinson "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
What I am totaling is currency.
I have set x to currency, double, long and as a variant Has no bearing on setting x all return same error compile error: Argument not optional with subtotal highlighted "Jim Thomlinson" wrote in message ... What are you trying to do??? You have declared X as long. Then you try to assign it to the Subtotal Method of the range. What number were you thinking would end up in X since subtotal adds subtotals to a range of values??? -- HTH... Jim Thomlinson "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
Subtotal is a method of a range. It inserts rows into the range and adds
subtotal lines. It does not have a return value. It transforms the range. So it does not matter how you declare x since subtotal does not return anything to put in x. So what are you trying to do. -- HTH... Jim Thomlinson "treasuresflemar" wrote: What I am totaling is currency. I have set x to currency, double, long and as a variant Has no bearing on setting x all return same error compile error: Argument not optional with subtotal highlighted "Jim Thomlinson" wrote in message ... What are you trying to do??? You have declared X as long. Then you try to assign it to the Subtotal Method of the range. What number were you thinking would end up in X since subtotal adds subtotals to a range of values??? -- HTH... Jim Thomlinson "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
|
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
|
Subtotal
Specific to your Argument not optional question. Subtotal has 3 required
arguments. GroupBy, Function and TotalList. You have only listed 2... Group by and Function. What is the list of columns that you want totaled??? Even if you supply that list it still will not return a value or object to x... -- HTH... Jim Thomlinson "Jim Thomlinson" wrote: Subtotal is a method of a range. It inserts rows into the range and adds subtotal lines. It does not have a return value. It transforms the range. So it does not matter how you declare x since subtotal does not return anything to put in x. So what are you trying to do. -- HTH... Jim Thomlinson "treasuresflemar" wrote: What I am totaling is currency. I have set x to currency, double, long and as a variant Has no bearing on setting x all return same error compile error: Argument not optional with subtotal highlighted "Jim Thomlinson" wrote in message ... What are you trying to do??? You have declared X as long. Then you try to assign it to the Subtotal Method of the range. What number were you thinking would end up in X since subtotal adds subtotals to a range of values??? -- HTH... Jim Thomlinson "treasuresflemar" wrote: Why won't this or any other way I have tried to write this line work? Set x = rng.Subtotal(groupby:=1, Function:=xlSum) Argument not optional error Dim x as long With Range(rn) 'tells range to use rc = .Find(DateValue(dt), LookIn:=xlValues, _lookat:=xlWhole).Rows.Row 'get row number of match rng = ("b" & rc & ":" & "l" & rc) 'sets range to subtotal Set x = rng.Subtotal(groupby:=1, Function:=xlSum) End With |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Subtotal To Include Item Description On Subtotal Line | Excel Discussion (Misc queries) | |||
| sort macro, subtotal and add lines after subtotal | Excel Discussion (Misc queries) | |||
| pasting to subtotal lines without replacing hidden -non-subtotal l | Excel Discussion (Misc queries) | |||
| Subtotal of Subtotal displays Grand Total in wrong row | Excel Worksheet Functions | |||
| Sort, Subtotal, Label Subtotal, Insert row | Excel Programming | |||
Hybrid Mode
