WorksheetFunction.DollarFr (Excel)
Converte um preço, apresentado na forma decimal, em um preço apresentado na forma fracionária. Use MOEDAFRA para converter números decimais em números fracionários, como preços de títulos.
Se fração não for um inteiro, será truncado. Se fração for menor que 0, MOEDAFRA retornará o #NUM! valor de erro. Se fração for 0, MOEDAFRA retornará o #DIV/0! valor de erro.
DollarFr (Arg1, Arg2)
Dim dblDollarFr As Double
dblDollarFr = WorksheetFunction.DollarFr(Arg1:=, Arg2:=)
Arguments
Arg1, Arg2Arg1 - Decimal_dollar-um número decimal
Arg2 - Fração - o inteiro a ser usado no denominador da fração