excel和vba公式，如果是，则打印

我正在尝试让这个宏与excel一起工作。它将查看三个单元格的值，如果任何单元格小于60，它将打印它。如果没有，它将移动到数据验证中的下一个名称并继续。它持续打印整个系列

Sub Macro2()
'
' Macro1 Macro
'
' Keyboard Shortcut: Ctrl+Shift+L
'
Dim r As Long, i As Long

r = Range("SOLDIERS").Cells.Count

For i = 1 To r
    Range("B12") = Range("SOLDIERS").Cells(i)

If e32 < 60 Or g32 < 60 Or h32 < 60 Then
ActiveSheet.PrintOut Copies:=1

Else: End If


Next i


End Sub

Sub-Macro2（）
'
'宏1宏
'
'键盘快捷键：Ctrl+Shift+L
'
暗r一样长，我一样长
r=射程（“士兵”）。细胞数
对于i=1到r
射程（“B12”）=射程（“士兵”）。单元格（i）
如果e32<60或g32<60或h32<60，则
ActiveSheet.PrintOut副本：=1
否则：如果
接下来我
端接头

在顶部指定

选项Explicit

，然后VBE将拒绝编译您的代码，并抱怨

e32

，

g32

和

h32

是未声明的变量-如果这些是活动工作表上的范围地址，那么它们应该是

范围（“e32”）。值

，

范围（“g32”）.Value

和

范围（“H32”）。Value

---

请注意，如果任一单元格包含单元格错误值（例如，

#value！

），则比较将以类型不匹配错误结束。例如，如果是数值（范围（“E32”）.Value），则可以使用

来避免这种情况，因此只有在处理数值时才会执行比较（错误值无法与任何值进行比较）。您还可以使用
IsError
函数专门测试单元格是否包含错误值。
范围B12是“我的数据验证”下拉列表。E32、G32和h32是从工作簿中的其他页面自动填充的。@DonaldPanay和
如果E32<60或G32<60或h32<60，则
表达式引用的是未声明的局部变量，而不是
范围
对象<代码>e32
不是VBA中对单元格e32的引用方式。你正确地获得了B12范围-使用类似的语法访问所有需要访问的单元格。对此，我很感激，我非常不了解，并试图在杂草中找到出路。