Beste allen,
Graag hulp. Bij het uitvoeren van mijn macro krijg ik steeds de foutmelding genoemd in de titel. In mijn werkblad staan onderstaande gegevens. Op de vetgedrukte regel loopt de macro spaak.
Cel C3: 5%
Cel C4: 30
Cel C5: 100000
Mijn macro code:
Sub MaandRenteLening()
Dim RentePerMaand As Double
Dim AantalMaanden As Integer
Dim BedragLening As Double
RentePerMaand = CDbl((Range("C3").FormulaR1C1) / 100) / 12
AantalMaanden = CInt(Range("C4").FormulaR1C1 * 12)
BedragLening = CDbl(Range("C5").Formula1R1C1)
R = MsgBox("€ " & Format(Pmt(RentePerMaand, _
AantalMaanden, BedragLening, 0, 0), _
"#,##0.00"), vbOKOnly, "Uw maandbedrag:")
End Sub
Graag hulp. Bij het uitvoeren van mijn macro krijg ik steeds de foutmelding genoemd in de titel. In mijn werkblad staan onderstaande gegevens. Op de vetgedrukte regel loopt de macro spaak.
Cel C3: 5%
Cel C4: 30
Cel C5: 100000
Mijn macro code:
Sub MaandRenteLening()
Dim RentePerMaand As Double
Dim AantalMaanden As Integer
Dim BedragLening As Double
RentePerMaand = CDbl((Range("C3").FormulaR1C1) / 100) / 12
AantalMaanden = CInt(Range("C4").FormulaR1C1 * 12)
BedragLening = CDbl(Range("C5").Formula1R1C1)
R = MsgBox("€ " & Format(Pmt(RentePerMaand, _
AantalMaanden, BedragLening, 0, 0), _
"#,##0.00"), vbOKOnly, "Uw maandbedrag:")
End Sub