☰

Excel 2010 - 在单元格中附加文本

tag-icon • tag-icon microsoft-excel-2010 editing
Excel 2010 - 在单元格中附加文本

假设我在单元格 A1 中有一个名为“Boy”的文本。现在，如果我必须在末尾添加字母“s”，我必须单击公式栏并在末尾添加“s”，或者按 F2 进入编辑模式，然后添加它。有没有什么方法或插件可以让我简单地将值附加到已经有一些文本的单元格中？

答案1

您可以使用CONCATENATE公式，或者类似的=A1 & "s"。

您已经解释了其他手动方式。另一种方式是将宏与用户输入或用户输入表单结合使用。

它可以像这样工作：

  • 选择应该发生附加的范围/单元格
  • 通过快捷键执行宏
  • 弹出对话框询问是否需要添加文本
  • 键入文本
  • 执行追加

另一种方法可能是使用搜索/替换功能。

编辑

尽管我发现这是一种奇怪的数据输入方式，并且在这一点上我不会对微软大发雷霆 - 但这里有一个针对这种精致行为的解决方案：

'VBA code for Sheet1

Private var As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
  On Error Resume Next
  If state Then
    Application.EnableEvents = False
    var = var & Target.Formula
    Target.Formula = var
    Debug.Print var
    Application.EnableEvents = True
  End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If state Then
    var = Target.Formula
    Debug.Print var
  End If
End Sub

'VBA Code for Module1

Public state As Boolean

Public Sub switchState()
  Application.EnableEvents = True
  state = Not state
  Debug.Print state
End Sub

相关内容