/ / Pętle w programie Excel VBA - Jak mogę iterować funkcję przez zakres? - excel, vba, excel-vba-mac

Pętle w programie Excel VBA - Jak mogę iterować funkcję przez zakres? - excel, vba, excel-vba-mac

Więc wiem, że Excel ma funkcję NPV, ale ja "mpróbuję zrobić własną, ponieważ próbuję nauczyć się VBA, mam dane przedstawione w tabeli, a następnie chcę iterować przez poziomy zakres komórek (od G5 do I5). Sposób, w jaki próbuję strukturować Pętla to zapytanie o liczbę przepływów pieniężnych i ustawienie tego numeru jako daty końcowej. W ten sposób Makro może być wykorzystywane do problemów o różnych czasach trwania.

Mój kod nie działa i nie jestem pewien, dlaczego ktoś może mi się przyjrzeć i mi pomóc? Proszę użyć terminów laików, ponieważ właśnie zacząłem z VBA wczoraj.

Sub NPV()
Dim y As Integer, inv As Double, tax As Double, sal As Double, wc As Double, dr As Double, i As Integer, v As Double
y = Range("C4")
inv = Range("C5")
tax = Range("C6")
sal = Range("E4")
wc = Range("E5")
dr = Range("E6")

Dim total As Double
total = 0
For i = 1 To y
v = Range("5, 5 + i")
v = v / (1 + dr) ^ i
total = total + v
Next i

total = total + ((1 - tax) * sal) + wc
Range("F5").Value = total
End Sub

Odpowiedzi:

1 dla odpowiedzi № 1

Rozważyć wymianę:

v = Range("5, 5 + i")

z:

v = Cells(5, 5 + i)