Использование угловых для свойств, генерируемых каркасом. Угадайте, что они идут по (теперь несуществующей) подсказке, предоставленной ECMA-262 3.0.
Попробуйте использовать 'Chr (34)':
ws.Range("B" & na.Row + 2).Formula = "=SUMIF(OFFSET(B1,,,ROW()-1,1)," & Chr(34) & "<>#N/A" & Chr(34) & ")"
Редактировать: Удаленные кавычки написаны по ошибке
Вы можете использовать AGGREGATE и удалить Смещение, которое является нестабильным
ws.Range("B" & na.Row + 2).Formula= "=AGGREGATE(9,6,B1:B" & na.Row + 1 & ")"
При использовании кавычек в формуле необходимо «удвоить»:
ws.Range("B" & na.Row + 2).Formula = "=SUMIF(OFFSET(B1,,,ROW()-1,1),""<>#N/A"")"