Excel VBA CDBL funkcija
VBA CDBL ir iebūvēta datu tipa pārveidošanas funkcija, un šīs funkcijas izmantošana ir tāda, ka tā pārveido jebkura konkrētā mainīgā lieluma vērtības datu tipu Double datu tipā, šai funkcijai ir nepieciešams tikai viens arguments, kas ir paša mainīgā vērtība.
VBA “CDBL” nozīmē “Convert to Double”. Šī funkcija konvertē norādīto numuru uz Double data type. Apskatiet CDBL funkcijas sintaksi.
- Izteiksme ir vērtība, kuru mēs mēģinām pārveidot par Double datu tipu.
Jebkuru peldošo skaitli, kas tiek glabāts kā dubultdatu tips, var pārveidot, izmantojot CDBL funkciju.
Norādiet šeit, lai atcerētos: Double skaitļa datus var konvertēt tikai skaitliskās vērtības. Visu, kas nav skaitliskā vērtība, nevar pārveidot par divkāršu tipu, tāpēc galu galā parādiet “Type Mismatch Error in VBA”, piemēram, tālāk.
Vai jūs kādreiz esat izmantojis dubultu datu tipu VBA kodēšanā?
Ja nē, tagad ir vērts to apskatīt. Double ir datu tips, ko izmanto, lai saglabātu skaitļa decimāldaļu. Mums var būt līdz 13 peldošiem cipariem aiz komata.
Piemēram, apskatiet zemāk redzamo VBA kodu.
Iepriekšminētajā es mainīgā (k) tipu esmu definējis kā veselu skaitli. Dim k kā vesels skaitlis
Pēc tam vērtību esmu piešķīris kā k = 25,4561248694615
Kad es palaidīšu kodu, mēs iegūsim rezultātu šādi.
Rezultāts tika iegūts kā 25, jo mainīgais ir definēts kā Integer VBA kārta līdz tuvākajai veselā skaitļa vērtībai.
Lai parādītu rezultātu tādu, kāds tas ir, mums ir jāmaina mainīgā tips no Integer uz Double.
Tam vajadzētu dot precīzu skaitli, kādu mēs piešķirām mainīgajam.
Labi, paturot to prātā, mēs varam arī konvertēt visus daļu skaitļus, kas ir veikali kā dubultdatu tips.
VBA CDBL funkcijas izmantošanas piemēri
1. piemērs
Lai sāktu procesu, apskatīsim zemāk redzamo kodu.
Kods:
Sub Double_Eample1 () Dim k As virkne k = 48.14869569 MsgBox k End Sub
Tagad es palaidīšu kodu un redzēšu, kas notiks.
Kaut arī VBA mainīgā tips ir “String”, tajā joprojām tiek rādītas decimāldaļas. Tas ir tāpēc, ka virkne var būt jebkura veida datu tips, tāpēc decimāldaļas vai peldošie skaitļi tiek rādīti tādi, kādi tie ir.
Tagad es mainīšu vba datu tipu no virknes uz Integer.
Kods:
Sub Double_Piemērs1 () Dim k As Integer k = 48.14869569 MsgBox k End Sub
Tagad es palaidīšu kodu un redzēšu, kas notiks.
Šeit funkcijai CDBL ir būtiska loma, pārveidojot vesela skaitļa datu tipu par divkāršu. Tātad zemāk esošais kods jums ir vienāds.
Kods:
Sub Double_Eample1 () Dim IntegerNumber kā virkne Dim DoubleNumber As Double IntegerNumber = 48.14869569 DoubleNumber = CDbl (IntegerNumber) MsgBox DoubleNumber End Sub
Tas pārveidos virknes datu veida vērtību uz Double.
2. piemērs
Tagad pārvērsim skaitli 854.6947, kas tiek saglabāts kā Variant uz Double datu tipu.
Kods:
Sub Double_Eample2 () Dim VaraintNumber Dim DoubleNumber As Double VaraintNumber = 854.6947 DoubleNumber = CDbl (VaraintNumber) MsgBox DoubleNumber End Sub
Pirmais mainīgais, kuru esmu deklarējis kā “Variant”. Dim VaraintNumber
Piezīme: Ja mainīgā tips nav deklarēts, tas kļūst par universālu datu tipu Variant.
Pēc tam esmu deklarējis vēl vienu mainīgo, ti, Dim DoubleNumber kā Double.
Pirmajam mainīgajam VaraintNumber mēs esam piešķīruši vērtību 854.6947.
Tagad, izmantojot otro mainīgo, mēs esam izmantojuši funkciju CDBL, lai vērtību Variant pārveidotu par Double datu tipu.
DoubleNumber = CDbl (VaraintNumber)
Pēdējā daļa ir parādīt rezultātu ziņojumu lodziņā. MsgBox DoubleNumber
Tagad es palaidīšu kodu, lai redzētu rezultātu.
Atceramās lietas
- Divkāršs datu tips var pieņemt tikai skaitliskus skaitļus.
- Ja tiek piegādāta teksta vērtība, tas izraisīs kļūdas veidu neatbilstība.
- Divkāršs datu tips var parādīt tikai 13 peldošo skaitļu ciparus.
