Što je Excel VBA CDBL?

CDBL je VBA funkcija koja koristi za pretvaranje izraza u dvostruki tip podataka. VBA se sastoji od niza funkcija pretvorbe podataka. Ova pomoć omogućuje promjenu vrste podataka varijable ili vrijednosti iz jedne u drugu. U različitim proračunima, pretvorba je potreban postupak za postizanje pravog rezultata. CDBL je jedna od funkcija pretvorbe podataka koja je uključena u funkcije pretvorbe tipa u VBA. CDBL znači "Pretvori u dvostruko". Tijekom obrade podataka možete naići na situacije da cijeli broj promijenite u dvostruko. Za ispis točnog rezultata ova će vam funkcija pomoći. VBA CDBL funkcija prihvaća samo brojeve. Bilo koji izraz osim brojeva proizvest će pogrešku u neusklađivanju tipa.

Format CDBL funkcije u Excelu VBA

CDBL je jednostavna funkcija za rad u VBA. Izraz bi trebao biti broj.

  • Izraz: je li broj koji želite pretvoriti u plutajući broj.

Ako je izraz išta osim broja, funkcija će vratiti pogrešku neusklađenosti. Pogledajte donji primjer, gdje se izraz bez broja prenosi na funkciju CDBL i proizveo je neusklađenost tipa pogreške.

Upotreba CDBL funkcije u VBA

Provjerimo kako nam funkcija VBA CDBL pomaže u obradi podataka. Da biste dobili jasan prikaz i razumjeli praktičnu upotrebu promjene vrste podataka, pogledajte donji primjer. Možete vidjeti razliku prema vrsti podataka koji se koriste na istoj varijabli.

  • Deklarirajte varijablu kao cjelobrojni tip podataka i dodijelite joj plutajuću vrijednost. Dok ispisujete vrijednost pogledajte kako će prikazati vrijednost.

Kodirati:

 Private Sub addconvert () Dim b kao Cijeli kraj Sub

  • Plutajuća vrijednost dodijeljena je deklariranoj cjelobrojnoj varijabli. 785.456923785475 dodjeljuje se varijabli b koja je cjelobrojna varijabla.

Kodirati:

 Private Sub addconvert () Dim b kao Cijeli broj b = 785.456923785475 Kraj Sub

  • Ispisujte dodijeljenu vrijednost koristeći okvir za poruke.

Kodirati:

 Private Sub addconvert () Dim b kao cijeli broj b = 785.456923785475 MsgBox b Kraj Sub

Pogledajte kako rezultati pokazuju razliku dok ispisujete vrijednost.

Dodijelili ste broj s plutajućim vrijednostima, ali izlaz pokazuje samo cijeli broj zadanog broja. Ovdje je varijabla 'b' deklarirana kao cijeli broj, tako da neće prihvatiti plutajuću vrijednost. Uzima se cijeli broj decimalne vrijednosti, a izbjegava se decimalni dio. Budući da je varijabla deklarirana kao cijeli broj, broj će se zaokružiti na najbliži cijeli broj.

Za ispis podataka kakvi jesu, mijenjanje varijabilne vrste podataka u dvostruku, umjesto cjelobrojne vrste podataka.

  • Jednostavnom izmjenom u istom kodu možete ispisati navedeni broj kakav jest. Proglasite varijablu dvostrukom vrstom podataka.

Kodirati:

 Private Sub addconvert () Dim b kao Double End Sub

  • Deklariranoj dvostrukoj varijabli dodjeljuje se broj dvostruko. 785.456923785475 dodijeljen je varijabli b koja je dvostruko u tipu podataka.

Kodirati:

 Private Sub addconvert () Dim b kao Double b = 785.456923785475 Kraj Sub

  • Ispisujte dodijeljenu vrijednost pomoću okvira s porukama.

Kodirati:

 Private Sub addconvert () Dim b kao dvostruko b = 785.456923785475 MsgBox b Kraj Sub

Pogledajte kako rezultati pokazuju razliku dok ispisujete vrijednost. Dodijelili ste broj s plutajućim vrijednostima.

Usporedite oba izlaza i uočite razliku. Čak su i podaci i varijabla isti, a promjena u tipu podataka promijenila je cijeli izlaz. Iz toga ćete dobiti važnost vrste podataka i kako on utječe na cijeli program. To je razlog za korištenje drugačije funkcije pretvorbe s VBA.

Primjeri CDBL funkcije u Excelu VBA

Ispod su različiti primjeri pretvorbe VBA u dvostruko.

Ovaj VBA CDBL Excel predložak možete preuzeti ovdje - VBA CDBL Excel predložak

Primjer # 1: Pretvorite vrstu podataka u niz u dvostruko

Pogledajmo kako se izvodi pretvorba podataka i koje su promjene koje možete izvršiti uz pomoć funkcija pretvorbe podataka. Niz je vrsta podataka koja prihvaća sve vrste podataka. Varijabla je definirana kao niz i dodjeljuje joj broj.

  • Upotrijebite privatnu funkciju za provjeru promjena u različitom tipu podataka, stvorite funkciju pretvaranja kao privatnog, proglasite varijablu 'a' kao string.

Kodirati:

 Privatni Sub pretvoriti () Dim a As String End Sub

  • Da biste izvršili pretvorbu, potrebna vam je varijabla. Budući da se varijabla pretvara u dvostruki tip podataka, deklarirajte je kao dvostruku vrstu podataka. Nakon pretvorbe podataka, vrijednost će biti dodijeljena ovoj varijabli.

Kodirati:

 Privatni Sub pretvoriti () Dim a kao string string Dim pretvoriti kao Double End Sub

  • Dodijelite plutajući broj 1234.5645879 varijabli niza. Niz vrsta podataka će prihvatiti brojeve s pomičnim vrijednostima.

Kodirati:

 Privatni Sub pretvoriti () Dim a kao niz Dim pretvaranje u dvostruko a = 1234.5645879 Kraj Sub

  • Sada koristite VBA CDBL funkciju za pretvaranje vrijednosti u dvostruku. Možete koristiti varijablu "pretvoriti" koja je deklarirana kao dvostruka vrsta podataka. Proslijedite varijabli 'a' kao izraz CDBL funkciji.

Kodirati:

 Privatni Sub pretvoriti () Dim a kao string string Dim pretvoriti kao Double a = 1234.5645879 pretvoriti = CDbl (a) Kraj Sub

  • Za pregled izlazne vrijednosti možete ispisati pomoću okvira s porukama.

Kodirati:

 Privatni Sub pretvoriti () Dim a kao string Stim pretvoriti kao dvostruko a = 1234.5645879 pretvoriti = CDbl (a) MsgBox pretvoriti Kraj Sub

  • Pokrenite ovaj kôd pritiskom na F5 izravno ili ručno pritiskom na gumb Run na gornjoj lijevoj ploči.

  • Vrijednost dodijeljena varijabli 'a' ispisat će se isto kao i plutajuće točke i cijelu vrijednost. Vrijednost se pretvara u dvostruki tip podataka i ispisuje se kao u nastavku.

Primjer br. 2 - Pretvaranje i dodavanje dva broja

Imate dvije varijable koje trebate dodati i pronaći zbroj kao dio svog izračuna. Oba su plutajući brojevi s decimalnim vrijednostima. Ali jedna je varijabla deklarirana kao cjelobrojna, a druga kao dvostruka.

  • Stvorite dodavanje funkcije da biste pronašli zbroj dva broja. Dvije varijable A1 i A2 su deklarirane kao cjelobrojne i dvostruke.

Kodirati:

 Privatni Sub dodaj () Dim A1 kao cijeli broj Dim A2 kao dvostruki krajnji sub

  • Dodijelite dva broja odgovarajućim varijablama. Oba su dva plutajuća broja s decimalnim vrijednostima.

Kodirati:

 Privatni Sub dodaj () Dim A1 kao cijeli broj Dim A2 kao dvostruki A1 = 1256, 45 A2 = 1234, 58 Kraj sub

  • Proglasite treću varijablu zbroj kao dvostruku vrstu podataka jer će rezultat biti dvostruka vrijednost.

Kodirati:

 Privatni sub dodaj () Dim A1 kao cijeli broj Dim A2 kao dvostruki zbroj Dim kao dvostruki A1 = 1256, 45 A2 = 1234, 58 Kraj sub

  • Dodajte zadana dva broja i rezultat stavite u zbroj varijable.

Kodirati:

 Private Sub dodavanje () Dim A1 kao cijeli broj Dim A2 kao dvostruki zbroj Dim kao dvostruki A1 = 1256, 45 A2 = 1234, 58 zbroj = A1 + A2 krajnji pot

  • Korištenje okvira s porukama omogućuje ispis rezultata.

Kodirati:

 Privatni Sub dodaj () Dim A1 Kao cijeli broj Dim A2 Kao dvostruki zbroj Dim Kao dvostruki A1 = 1256, 45 A2 = 1234, 58 zbroj = A1 + A2 MsgBox zbroj Kraj Sub

  • Pokrenite ovaj kôd pritiskom na F5 izravno ili ručno pritiskom na gumb Run na gornjoj lijevoj ploči.

Očekivani rezultat je 2491, 03 i dok provjeravate izlaz možete vidjeti neku razliku u rezultatu. Do neusklađenosti rezultata došlo je zbog vrijednosti uzete od varijable A1. Budući da je ovo cjelobrojna varijabla, ovo neće prihvatiti decimalni dio broja, pri obradi zbroja uzima se samo cijeli broj.

  • Da biste to izbjegli, pretvorite broj A1 u dvostruko i dodijelite pretvoreni broj drugoj varijabli A3.

Kodirati:

 Privatni Sub dodaj () Dim A1 Kao cijeli broj Dim A2 Kao dvostruki zbroj Dim Kao dvostruki A1 = 1256.45 A2 = 1234.58 A3 = CDbl (1256.45) zbroj = A1 + A2 MsgBox zbroj Kraj Sub

  • Sada dodajte konvertiranu varijablu s A2 umjesto A1. Budući da se broj pretvara u dvostruki tip podataka, vrijednost s pomičnim brojevima bit će prihvaćena i dodana s A2.

Kodirati:

 Privatni Sub dodaj () Dim A1 Kao cijeli broj Dim A2 Kao dvostruki zbroj Dim Kao dvostruki A1 = 1256.45 A2 = 1234.58 A3 = CDbl (1256.45) zbroj = A2 + A3 MsgBox suma Kraj Sub

  • Pokrenite ovaj kôd pritiskom na F5 izravno ili ručno pritiskom na gumb Run na gornjoj lijevoj ploči.

Vrijednost zbroja je korigirana i proizvela je očekivani rezultat.

Stvari koje treba zapamtiti

  • VBA CDBL funkcija neće prihvatiti vrijednosti umjesto broja.
  • Pogreška neusklađenosti tipa bit će proizvedena ako je za tekstnu vrijednost dodijeljena VBA CDBL funkcija.
  • Dvostruka vrsta podataka prikazuje 13-znamenkasti decimalne vrijednosti.
  • Funkcija VBA CDBL pomaže vam dobiti pravi rezultat tijekom obrade brojeva u Excelu.

Preporučeni članci

Ovo je vodič za VBA CDBL funkciju. Ovdje smo raspravljali o tome kako koristiti VBA CDBL funkciju za pretvaranje vrijednosti u Dvostruki tip podataka u Excelu, zajedno s nekoliko praktičnih primjera i preuzeti Excel predložak. Možete i pregledati naše druge predložene članke -

  1. Komentar bloka VBA
  2. SUMPRODUCT Funkcija u Excelu
  3. VBA imenovani domet
  4. COMBIN funkcija u Excelu

Kategorija:

VBA