onder generaal, van de VBA code kan je helpen de digitale tekst spellen.Als volgt: 1.Op het Alt+F11, sleutels, het openstellen van Microsoft de visuele toepassing, het raam, 2.,,,.Click ,Insert, >, Module,, and paste the following macro in the, Module,window.,,Function SpellNumberToEnglish(ByVal pNumber) 'Updateby20131113 Dim Dollars, Cents arr = Array("", "", " Thousand ", " Million ", " Billion ", " Trillion ") pNumber = Trim(Str(pNumber)) xDecimal = InStr(pNumber, ".") If xDecimal > 0 Then Cents = GetTens(Left(Mid(pNumber, xDecimal + 1) & "00", 2)) pNumber = Trim(Left(pNumber, xDecimal - 1)) End If xIndex = 1 Do While pNumber <> "" xHundred = "" xValue = Right(pNumber, 3) If Val(xValue) <> 0 Then xValue = Right("000" & xValue, 3) If Mid(xValue, 1, 1) <> "0" Then xHundred = GetDigit(Mid(xValue, 1, 1)) & " Hundred "Als het op middellange termijn (xvalue, 2, 1) < > "0", en dan xhundred = xhundred & 格滕斯 (half (xvalue, 2) de andere xhundred = xhundred & getdigit (half (xvalue, 3)) een einde te maken aan de als xhundred < > "dan de dollar = xhundred & arr (xindex) & dollar als len (nummer) > 3 = (aantal en dan links, len (nummer) 3) andere =" als xindex = xindex + 1 dollar = "ring van $$" niet "zaak" een "dollar =" dollar "de zaak anders dollar = dollar &" dollar "in het geval van de uiteindelijke keuze" cent "=" niet "."Een" = "cent" cent "en" de zaak anders cent = & cent & "cent" uiteindelijk gekozen spellnumbertoenglish = dollar & zonder einde functionele 格滕斯 (PTENs). De resultaten van de resultaten van de string = "als val (links (PTENs, 1)) = 1 en de keuze van de zaak val (zaak C - 10 PTENs): resultaten van de" Tien "zaak 11: = = = = = = =" elf "de zaak 12: resultaten =" twaalf "zaak 13:" de zaak 14: 13 = = = = = = = "" de zaak 15: 14 "=" 15 "de zaak 16: de resultaten van de 17: = 16" van "=" 17 "de zaak 18: resultaten =" 18 "zaak 19: resultaten van de zaak uiteindelijk de keuze" negentien "= andere keuze, een andere (PTENs, val (links (1)) Zaak C - 2: resultaten = "20" Zaak C - 3: resultaten = "30" - Zaak 4: resultaten = "40" geval 5: resultaten = "50" geval 6: resultaten = "60" zaak 7: resultaten = "8: de zaak 70" = "80" Zaak C - 9: resultaten = 90 "in andere gevallen de definitieve keuze van de resultaten van de getdigit (= & (PTENs rechts, 1) als de ge - SI = resultaten in het einde van functionele getdigit (pdigit) de keuze van de zaak val (pdigit) - Zaak 1:getdigit =" een "Zaak C - 2:getdigit =" twee "Zaak C - 3: Zaak C - 4 getdigit =" drie ": getdigit =" 4 zaak C - 5: "getdigit =" vijf "Zaak C - 6:getdigit =" zes "Zaak C - 7:getdigit =" zeven "Zaak C - 8:getdigit =" acht "Zaak C - 9:getdigit =" negen "geval:" uiteindelijk kiezen om een einde te maken aan getdigit =3. De functie.En het bewaren van de code, en terug aan het werk in de tabel, in de buurt van de cel in de formule: = E1, spellnumbertoenglish (D1), een screenshot:,,,,,,, 4.En dan, de invoer, de bond, de keuze van de batterij E1, sleurt aan te vullen, met inbegrip van de formule voor je naar de omvang van de behoeften.De cijfers zijn verduidelijkt en alle Engelse woorden.Kijk 's:,,,,,, noot: omdat ze als je de formule moeten kopiëren en plakken, alsjeblieft. Als de waarde.,,,,, woorden of cijfers, kutools misschien boven, Excel, lange code kan je boos maakt, maak je geen zorgen, ik kan voor je voor de oplossing van Het probleem in een eenvoudige en snelle manier.,,, kutools Excel, spellen, digitale, functie, je kan snel en gemakkelijk omgezet in digitale tekst.,,, kutools Excel, met inbegrip van meer dan 120 gelegen goed gereedschap.Gratis 30 dagen zonder beperkingen.Tot nu,,,, als je die kutools Excel, alsjeblieft, volgens de volgende procedure:,, 1.De keuze van de cijfers te spellen, 2.Klik, kutools, > >,, de inhoud, het aantal spellen.Kijk 's:,,,,,, 3.In de cijfers, spellen, de dialoog, de keuze van de Engelse taal,,,,.Je kunt niet van rechts, de resultaten bekijken, ruiten.Kijk 's:,,,,,, 4.En klik, "van toepassing.Het bedrag van de prijs en alle reeds zijn omgezet in de oorspronkelijke tekst in bereik,,,,, dat de Chinese prijzen, als je de woorden, klik, Chinees, opties, in de taal van de,,,.,,,
Hoe zal de spelling of de digitale omschakeling voor de woorden in het Engels?
Next Page:Hoe overschakelen op volledig scherm?