我很抱歉,如果你能理解这一点,因为我很难解释我想要做的事,但基本上我都是试图制作一张成本单表,当你填写它时,它会根据你标记的内容制作一个清单,如果你不选择一些物品,那么其他物品就会进入那个位置。是否有人能够告诉我我在哪里出错?我试图让它看看一个单元格是否大于0,如果另一个单元格不等于"烧烤"然后我想要它说" BBQ"
If Range("'Cost Sheet'!D87", "'Cost Sheet'!D88") > 0 And Not Range("B97") = " • BBQ" Then
Range("B98") = " • BBQ"
答案 0 :(得分:1)
我不完全理解你的问题,但我有一些建议可以帮助你或其他人得到完整的答案。此外,如果您可以提供一些样本数据,并澄清我们是否正在处理多个有用的表格。
首先,我假设这段代码会在某个范围内查看不同的值?如果是这样,我会将被查找的单元格范围转换为Cells()。这将使在一定范围内执行任务变得更加容易:
Sheets("Cost Sheet").Cells()
其次,你可能会更好地为此循环。它看起来像是修改后的版本:
Lastrow = Sheets("Cost Sheet").Range("D" & Rows.count).end(xlup).row
For i = 1 to Lastrow
If Sheets("Cost Sheet").Cells(i,4).value > 0 AND <> Sheets("Cost Sheet").Cells(i,4).value<> "BBQ" Then
Cells().Value = "BBQ"
End if
Next i
希望这会有所帮助,祝你好运。