Question

我完全陷入困境，需要有人提供一些新代码，因为我甚至都没有意识到这一点。我需要做两件事。

如果M2> 0，则复制M2并将其粘贴到D2中。继续这样做直到＆＃34; M＆＃34;已根据行数进行评估。
接下来，如果我最终根据会议条件进行复制和粘贴，那么我还想更改F列中的项目状态，说“＆＃34; FALSE＆＃34;”。希望有人可以帮助我完成一个大型项目的尾端。

Answer 1

对于＃1，在D2中放

=IF(M2>0,M2,"")

然后单击并向下拖动整个列

然后在F2 put

=IF(M2>0,"FALSE","TRUE")

然后点击并向下拖动整个列（假设“TRUE”是其他的假设。

在VBA中，这是一种方式：

For i = 2 to ActiveSheet.UsedRange.Rows.Count
  If Range("M"&i).Value > 0 Then
    Range("D"&i).Value = Range("M"&i).Value
    Range("F"&i).Value = "FALSE"
Next i

如果条件满足如何复制单元格并粘贴到另一个单元格？

1 个答案: