Excelinput和输出到同一个单元格

我在网上search一个解决scheme，但没有出现。 所有的答案都是针对单个目标细胞。

我想要做的是以下，在范围L1:L1000如果我在这个范围内的单元格input的东西，然后它被添加到下面的公式=IF(N1=0;"";INPUT) – 在同一个单元格。

所以我们可以说我在L1inputHello然后公式变成=IF(N1=0;"";"Hello")

如果任何人都可以帮助我，这将是很棒的，因为我对VB的理解是非常基本的，我只是在学习它。

Answer 1

单元格更改时可以使用事件：

 Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If (Not Intersect(Target, Range("L1:L1000")) Is Nothing) Then 'Eg: Here comes your code for Cell L1 Target.Formula = "=IF(N1=0,""""," & Target.Text & ")" End If Application.EnableEvents = True End Sub 

此方法将编辑单元的forms设置为=IF(N1=0;"";INPUT) 。