code syntax for excel formula

[trevor40]

Hi again,

I have another excel formula that i need to convert into access vba that then creates the worksheet

the first one I needed was - Formula1:="=MOD(MINUTE(C8:F" & Mid(last_cell, 4, 3) & "),15)>0"
when converted into excel it looks like this in excel =MOD(MINUTE(C8:F16),15)>0
Thanks June7
this works great in a conditional format

What I need now is this - =SUMIF(G8:G16, "=10",M8:M16) converted into a string excel can cope with from Access VBA.
typed manually this works fine to sum only the rows that have 10 in the helper cell (G8:G16).

to get the last row number of the table i'm using Mid(last_cell, 4, 3)

so i'm guessing that it should look something like below but i can't get the syntax correct.

=SumIF(G8:G" & Mid(last_cell, 4, 3) & ",=10" & ",M8:M" & Mid(last_cell, 4, 3) & ")"

[trevor40]

Well so far I have this...

In access
When I enter this code into the VBA editor it puts FALSE in the target cell M18
Current_Worksheet.Range("M" & Mid(last_cell, 4, 3) + 2).Formula = "=SUMIF(G8:G16," > 1 & ",M8:M16)"


If i copy this =SUMIF(G8:G16," > 1 & ",M8:M16) from Access and remove the spaces between the " and > and 1 and remove the & it works correctly

this works when paseted directly into the cell =SUMIF(G8:G16,">1",M8:M16)

i'll try to get just this part working and then add the Mid(last_cell, 4, 3) to get the last table row

[trevor40]

I got it going with this,

Current_Worksheet.Range("$M" & Mid(last_cell, 4, 3) + 2).Formula = "=SUMIF($G$8:$G$" & Mid(last_cell, 4, 3) & "," & Chr(34) & ">1" & Chr(34) & ",$M$8:$M$" & Mid(last_cell, 4, 3) & ")"