有没有简单的方法可以在Excel中将CONCATENATE列列换成文本？ [英] Is there an easy way to turn columns-to-text without CONCATENATE in Excel?

问题描述

我知道文本到列按钮。可以通过选择列，可能运行宏或使用类似的按钮来完成相反的操作？

I'm aware of the text-to-columns button. Can the opposite be done by selecting columns, and possibly running a macro or using a similar button?

推荐答案

通常我会说请发布你的代码帮助/协助编写宏，但这一个真的很简单。

Normally I say "Please post your code" for help/assistance writing macros, but this one is really, really simple.

Public Function ColumnsToText(rng As Range, Optional DelimitBy As String = " ") As String
'Applies on a row/partial row of data. Must be continuous cells, e.g., A1:D1.
Dim var As Variant

var = Application.Transpose(Application.Transpose(rng.Value))
    ColumnsToText = Join(var, DelimitBy)

End Function

在工作表单元格中输入如下信息：

ENter it in a worksheet cell like:

= ColumnsToText（A1：F1）

或者你可以指定一个可选的分隔符，默认情况下是空格，但您可以使用任何字符串字符：

Or you can specify an optional delimiter, it is a space by default, but you could use any string characters:

= ColumnsToText（A1：F1，％）

等等。

这篇关于有没有简单的方法可以在Excel中将CONCATENATE列列换成文本？的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！