2014-09-01 137 views
0

當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 

回答

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 

documentation for If...Then...Else

+0

這似乎是正確的,但是當我嘗試將其付諸實踐時,它似乎忽略了IF語句並且僅將.value =「NOPL95」應用於所有單元格 – Flaunting 2014-09-01 09:56:00

+0

您是否按照此處的指示嘗試了調試:http:// www .cpearson.com/EXCEL/DebuggingVBA.aspx – 2014-09-01 11:19:35