我有这个问题:在Excel文件中我有两张纸。在第一张表中,我输入值,更改值,删除值...有时,在一个单元格中,我输入的值如下125+138+458
现在,我需要将值复制到下一张工作表中,但只需要将值首先输入到第一张工作表中。
答案 0 :(得分:0)
我找到了这段代码:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim VRange As Range, cell As Range
Dim Msg As String
Dim ValidateCode As Variant
Set VRange = Range("B119:H130")
For Each cell In Target
If Union(cell, VRange).Address = VRange.Address Then
Cells(cell.Row, Columns.Count).End(xlToLeft).Offset(, 1) = Date & " " & Time
Cells(cell.Row, Columns.Count).End(xlToLeft).Offset(, 1) = cell.Value
End If
Next cell End Sub
没关系,因为现在我有变化的时间和价值变化......我需要有列标题的单元格值,只需要第一次更改单元格。 怎么做?
答案 1 :(得分:-2)
在你的第二张表中,你可以将它放在一个单元格中:'= Sheet1!A1“。
表1:
A1: 50
B1: =A1 + 20
表2:
A1: =Sheet1!A1 //Will output "50"
B1: =Sheet1!B1 //Will output '70"
将工作表1中的A1
更改为任何其他值,工作表2中的2个单元格也会更新。