请你们其中一个人帮助我使用以下代码 . 我在互联网上的某个地方想改变它,但没有赢,
如果F列中的值(与金额在同一行)是Debit-Outstanding,我希望第I列(从第9行)的金额更改为减去金额(借方金额) .
请看下面我找到的代码 .
Sub test()Dim rcel As range Dim Rng As range设置Rng =范围(ActiveCell,Cells(Rows.Count,_ ActiveCell.Column).End(xlUp))对于Rng中的每个rcel如果rcel.Value <>“”和rcel.Value> = 0然后rcel.Value = rcel.Value * -1结束如果下一个rcel结束Sub
我带来这部分来检查F栏的 Value
和Text.Offset(“ - 3,0”)=“Debit-Outstanding”
显然我并不像我想的那么聪明,需要更多的训练,ps:没有让4个空格代码块正确,感谢那个将再次为我修复它的人 . 任何帮助将在这项工作中受到赞赏 . 再次感谢