Question

我为4个变量中的每一个都有一个列，我们称之为A，B，C，D。每个变量都有很多值。我想在每列中只选择一个单元格，然后按下一个按钮，该按钮将：1）连接它们，2）将结果放在E列中。所以我可以选择A2，B5，C3和D1，按下魔术按钮（可能需要在选择单元格之前和之后按下魔术按钮），并且在列EI中将具有以下值的串联：A2，B5，C3 ，D1放在E列。提前谢谢。

Answer 1

不完全是OP的要求，但可能对其他需要非VBA方法的人感兴趣（即如果不准确则关闭）：

=，按Ctrl +依次选择四个单元格中的每一个，输入，然后将,替换为&。

Answer 2

我在VBA中定义了一个自定义连接函数，例如

Function Conc(v As Variant, Optional ByVal sDelim As String = "") As String
    Dim vLoop As Variant
    If IsArray(v) Or TypeName(v) = "Range" Then
        For Each vLoop In v
            If Conc = "" Then
                Conc = vLoop
            Else
                Conc = Conc & sDelim & vLoop
            End If
        Next vLoop
    Else
        Conc = CStr(v)
    End If
End Function

然后您可以根据自己的喜好Sub使用它，例如

Sub ConcatenateCells()
    Range("E1") = Conc(Selection)
End Sub

我按照你的喜好说，因为你没有解释E栏中的结果应该是Gary的学生指出的结果。您可以将此Sub绑定到按钮或CTRL + SHIFT + C等快捷方式。

通过选择多列中的单元格进行连接

2 个答案: