Kako dokazati besedilo v tujem jeziku v Wordu 2016
V interesu kozmopolitizma vam Word 2016 omogoča delo s tujimi jeziki. Naučite se, kako vnesti in urediti besedilo v tujem jeziku, ter preveriti črkovanje in slovnico.
Prikaz številk kot besed v Excelu
Če ste kdaj morali prikazati številko, zapisano kot besedilo, ste verjetno odkrili, da Excel ne ponuja takšne funkcije. Ko Excel ne uspe, je pogosto mogoče odpraviti pomanjkljivost z uporabo VBA. Tukaj je funkcija VBA, imenovana SPELLDOLLARS , ki jo lahko uporabite v formulah delovnega lista.
Primeri v Excelu
Tukaj je nekaj primerov SPELLDOLLARS.
Koda VBA
Če želite uporabiti to kodo, pritisnite Alt+F11, da aktivirate urejevalnik Visual Basic. Nato izberite Vstavi → Modul, da vstavite nov modul VBA. Kopirajte kodo in jo prilepite v nov modul.
Funkcija SPELLDOLLARS(celica) kot različica
« Vrne vrednost, napisano z besedami
Dim Dollars As String, Cents As String
Dim TextLen As Long, Pos As Long
Dim Temp kot niz
Dim iHundreds As Long, iTens As Long, iOnes As Long
Dim Ones As Variant, Teens As Variant, Tens As Variant
Dim Units (2 do 5) kot niz
Dim bHit kot Boolean, NegFlag kot Boolean
' Ali je celica brez števila ali prazna?
Če ni, je številska(celica) ali celica = ““ Potem
SPELLDOLLARS = CVERr(xlErrValue)
Izhodna funkcija
Konec Če
' Je negativno?
Če je celica < 0="" then="" negflag="True" cell="Abs(cell)" end="" if="" dollars="Format(cell," “###0.00”)="" textlen="Len(Dollars)" -="" 3="" '="" is="" it="" too="" large?="" if="" textlen=""> 15 Potem
SPELLDOLLARS = CVERr(xlErrNum)
Izhodna funkcija
Konec Če
' Naredite del centov
Centi = desno (dolarja, 2) & “/100 dolarjev”
Če je celica < 1="" then="" spelldollars="Cents" exit="" function="" end="" if="" dollars="Left(Dollars," textlen)="" ones="Array( ““," “en”,="" "dva",="" "trije",="" "štiri",="" _="" "pet",="" "šest",="" "sedem",="" "osem",="" "devet")="" teens="Array("Deset"," "enajst",="" "dvanajst",="" "trinajst",= "" "štirinajst",="" _="" "petnajst",="" "šestnajst",="" "sedemnajst",="" "osemnajst",="" "devetnajst")="" desetice= "Matrika("“," "“,="" "dvajset",="" "trideset",="" "štirideset",="" "petdeset",="" _=""“šestdeset”,="" "sedemdeset",="" "osemdeset",="" "devetdeset")="" enote(2)=""Tisoč"" enot(3)=""Milijon"" enot( 4)=""Billion"" units(5)=""Bilijon"" temp="""" for="" pos="15" to="" 3="" step="" -3="" if="" textlen="">= Pos - 2 Nato
bHit = False
Če TextLen >= Pos Potem
iHundreds = Asc(Mid$(Dollars, TextLen - Pos + 1, 1)) - 48
Če je iHundreds > 0 Potem
Temp = Temp & “ “ & Ones (iHundreds) & “ Hundred”
bHit = Res
Konec Če
Konec Če
iTens = 0
iOnes = 0
Če TextLen >= Pos - 1 Potem
iTens = Asc(Mid$(Dollars, TextLen - Pos + 2, 1)) - 48
Konec Če
Če je TextLen >= Pos - 2 Potem
iOnes = Asc(Mid$(Dollars, TextLen - Pos + 3, 1)) - 48
Konec Če
Če je iTens = 1 Potem
Temp = Temp & “ “ & Teens (iOnes)
bHit = Res
Drugače
Če je iTens >= 2 Potem
Temp = Temp & “ “ & Tens (iTens)
bHit = Res
Konec Če
Če je iOnes > 0 Potem
Če je iTens >= 2 Potem
Temp = Temp & “-”
Drugače
Temp = Temp & “ “
Konec Če
Temp = Temp & Ones (iOnes)
bHit = Res
Konec Če
Konec Če
Če je bHit In Pos > 3 Potem
Temp = Temp & “ “ & enote (Poz 3)
Konec Če
Konec Če
Naslednja poz
SPELLDOLLARS = Trim(Temp) & “ in “ & Cents
Če NegFlag potem SPELLDOLLARS = “(“ & SPELLDOLLARS & “)”
Končna funkcija
Filtriranje in razvrščanje podatkov vrtilne tabele v Excelu 2019
Učinkovito filtriranje in razvrščanje podatkov v vrtilni tabeli Excel 2019 za boljša poročila. Dosežite hitrejše analize z našimi namigi in triki!
Kaj pomenijo sporočila o napakah reševalca v Excelu?
Reševalec v Excelu je močno orodje za optimizacijo, ki lahko naleti na težave. Razumevanje sporočil o napakah reševalca vam lahko pomaga rešiti težave in optimizirati vaše matematične modele.
Teme za PowerPoint 2019
Odkrijte različne <strong>teme PowerPoint 2019</strong> in kako jih lahko uporabite za izboljšanje vaših predstavitev. Izberite najboljšo temo za vaše diapozitive.
Kako uporabljati distribucije hi-kvadrat v Excelu
Nekateri statistični ukrepi v Excelu so lahko zelo zmedeni, vendar so funkcije hi-kvadrat res praktične. Preberite vse opise funkcij hi-kvadrat za bolje razumevanje statističnih orodij.
Kako dodati obrobo strani v Word 2013
V tem članku se naučite, kako dodati <strong>obrobo strani</strong> v Word 2013, vključno z različnimi slogi in tehnikami za izboljšanje videza vaših dokumentov.
Kako delati z več dokumenti v Wordu 2013
Ni vam treba omejiti uporabe urejevalnika besedil na delo z enim samim dokumentom. Učinkovito delajte z več dokumenti v Wordu 2013.
Kako dodati komentarje v predstavitev PowerPoint 2013
Sodelovanje pri predstavitvi, ustvarjeni v PowerPointu 2013, je lahko tako preprosto kot dodajanje komentarjev. Odkrijte, kako učinkovito uporabljati komentarje za izboljšanje vaših predstavitev.
Kako spremeniti nastavitve preverjanja črkovanja in slovnice v Wordu 2016
Ugotovite, kako prilagoditi nastavitve preverjanja črkovanja in slovnice v Wordu 2016, da izboljšate svoje jezikovne sposobnosti.
Kaj so izročki v PowerPointu 2013?
PowerPoint 2013 vam ponuja različne načine za izvedbo predstavitve, vključno s tiskanjem izročkov. Izročki so ključnega pomena za izboljšanje vaše predstavitve.