Question

我正在尝试将电子表格最后一行的第一列中的值替换为另一个值。例如，我有一个工作簿，其中包含两个名为Input和Data的工作表。我在单元格A1中的输入表上有一个值。我希望此值用数据表中的值替换最后一行中A列中的值。我知道如何使用下面的代码找到工作表的最后一行，但我不知道如何输入位于最后一行的值。我可以添加什么来检索单元格A1中的工作表输入中的值，并替换数据表的最后一行中的A列中的值

Dim LR1 As Long
'Selects the last row with values
With Sheets("Data")
    LR1 = .Range("A" & .Rows.Count).End(xlUp).Row
End With

Answer 1

以下完整解决方案：

Dim LR1 As Long
    With Sheets("Data")
        LR1 = .Range("A" & .Rows.Count).End(xlUp).Row
        .Range("A" & LR1) = Sheets("Input").Range("A1")
    End With

在工作表的最后一行中替换另一个单元格值

1 个答案: