Vertaling van 'Range' bij macro opnemen in cel

[RJD1986]

Na het opnemen van een macro in excel verschijnt de volgende code in vba.

Sub Macro5()
'
' Macro5 Macro

'
    ActiveCell.FormulaR1C1 = _
        "=SUMIFS(C[-8],C[-10], ""Kantoor uren"",C[-12],""BADIN"",C[-11], ""2012"",C[-9],""8"")"
End Sub

C[-8] = E:E
C[-10] = C:C
C[-12] = A:A

De kolom van de active cell is in dit geval kolom M. Ik neem aan dat het ook mogelijk is om Range("A:A") in te voeren, maar dit is mij tot op heden niet gelukt. Mijn vraag is dan ook hoe ik dit wel werkend kan krijgen?

Bij voorbaat dank!

 

[Elsendoorn2134]

RJD1986

De vertaling is

ActiveCell.Offset(1, 0).FormulaLocal = _
"=SOMMEN.ALS($E:$E;$C:$C; ""Kantoor uren"";$A:$A;""BADIN"";$B:$B; ""2012"";$D:$D;""8"")"

Let op dat je eventueel SUMIFS gebruikt in plaats van SOMMEN.ALS als je in een engelse versie werkt.

Veel succes.

 

[RJD1986]

Mijn dank is groot! Uiteindelijk is de oplossing ook vrij logisch .