Question

在列W 中，我有 BALANCE2 值＆amp; 在第X列中，我有 BALANCE3 值

我需要从BALANCE3移动值（大于零）以覆盖BALANCE2 中的相应单元格，以便我有一个完整的付款列表。

任何人都可以帮忙使用这个吗？我不知道怎么做。

Answer 1

请勿使用宏

只使用excel的内置IF，假设BALANCE2是列W而BALANCE3是列X，请在单元格{{1 }}

Z1

然后将其向下拖动到整个列，将列=IF(X1>0,X1,W1)剪切并粘贴到列Z中，然后在没有编写宏代码的情况下进行“覆盖”

Answer 2

试试这个：

Public Sub overwriteValues()

    Dim row As Integer

    'Set start row
    row = 1

    With Sheets("sheetname")

        'Loop until column X cell is blank
        'You can modify column if you want other
        Do While .Range("X" & row) <> ""

            If .Range("X" & row) > 0 Then

                .Range("W" & row) = .Range("X" & row)

            End If

            'Increase row
            row = row + 1

        Loop

    End With

End Sub

如果＆gt; Excel VBA复制单元格值0到左边的单元格

2 个答案: