Como remover “no cents” ao soletrar centavos menos valores em dólares no Excel?

Question

Atualmente, estou soletrando valores em dólar usando um módulo do site de suporte da Microsoft. Aqui está o link link

Eu posso soletrar perfeitamente valores em dólar no Excel. Mas o que eu não quero é quando diz "sem centavos". Então, digamos que se eu quisesse soletrar 24030 . Diria Twenty Four Thousand Thirty Dollars and no cents . Eu quero que o Excel soletre o valor de centavos somente quando estiver presente.

Eu realmente aprecio se alguém puder me ajudar nisso. Obrigado um monte de antecedência.

Peço desculpas antecipadamente se essa pergunta já tiver sido feita, mas, em minha defesa, não consegui encontrar a resposta certa para ela. Espero que alguém possa me ajudar nessa questão.

    

Answer 1

É uma declaração de caso que seleciona qual opção é dada com base nos critérios apresentados. Para centavos, se for apresentado com uma string em branco, ele escolhe "e No Cents". Nesse caso, basta alterar o que ele fornece para uma string em branco:

Select Case Cents
        Case ""
            Cents = ""
        Case "One"
            Cents = " and One Cent"
        Case Else
            Cents = " and " & Cents & " Cents"
End Select