formatted proper currency format ("$###.##") : Currency Format « Data Type « VBA / Excel / Access / Word

1. VBA / Excel / Access / Word
2. Data Type
3. Currency Format

formatted proper currency format ("$###.##")

 
Sub loanPayment()
   Dim dblRate As Double
   Dim intTerm As Integer
   Dim dblPrincipal As Double
   Dim dblPayment As Double
   Dim strFormat As String

   dblRate = 0.075
   intTerm = 5
   dblPrincipal = 75000
   strFormat = "$###.##"

   dblPayment = Pmt(dblRate / 12, intTerm * 12, -dblPrincipal)

   msgBox "The monthly payment is: " & Format(dblPayment, strFormat)

End Sub

 

Related examples in the same category