Cel funkcji VBA Cnt:

Funkcja VBA Cnt jest skategoryzowana jako funkcja konwersji typu danych. Jest to wbudowana funkcja w Excelu VBA. Ta funkcja VBA CInt konwertuje wyrażenie na typ danych Integer.
Tej funkcji można użyć zarówno w procedurze, jak i funkcji w oknie edytora VBA w programie Excel. Możemy użyć tej funkcji VBA CInt w dowolnej liczbie razy w dowolnej liczbie procedur lub funkcji. W następnej sekcji dowiesz się wielu tematów. Jak to jest składnia i parametry funkcji Cint, gdzie możemy użyć tej funkcji VBA Cint i jej przykłady w czasie rzeczywistym.

Składnia funkcji VBA CInt:

Składnia funkcji CInt w VBA to

CInt(Expression)

Funkcja CInt zwraca wartość typu danych integer.

Parametry lub argumenty:

Funkcja CInt ma jeden argument w Excelu VBA.
gdzie
Wyrażenie:Jest to argument obowiązkowy. Argument wyrażenie reprezentuje wartość liczbową lub łańcuchową. Jest on używany do konwersji wartości na wartość całkowitą.

Gdzie możemy zastosować lub użyć funkcji VBA CInt?

Możemy użyć tej funkcji CInt w VBA MS Office 365, MS Excel 2016, MS Excel 2013, 2011, Excel 2010, Excel 2007, Excel 2003, Excel 2016 dla Mac, Excel 2011 dla Mac, Excel Online, Excel dla iPhone, Excel dla iPad, Excel dla tabletów z systemem Android i Excel dla telefonów komórkowych z systemem Android.

Przykład 1: Convert a String(100) to Integer Data Type

Oto prosty przykład funkcji VBA CInt. Ten poniżej przykład określone wyrażenie(100) konwertuje do wartości typu intger.

'Convert a String(100) to Integer Data TypeSub VBA_CInt_Function_Ex1() 'Variable declaration Dim sValue As String Dim dResult As Double sValue = 100 dResult = CInt(sValue) MsgBox "String(100) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function" End Sub

Output: Oto zrzut ekranu z wyjścia pierwszego przykładu.

Przykład 2: Convert a Value(12345.678) to Integer Data Type

Tutaj znajduje się prosty przykład funkcji VBA CInt. Ten poniższy przykład określone wyrażenie(12345.678) konwertuje do wartości typu integer.

'Convert a Value(12345.678) to Integer Data TypeSub VBA_CInt_Function_Ex2() 'Variable declaration Dim sValue As Double Dim dResult As Double sValue = 12345.678 dResult = CInt(sValue) MsgBox "Value(12345.678) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function" End Sub

Wyjście: Here is the screen shot of the second example output.

Przykład 3: Convert a Value(40000) to Integer Data Type (Returns an Overflow Error)

Here is a simple example of the VBA CInt function. Ten poniższy przykład określony wyrażenie(40000) konwertuje do wartości typu intger. Zwraca ona błąd przepełnienia. Wartość 40,000 jest większa niż 32,767. Wartość całkowita powinna mieścić się w przedziale od -32,768 do 32,767.

'Convert a Value(40000) to Integer Data Type (Returns an Overflow Error)Sub VBA_CInt_Function_Ex3() 'Variable declaration Dim sValue As Currency Dim dResult As Double sValue = 40000 dResult = CInt(sValue) MsgBox "Value(40000) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function"End Sub

Wyjście: Oto zrzut ekranu z wyjścia trzeciego przykładu.

Przykład 4: Convert a string(Test) to Integer Data Type (Returns an Type mismatch Error)

Poniżej znajduje się prosty przykład użycia funkcji VBA CInt. Ten poniższy przykład określone wyrażenie(Test) konwertuje do wartości typu intger. To zwraca błąd niedopasowania typu.

'Convert a string(Test) to Integer Data Type (Returns Type mismatch Error)Sub VBA_CInt_Function_Ex4() 'Variable declaration Dim sValue As String Dim dResult As Double sValue = "Test" dResult = CInt(sValue) MsgBox "String(Test) to Integer Data Type : " & dResult, vbInformation, "VBA CInt Function" End Sub

Output: Oto zrzut ekranu wyjścia czwartego przykładu.

Instrukcje korzystania z kodów makr

Tutaj znajdują się instrukcje krok po kroku dotyczące korzystania z funkcji CInt w programie Excel VBA.

• Otwórz skoroszyt programu Excel.
• Naciśnij Alt+F11, aby otworzyć okno edytora VBA.
• Wejdź do menu Wstaw i kliknij moduł z dostępnych opcji.
• Kopiujemy wyżej wymienione makra do edytora VBA.
• Wybierz dowolną procedurę z powyższych kodów i kliknij na polecenie 'Uruchom’ lub użyj skrótu klawiaturowego 'F5′.

Lista funkcji VBA:

Proszę kliknąć na poniższy link, aby wrócić do listy funkcji VBA.

Funkcje konwersji typów danych VBA Lista funkcji VBA