Jak używać operatora mod w vba (z przykładami)

Możesz użyć operatora Mod w VBA, aby obliczyć resztę dzielenia.

Oto dwa popularne sposoby wykorzystania tego operatora w praktyce.

Metoda 1: Użyj operatora Mod z wartościami zakodowanymi na stałe

 SubUseMod ()
Range(" A1 ") = 20 Mod 6
End Sub

Ten konkretny przykład zwróci resztę 20 podzieloną przez 6 w komórce A1 .

Metoda 2: Użyj operatora Mod z odwołaniami do komórek

 SubUseMod ()
Range(" C2 ") = Range(" A2 ") Mod Range(" B2 ")
End Sub

W tym konkretnym przykładzie obliczymy pozostałą część wartości w komórce A2 podzieloną przez wartość w komórce B2 i wyświetlimy wynik w komórce C2 .

Poniższe przykłady pokazują, jak zastosować każdą metodę w praktyce.

Przykład 1: Użyj operatora Mod z wartościami zakodowanymi na stałe

Załóżmy, że chcemy obliczyć resztę z 20 podzieloną przez 6 i wyświetlić wynik w komórce A1 .

W tym celu możemy utworzyć następujące makro:

 SubUseMod ()
Range(" A1 ") = 20 Mod 6
End Sub

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

Wynik 20 rund Mod 6 to 2 .

Wartość ta wyświetlana jest w komórce A1 , tak jak określiliśmy w makrze.

Uwaga : Wartość „6” trzykrotnie wprowadza „20”, a reszta wynosi 2 . W ten sposób oblicza się 20 Mod 6.

Przykład 2: Używanie operatora Mod z odwołaniami do komórek

Załóżmy, że chcemy obliczyć pozostałą część wartości w komórce A2 podzieloną przez wartość w komórce B2 i wyświetlić wynik w komórce C2 .

W tym celu możemy utworzyć następujące makro:

 SubUseMod ()
Range(" C2 ") = Range(" A2 ") Mod Range(" B2 ")
End Sub

Kiedy uruchomimy to makro, otrzymamy następujące dane wyjściowe:

Wynik 20 rund Mod 6 to 2 .

Wartość ta wyświetlana jest w komórce C2 , tak jak określiliśmy w makrze.

Uwaga : Pełną dokumentację operatora VBA Mod można znaleźć tutaj .

Dodatkowe zasoby

Poniższe samouczki wyjaśniają, jak wykonywać inne typowe zadania w VBA:

VBA: Jak dodać wartości w zakresie
VBA: Jak obliczyć średnią wartość zakresu
VBA: Jak policzyć liczbę wierszy w zakresie