Defining "Month" as a variable in VBA

[Colin Vicary]

Hi All

I'm trying to write a macro that will look at 12 monthly sales columns
and sum the year to date sales.

I think I'm defining the month as a variable with..

Dim Mon As Integer
Mon = Month(today)

But I get very stange results when I use this to calculate the
sales...

Range("W1").Select
ActiveCell.FormulaR1C1 = "Sales LYTD"
With ActiveSheet.Range("W2:W" & LastRow)
..FormulaR1C1 = "=SUM(RC[-12]:RC[-" & (12 - Mon) & "])"
End With

Any idea what I need to change?

Thanks

Colin (ever amazed by my own lack of knowledge!)

 

[Bob Phillips]

You have a syntax error

Mon = Month(today)

should

Mon = Month(Date)

that apart, it works fine for me.

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Colin Vicary" <[email protected]>
wrote in message
news:[email protected]...

 

[Colin Vicary]

Genius!

Thanks Bob

Colin