Sum hvis kolonne C >0

Kan du ikke prøve at omformulere dit spørgsmål! Det er noget "kryptisk" at forholde sig til ;-)

Tror en array / Matrix formel er nok .. men er det sum af kolonne c der skal til (obs hele kolonne formler er skidt for performance).

Alternativt kan du måske bruge sum produkt(($c$1:$c$100>0)*(sum))

Men enig med #1 det er lidt kryptisk

for each cellC in colC
  While cellC > 0
    cellC.offset(0,1) = sumIF et-eller-andet
endWhile
next cellC

Hej finb
Makroen går i stå ved endWhile, hvad gør jeg forkert

ja, det skal være:

for each cellC in colC
  While cellC > 0
    cellC.offset(0,1) = sumIF et-eller-andet
LOOP
next cellC

Nu går den i stå ved Loop, hvad gør jeg forkert

Jeg har løst det på en anden måde
Range("D6").Copy
    Selection.End(xlDown).Select
    Application.CutCopyMode = False

Mange tak for jeres tid

Æv, min Selection.End(xlDown).Select virker ikke, nogen der kan hjælpe?

x = 0
Do While Range("c6").Offset(x, 0).Value <> ""

x = x + 1

Loop


Range("d6").Copy
Range("d7:d" & x + 5).Select
ActiveSheet.Paste

End Sub