VBA Integer

Liczba całkowita to typ danych w VBA, który jest nadawany dowolnej zmiennej w celu przechowywania wartości całkowitych, ograniczenia lub nawias określający liczbę zmiennej całkowitej, którą można przechowywać, są podobne w VBA do tych w innych językach, każda zmienna jest definiowana jako liczba całkowita zmienna za pomocą instrukcji DIM lub słowa kluczowego w języku VBA.

Excel VBA Integer

Typy danych są tak ważne w każdym języku kodowania, ponieważ po każdej deklaracji zmiennej powinno następować przypisanie typu danych do tych zmiennych. Mamy kilka typów danych do pracy, a każdy typ danych ma swoje zalety i wady z nim związane. Kiedy deklarujemy zmienne, ważne jest, aby znać szczegóły dotyczące określonego typu danych. To jest artykuł poświęcony typowi danych „Integer” w języku VBA. Pokażemy Ci pełny obraz typu danych „Integer”.

Jaki jest typ danych Integer?

Liczby całkowite to liczby całkowite, które mogą być dodatnie, ujemne i zerowe, ale nie mogą być liczbą ułamkową. W kontekście VBA „liczba całkowita” to typ danych, który przypisujemy zmiennym. Jest to numeryczny typ danych, który może zawierać liczby całkowite bez miejsc dziesiętnych. Typ danych Integer 2 bajty pamięci, co stanowi połowę typu danych VBA LONG, tj. 4 bajty.

Przykłady typu danych typu Integer w programie Excel VBA

Poniżej znajdują się przykłady typu danych VBA Integer.

Możesz pobrać ten szablon VBA Integer Data Type tutaj - VBA Integer Data Type Template

Przykład 1

Kiedy deklarujemy zmienną, konieczne jest przypisanie jej typu danych i jednej z nich liczby całkowitej, która jest powszechnie używana przez wszystkich użytkowników w oparciu o wymagania.

Jak powiedziałem, liczba całkowita może zawierać tylko liczby całkowite, a nie ułamkowe. Wykonaj poniższe czynności, aby zobaczyć przykład typu danych typu integer VBA.

Krok 1: Zadeklaruj zmienną jako liczbę całkowitą.

Kod:

 Sub Integer_Example () Dim k As Integer End Sub 

Krok 2: Przypisz wartość 500 do zmiennej „k”.

Kod:

 Sub Integer_Example1 () Dim k As Integer k = 500 End Sub 

Krok 3: Pokaż wartość w oknie komunikatu VBA.

Kod:

 Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub 

Kiedy uruchamiamy kod za pomocą klawisza F5 lub ręcznie, widzimy 500 w oknie komunikatu.

Przykład nr 2

Teraz przypiszę wartość -500 do zmiennej „k”.

Kod:

 Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub 

Uruchom ten kod ręcznie lub naciśnij klawisz F5, a w oknie komunikatu zostanie również wyświetlona wartość -500.

Przykład nr 3

Jak powiedziałem, typ danych VBA Integer może zawierać tylko liczby całkowite, a nie ułamkowe, takie jak 25,655 lub 47,145.

Jednak spróbuję przypisać liczbę ułamkową do typu danych VBA Integer. Na przykład spójrz na poniższy kod.

Kod:

 Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub 

Przypisałem 85.456 zmiennej „k”. Uruchomię ten kod VBA, aby zobaczyć, jaki jest wynik.

  • Zwrócił wynik jako 85, mimo że przypisałem wartość liczby ułamkowej. Dzieje się tak, ponieważ VBA zaokrągla liczby ułamkowe do najbliższej liczby całkowitej.
  • Wszystkie ułamki liczbowe mniejsze niż 0,5 zostaną zaokrąglone w dół do najbliższej liczby całkowitej. Na przykład 2,456 = 2, 45,475 = 45.
  • Wszystkie liczby ułamkowe większe niż 0,5 zostaną zaokrąglone w górę do najbliższej liczby całkowitej. Na przykład 10,56 = 11, 14,789 = 15.

Aby jeszcze raz spojrzeć na zaokrągloną liczbę całkowitą, przyjmijmy, że wartość „k” wynosi 85,58.

Kod:

 Sub Integer_Example3 () Dim k As Integer k = 85.58 MsgBox k End Sub 

Kiedy uruchomię ten kod za pomocą klawisza F5 lub ręcznie, zwróci on 86, ponieważ wartości większe niż 0,5 zostaną zaokrąglone w górę do następnej liczby całkowitej.

Ograniczenia typu danych typu Integer w Excel VBA

Błąd przepełnienia: typ danych typu Integer powinien działać poprawnie, o ile przypisana wartość mieści się w zakresie od -32768 do 32767. W momencie, gdy przekroczy limit po którejkolwiek stronie, spowoduje to błąd.

Na przykład spójrz na poniższy kod.

Kod:

 Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub 

Wartość 40000 przypisałem zmiennej „k”.

Ponieważ mam pełną wiedzę na temat typu danych Integer, na pewno wiem, że to nie działa, ponieważ typ danych typu integer nie może przechowywać wartości większej niż 32767.

Uruchommy kod ręcznie lub za pomocą klawisza F5 i zobaczmy, co się stanie.

Ups !!!

Otrzymałem błąd jako „Przepełnienie”, ponieważ typ danych Integer nie może pomieścić niczego więcej niż 32767 dla liczb dodatnich i -32768 dla liczb ujemnych.

Błąd niezgodności typu: dane całkowite mogą zawierać tylko wartości liczbowe z zakresu od -32768 do 32767. Jeśli jakakolwiek liczba, której przypisano więcej niż te liczby, spowoduje wyświetlenie błędu przepełnienia.

Teraz spróbuję przypisać do niego wartości tekstowe lub łańcuchowe. W poniższym przykładowym kodzie przypisałem wartość „Hello”.

Kod:

 Sub Integer_Example4 () Dim k As Integer k = "Hello" MsgBox k End Sub 

Uruchomię ten kod za pomocą opcji uruchamiania lub ręcznie i zobaczę, co się stanie.

Pokazuje błąd jako „niezgodność typu”, ponieważ nie możemy przypisać wartości tekstowej do zmiennej „typ danych całkowitoliczbowych”.