Question

我有一个财务模型，包括流量资产，负债等作为标题。我希望将一个股票代码（AAPL US Equity作为示例）插入到单元格A1中，以便它出现在下面的列中。但是，一旦单元格中出现自动收报机（例如A2），下次我将自动收录机插入A1时，我希望它出现在A3中，依此类推。原因是因为我使用的公式会自动将统计信息写入表中，但首先需要在行的开头使用自动收报机。

                    TIME            PRICE       EPS         PE RATIO
AAPL US Equity      4:00:00PM       440.9       7.591       10.97977035

Answer 1

您可以使用检测worksheet_change事件的宏来实现此目的！以下是编码的方法。

Place this macro in the worksheet you want it to function!

    Private Sub Worksheet_Change(ByVal Target As Range)
    'check if the cell change is on A1
    If Target.Address(False, False) = "A1" Then
        Dim lrow As Integer
        lrow = Me.Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row
        Me.Range("A" & lrow + 1) = Target
    End If
End Sub

如何在列中显示的单元格中插入值但在Excel中的该单元格中保持永久值？

1 个答案: