Question

我想说，如果在一个单元格（i，2）中包含文本“Lala”而另一个单元格（i，9）包含文本“Active”，则它应该复制单元格3和4的内容

不幸的是我的代码没有处理第二个条件 - 没有它正在运行。那么有谁能告诉我如何正确地写它？

如果存在“Deactive”，则不应复制内容。

If Cells(i, 2) = "Lala" And Cells(i, 9) = "Active" Then         
    Range(ActiveSheet.Cells(i, 3), ActiveSheet.Cells(i, 4)).Select         
    Selection.Copy

解决了！解决方案是：

If ActiveSheet.Cells(i, 2).Value = "Lala" And ActiveSheet.Cells(i, 9).Value = "Active" Then        
Range(ActiveSheet.Cells(i, 3), ActiveSheet.Cells(i, 4)).Select

Answer 1

'试试这个 '如果单元格包含所需数据，则复制范围

If Cells(i, 2).value like "*Lala*" And Cells(i, 9).value like "*Active*" Then         
    Range(ActiveSheet.Cells(i, 3), ActiveSheet.Cells(i, 4)).Copy
End if

Visual Basic for Applications - 如果......然后......

1 个答案: