Description
Divides two numbers and returns only the remainder.
Syntax
result = number1 Mod number2
The Mod operator syntax has these parts:
Part |
Description |
result |
Any numeric variable. |
number1 |
Any numeric expression. |
number2 |
Any numeric expression. |
Remarks
The modulus, or remainder, operator divides number1 by number2 (rounding floating-point numbers to integers) and returns only the remainder as result. For example, in the following expression, A (which is result) equals 5.
A = 19 Mod 6.7
Usually, the data type of result is an Integer, Integer variant, Long, or Variant containing a Long, regardless of whether or not result is a whole number. Any fractional portion is truncated. However, if any expression is a Null, result is also a Null. Any expression that is Empty is treated as 0.
See Also
Operator Precedence.
Example
This example uses the Mod operator to divide two numbers and return only the remainder. If either number is a floating-point number, it is first rounded to an integer.
MyResult = 10 Mod 5 ' Returns 0. MyResult = 10 Mod 3 ' Returns 1. MyResult = 12 Mod 4.3 ' Returns 0. MyResult = 12.6 Mod 5 ' Returns 3.
This example sets the column width of every other column on Sheet1 to 4 points.
For Each col In Worksheets("Sheet1").Columns If col.Column Mod 2 = 0 Then col.ColumnWidth = 4 End If Next col
This example sets the row height of every other row on Sheet1 to 4 points.
For Each rw In Worksheets("Sheet1").Rows If rw.Row Mod 2 = 0 Then rw.RowHeight = 4 End If Next rw
This example selects every other item in list box one on Sheet1.
Dim items() As Boolean Set lbox = Worksheets("Sheet1").ListBoxes(1) ReDim items(1 To lbox.ListCount) For i = 1 To lbox.ListCount If i Mod 2 = 1 Then items(i) = True Else items(i) = False End If Next lbox.MultiSelect = xlExtended lbox.Selected = items