Vba 使用带数字条件的自动保存

我正在寻找一种在VBA中使用autosave的方法，如果满足不断变化的数值条件。基本上，我正在循环一个名为“input_row”的变量，我想使用一个条件来测试该变量是否是25的倍数，例如：

If input_row = (random integer) * 25 Then
ActiveWorkbook.AutoSave
End If 

如前所述，由于IE8的问题，我的代码经常崩溃，因此确保自动保存似乎非常重要。目前，我在循环中的每次迭代后都会进行保存，这样做很好，但会大大降低整个过程的速度

---

任何简单的“如果”语句建议？

使用

Mod

功能测试您的数字是否为25的倍数：

If input_row Mod 25 = 0 Then
    'input_row is a multiple of 25
End If

---

使用

Mod

功能测试您的数字是否为25的倍数：

If input_row Mod 25 = 0 Then
    'input_row is a multiple of 25
End If

---

使用

Mod

功能测试您的数字是否为25的倍数：

If input_row Mod 25 = 0 Then
    'input_row is a multiple of 25
End If

---

使用

Mod

功能测试您的数字是否为25的倍数：

If input_row Mod 25 = 0 Then
    'input_row is a multiple of 25
End If

---

谢谢我想有一个简单的函数可以做到这一点！你得到一个“答案”和两个“赞成票”！？你一定和别人有勾结。：）谢谢我想有一个简单的函数可以做到这一点！你得到一个“答案”和两个“赞成票”！？你一定和别人有勾结。：）谢谢我想有一个简单的函数可以做到这一点！你得到一个“答案”和两个“赞成票”！？你一定和别人有勾结。：）谢谢我想有一个简单的函数可以做到这一点！你得到一个“答案”和两个“赞成票”！？你一定和别人有勾结。：）