Sub teste()

Range("O16").Value = WorksheetFunction.SumIf(Range("N16:N501"), ">=N16", Range("N16:N501"))

End Sub

Ótimo! Mais simples do que pensava. Só mais uma pergunta que me ocorreu que eu posso precisar a seguir: se ao invés do N16 fixo eu tiver esse SUMIF dentro de um FOR TO, como eu faço pra indicar uma variável no condicional?
Assim não funcionou:
Dim X As Integer
For X = 16 To 501
If Cells(X, 14) = 0 Then
Cells(X, 15).Value = 0
Else
Range("O" & X).Value = WorksheetFunction.SumIf(Range("n16:n501"), " >= Range("N" & X) ", Range("n16:n501"))
Next X

Obrigado Klarc!

Sub teste()

Dim X As Integer
For X = 16 To 501
If Cells(X, 14) = 0 Then
Cells(X, 15).Value = 0
Else
Range("O" & X).Value = WorksheetFunction.SumIf(Range("n16:n501"), ">=N" & X, Range("n16:n501"))
End If
Next X

End Sub

Pra mim ele retorna zero em todas as células da coluna, tanto da forma como eu tinha feito quanto da forma como sugeristes...

Experimente:

Range("O" & X).Value = WorksheetFunction.SumIf(Range("N16:N501"), ">=" & Range("N" & X).Value, Range("N16:N501"))

Cara, tua sugestão não tinha como estar errada, então desconfiei que o problema fosse outro e descobri o seguinte: os números da coluna N que to somando são todos menores que 1 (0,08 / 0,1 / 0,17 / etc), e por isso está retornando tudo zero. Se altero os números para quaisquer números acima de 1, funciona perfeito. Sabes porque o SUMIF não tá pegando os números abaixo de 1?