当K列包含使用短代码的策略类型时,我有一个电子表格。
当这个短代码是NET94时,我需要将其更改为NOPL95,并且还要将列AC中的单元格更改为AA列中值的95%。
我已经创建了一个宏来循环删除单元格,我希望将它添加到循环中。
我正在尝试的代码似乎不起作用,我找不到符合此要求的在线内容。
Firstrow = .UsedRange.Cells(1).Row
Lastrow = .UsedRange.Rows(.UsedRange.Rows.Count).Row
For Lrow = Lastrow To Firstrow Step -1
'Amend Net94 & NET03H to NOPL95
With .Cells(Lrow, "AC")
If Not IsError(.Value) Then
If .Value = "NET94" Or .Value = "NET03H" Then .Value = "NOPL95" And .Cells(Lrow, "AC").Value = .Cells(Lrow, "AA") * 95 / 100
答案 0 :(得分:2)
那是not what And
is for。如果您希望在满足给定条件时发生多个事情,那么您需要将每个事项放在一个单独的行上,并使用End If
终止该块,如下所示:
If .Value = "NET94" Or .Value = "NET03H" Then
.Value = "NOPL95"
.Cells(Lrow, "AC").Value = .Cells(Lrow, "AA") * 95 / 100
End If