Public Sub NumberFormatPlus2(Number As Double, MinimumIntegers As Int, MaximumFractions As Int, MinimumFractions As Int, GroupingUsed As Boolean) As String
If Number=Round(Number) Then
Return $"$1.0{Number}"$
Else
Return NumberFormat2(Number,MinimumIntegers,MaximumFractions,MinimumFractions,GroupingUsed)
End If
End Sub