Iespējams, jums būs jāpārveido skaitļi, kas saglabāti kā teksts, faktiskajos skaitļos jūsu VBA kodā. Šajā apmācībā mēs apskatīsim funkcijas, kas jums jāizmanto, lai pārvērstu virkni par veselu skaitli, garu, dubultu, decimāldaļu vai valūtas datu tipu (noklikšķiniet šeit, lai uzzinātu par skaitļu pārvēršanu virknēs)
Pārvērst virkni par veselu skaitli
Lai pārveidotu virkni par veselu skaitli, varat izmantot funkciju CInt vai CLng. Ja daļa ir mazāka par .5, funkcija noapaļos uz leju, ja daļa ir lielāka vai vienāda ar .5, funkcija noapaļos uz augšu. Šis kods pārveidos virkni par veselu skaitli:
| 1 | MsgBox CInt ("7,55") |
Rezultāts ir šāds:
Šis kods izmanto funkciju CLng, lai pārvērstu virkni par veselu skaitli:
| 1 | MsgBox CLng ("13,5") |
Rezultāts ir šāds:
Piezīme: Varat izmantot funkciju CInt vai CLng, lai pārvērstu virkni par veselu skaitli vai garu (attiecīgi) datu tipu. Garo datu tips ir tāds pats kā veselu skaitļu datu tips, izņemot lielākus skaitļus. Agrāk atšķirība bija nepieciešama atmiņas ierobežojumu dēļ. Mūsdienu programmēšanā nav iemesla neizmantot garo datu tipu, jo atmiņa vairs nav problēma. Tāpēc vienmēr ir labāk izmantot garu datu veidu, nevis veselu skaitli.
Varat izmantot tūlītējo logu, lai redzētu, kā vērtība tiks apstrādāta, ja tā netiks konvertēta par veselu skaitli.
| 1 | Atkļūdot. Drukāt "13,5" + "13,5" |
Parasti teksts tiks saglabāts kā mainīgais, un šis mainīgais būs jāpārvērš par skaitļu datu tipu, kā parādīts zemāk esošajā kodā:
| 1234567 | Apakš, izmantojot mainīgos ()Dim vērtībaViena kā virknevalueOne = 5MsgBox CLng (valueOne) + CLng (valueOne)Beigu apakš |
Pārvērst virkni par decimālo
Varat izmantot CDbl vai CDec funkciju, lai pārvērstu virkni par decimāldaļu. Šis kods virkni pārveidotu par dubultu datu tipu:
| 1 | MsgBox CDbl ("9.1819") |
Rezultāts ir šāds:
Šis kods virkni pārveidotu par decimālu datu tipu:
| 1 | MsgBox CDec ("13.57") + CDec ("13.4") |
Rezultāts ir šāds:
Varat izmantot tūlītējo logu, lai redzētu, kā vērtība tiks apstrādāta, ja tā netiks pārvērsta dubultā vai decimālā datu tipā:
| 1 | Atkļūdot. Drukāt "13,57" + "13,4" |
Rezultāts ir šāds:
Piezīme: Decimālo datu tips var saglabāt lielākus skaitļus nekā dubultā datu tips, tāpēc vienmēr ir ieteicams izmantot decimālo datu tipu, ja neesat pārliecināts.
Konvertēt virkni uz valūtu
Jūs varat izmantot funkciju CCur, lai pārvērstu virkni valūtā. Šis kods virkni pārveidotu par valūtas datu tipu:
| 1 | Diapazons ("A1"). Vērtība = CCur ("18,5") |
Rezultāts ir šāds:
