Čo je to Excel VBA CDBL?

CDBL je funkcia VBA, ktorá používa na prevod výrazov na dvojitý typ údajov. VBA pozostáva z niekoľkých funkcií na konverziu údajov. Pomáha to zmeniť typ údajov premennej alebo hodnoty z jednej na druhú. V rôznych výpočtoch je konverzia nevyhnutným procesom na dosiahnutie správneho výsledku. CDBL je jednou z funkcií na konverziu údajov zahrnutých do funkcií na konverziu typu vo VBA. CDBL znamená „Premeniť na dvojnásobok“. Pri spracovaní údajov sa môžu vyskytnúť situácie, keď sa celé číslo zmení na dvojnásobné. Táto funkcia vám pomôže vytlačiť presný výsledok. Funkcia VBA CDBL prijíma iba čísla. Akýkoľvek výraz okrem čísel spôsobí chybu nesúladu typu.

Formát funkcie CDBL v programe Excel VBA

CDBL je jednoduchá funkcia, ktorá vyžaduje, aby jediný výraz fungoval vo VBA. Výraz by mal byť číslo.

  • Výraz: Je číslo, ktoré chcete previesť na plávajúce číslo.

Ak je výraz iný ako číslo, funkcia vráti chybu nezhody. Pozrite si nižšie uvedený príklad, kde je do funkcie CDBL odovzdaný nečíselný výraz a došlo k nezhode typu chyby.

Použitie funkcie CDBL vo VBA

Pozrime sa, ako nám funkcia VBA CDBL pomáha pri spracovaní údajov. Ak chcete získať jasný prehľad a porozumieť praktickému použitiu zmeny typu údajov, pozrite si nasledujúci príklad. Môžete vidieť rozdiel podľa typu údajov použitých v rovnakej premennej.

  • Vyhláste premennú ako celočíselný typ údajov a priraďte jej pohyblivú hodnotu. Pri tlači hodnoty zistite, ako sa bude hodnota zobrazovať.

kód:

 Private Sub addconvert () Dim b As Integer End Sub

  • Pohyblivej hodnote sa priradí deklarovaná celočíselná premenná. 785.456923785475 je priradená premennej b, ktorá je celočíselnou premennou.

kód:

 Private Sub addconvert () Dim b As Integer b = 785.456923785475 End Sub

  • Pomocou okna správ vytlačte priradenú hodnotu.

kód:

 Private Sub addconvert () Dim b As Integer b = 785.456923785475 MsgBox b End Sub

Pozrite sa, ako výsledky ukazujú rozdiel pri tlačení hodnoty.

Priradili ste číslo s pohyblivými hodnotami, ale výstup zobrazuje iba celé číslo daného čísla. Premenná „b“ sa tu deklaruje ako celé číslo, takže nebude akceptovať pohyblivú hodnotu. Celá časť desatinnej hodnoty sa vyberie a desatinnej časti sa zabráni. Pretože premenná sa deklaruje ako celé číslo, číslo sa zaokrúhli na najbližšie celé číslo.

Ak chcete údaje vytlačiť v aktuálnom stave, zmeňte typ premennej na dvojitý namiesto typu celočíselného typu.

  • Jednoduchou zmenou toho istého kódu môžete dané číslo vytlačiť tak, ako je. Vyhláste premennú ako dvojitý dátový typ.

kód:

 Private Sub addconvert () Dim b As Double End Sub

  • Deklarovanej dvojitej premennej sa priradí dvojité číslo. 785.456923785475 je priradená premennej b, ktorá je v dátovom type dvojitá.

kód:

 Private Sub addconvert () Dim b As Double b = 785.456923785475 End Sub

  • Pomocou okna správ vytlačte priradenú hodnotu.

kód:

 Private Sub addconvert () Dim b As Double b = 785.456923785475 MsgBox b End Sub

Pozrite sa, ako výsledky ukazujú rozdiel pri tlačení hodnoty. Priradili ste číslo s pohyblivými hodnotami.

Porovnajte oba výstupy a uvidíte rozdiel. Dokonca aj údaje a premenná sú rovnaké, ako zmena v type údajov zmenila celý výstup. Z toho získate význam dátového typu a ako to ovplyvňuje celý program. To je dôvod na použitie iného typu konverzných funkcií s VBA.

Príklady funkcie CDBL v programe Excel VBA

Nižšie sú uvedené rôzne príklady konverzie VBA na dvojnásobok.

Túto šablónu VBA CDBL Excel si môžete stiahnuť tu - šablónu VBA CDBL Excel

Príklad č. 1: Konvertovanie typu dát reťazca na dvojnásobok

Pozrime sa, ako prebieha konverzia údajov a aké zmeny môžete vykonať pomocou funkcií na konverziu údajov. Reťazec je typ údajov, ktorý akceptuje všetky typy údajov. Premenná je definovaná ako reťazec a priraďuje jej číslo.

  • Použite súkromnú funkciu na kontrolu zmien v rôznych typoch údajov, vytvorte funkciu prevodu ako súkromnú a deklarujte premennú „a“ ako reťazec.

kód:

 Konverzia súkromného podúčtu () Dim a As String End Sub

  • Na vykonanie prevodu potrebujete premennú. Pretože premenná konvertuje na dvojitý typ údajov, deklaruje ju ako dvojitý dátový typ. Po prevode údajov bude hodnota priradená k tejto premennej.

kód:

 Konverzia súkromného subkonvertovania () Dim a As String Dim konvertovania ako dvojitý koniec

  • Priraďte plávajúce číslo 1234.5645879 reťazcovej premennej. Dátový typ reťazca akceptuje čísla s pohyblivými hodnotami.

kód:

 Konverzia súkromného subkonvertovania () Dim a As String Dim konvertovanie ako Double a = 1234.5645879 Koniec sub

  • Teraz použite funkciu VBA CDBL na prevod hodnoty na dvojnásobok. Môžete použiť premennú „convert“, ktorá je deklarovaná ako dvojitý dátový typ. Premennú „a“ odovzdajte ako funkciu CDBL.

kód:

 Private Subvert () Dim a As String Dim konvertujte ako Double a = 1234.5645879 convert = CDbl (a) End Sub

  • Ak chcete zobraziť výstupnú hodnotu, môžete tlačiť pomocou okna so správou.

kód:

 Private Sub convert () Dim a As String Dim konvertujte ako Double a = 1234.5645879 convert = CDbl (a) MsgBox convert End Sub

  • Spustite tento kód priamym stlačením klávesu F5 alebo manuálnym stlačením tlačidla Spustiť na ľavom hornom paneli.

  • Hodnota priradená premennej „a“ sa vytlačí rovnaká s plávajúcimi bodmi a celočíselnou hodnotou. Hodnota sa prevedie na dvojitý typ údajov a tá istá sa vytlačí ako je uvedené nižšie.

Príklad č. 2 - Konverzia a pridanie dvoch čísiel

Súčet môžete pridať a nájsť súčet ako súčasť výpočtu. Obe sú plávajúce čísla s desatinnými hodnotami. Jedna premenná je však deklarovaná ako celé číslo a druhá ako dvojitá.

  • Vytvorte funkciu add a nájdite súčet dvoch čísel. Dve premenné A1 a A2 sú deklarované ako celé a dvojité.

kód:

 Súkromné ​​Sub add () Dim A1 ako celé číslo Dim A2 ako Double End Sub

  • Priraďte tieto dve čísla príslušným premenným. Obe sú dve plávajúce čísla s desatinnými hodnotami.

kód:

 Pridanie súkromnej podskupiny () Dim A1 ako celé číslo Dim A2 ako dvojité A1 = 1256, 45 A2 = 1234, 58 End Sub

  • Vyhláste tretiu premennú sumu za dvojitý typ údajov, pretože výsledkom bude dvojitá hodnota.

kód:

 Súkromné ​​čiastkové sčítanie () Dim A1 ako celé číslo Dim A2 ako dvojnásobná suma súčtu ako zdvojnásobenie A1 = 1256, 45 A2 = 1234, 58 End Sub

  • Pridajte dané dve čísla a výsledok vložte do premennej sumy.

kód:

 Private Sub add () Dim A1 ako celé číslo Dim A2 ako Double Dim sum As Double A1 = 1256, 45 A2 = 1234, 58 suma = A1 + A2 End Sub

  • Použitie okna správy umožňuje tlačiť výstup.

kód:

 Private Sub add () Dim A1 ako celé číslo Dim A2 ako Double Dim sum As Double A1 = 1256, 45 A2 = 1234, 58 sum = A1 + A2 MsgBox suma End Sub

  • Spustite tento kód priamym stlačením klávesu F5 alebo manuálnym stlačením tlačidla Spustiť na ľavom hornom paneli.

Očakávaný výsledok je 2491, 03 a pri kontrole výstupu môžete vidieť určitý rozdiel vo výsledku. Nesúlad vo výsledku nastal v dôsledku hodnoty prijatej premennou A1. Pretože ide o celočíselnú premennú, neprijíma desatinnú časť čísla, pri spracovaní súčtu sa preto berie iba celá časť.

  • Aby ste tomu predišli, skonvertujte číslo A1 na dvojnásobok a skonvertujte číslo na inú premennú A3.

kód:

 Private Sub add () Dim A1 ako celé číslo Dim A2 ako Double Dim sum As Double A1 = 1256, 45 A2 = 1234, 58 A3 = CDbl (1256, 45) súčet = A1 + A2 Suma MsgBox Koniec Sub Sub

  • Teraz pridajte prevedenú premennú s A2 namiesto A1. Pretože číslo sa prevádza na dvojitý dátový typ, hodnota s plávajúcimi číslami sa akceptuje a pridá sa k A2.

kód:

 Private Sub add () Dim A1 ako celé číslo Dim A2 ako Double Dim sum As Double A1 = 1256, 45 A2 = 1234, 58 A3 = CDbl (1256, 45) súčet = A2 + A3 Suma MsgBox Koniec Sub Sub

  • Spustite tento kód priamym stlačením klávesu F5 alebo manuálnym stlačením tlačidla Spustiť na ľavom hornom paneli.

Hodnota súčtu bola opravená a priniesla očakávaný výsledok.

Čo je potrebné pamätať

  • Funkcia VBA CDBL nebude akceptovať skôr hodnoty ako číslo.
  • Ak je funkcii VBA CDBL priradená textová hodnota, vznikne chyba nesúladu typu.
  • Dvojitý dátový typ zobrazuje 13-ciferné desatinné hodnoty.
  • Funkcia VBA CDBL vám pomôže získať správny výsledok pri spracovaní čísel v Exceli.

Odporúčané články

Toto je sprievodca funkciou VBA CDBL. Tu diskutujeme o tom, ako pomocou funkcie VBA CDBL previesť hodnotu na typ Double Data v Exceli, spolu s niekoľkými praktickými príkladmi a šablónou Excel na stiahnutie. Môžete si tiež prečítať naše ďalšie navrhované články -

  1. Komentár k bloku VBA
  2. SUMPRODUCT Funkcia v Exceli
  3. Pomenovaný rozsah VBA
  4. Funkcia COMBIN v Exceli

Kategórie:

VBA