将相同的文本附加到Excel中列中的每个单元格

如何将文本附加到Excel中的列中的每个单元格？ 我需要添加一个逗号（“，”）到最后。

例：

[e-mail]变成[e-mail],

数据示例：

 [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] [e-mail] 

Answer 1

看看这是否适合你。

• 所有的数据都在列A（从第1行开始）。
• 在B列的第1行中，input= A1＆“，”
• 这将使单元格B1等于A1并附加一个逗号。
• 现在select单元格B1，并从单元格的右下方拖动所有行（这将复制公式并使用相应的列A值。

而已！

Answer 2

这是一个简单的“＆”function。

 =cell&"yourtexthere" 

例如 – 你的细胞说米奇，你想米老鼠。 米奇在A2。 在B2中，input

 =A2&" Mouse" 

然后，复制并“粘贴特殊”的值。

 B2 now reads "Mickey Mouse" 

Answer 3

这很简单……

 =CONCATENATE(A1,",") 

例如 ：如果在A1单元格中的[e-mail]然后写入另一个单元格= CONCATENATE（A1，“，”）

[e-mail]之后，您将获得[e-mail]，

对于删除公式 ：复制该单元格并使用alt + e + s + v或粘贴特殊值。

Answer 4

如果您只想添加字符以进行显示，则无需使用额外的列或VBA。

正如这篇文章所build议的，你所需要做的就是：

1. select您想要应用格式的单元格
2. 点击Home选项卡
3. 点击Number
4. selectCustom
5. 在“ Type文本框中，通过将数字零置于所需字符内input所需的格式。

格式化文本的例子 ：

• 如果您希望单元格值120.00读取$120K ，请键入$0K

Answer 5

非常简单….你可以把它们全部放在一个使用comcatenate函数的单元格中

 =CONCATENATE(A1,", ",A2,", ", and so on) 

Answer 6

select单元格的范围，input值并按下Ctrl + Enter。 这当然，如果你想手动做到这一点是真实的。 如果你想在代码中做到这一点，请更具体地说，你使用什么。

Answer 7

我只是写了另一个答案：你可以使用你的例子： appendTextToRange "[theRange]", "," 。

 Sub testit() appendTextToRange "A1:D4000", "hey there" End Sub Sub appendTextToRange(rngAddress As String, append As String) Dim arr() As Variant, c As Variant arr = Range(rngAddress).Formula For x = LBound(arr, 1) To UBound(arr, 1) For y = LBound(arr, 2) To UBound(arr, 2) Debug.Print arr(x, y) If arr(x, y) = "" Then arr(x, y) = append ElseIf Left(arr(x, y), 1) = "=" Then arr(x, y) = arr(x, y) & " & "" " & append & """" Else arr(x, y) = arr(x, y) & " " & append End If Next Next Range(rngAddress).Formula = arr End Sub 

Answer 8

突出显示列，然后cntrl + f。 查找并replace查找“.com”replace“.com”

然后一个for .in查找并replacefind“.in”replace“.in”，

Answer 9

将文本/值放入第一个单元格，然后复制单元格，标记整个柱子并“粘贴”复制的文本/值。

这在Excel 97中工作 – 抱歉没有其他版本可用在我身边…

Answer 10

在一个单元格中键入它，复制该单元格，select所有要填充的单元格，粘贴。

或者，在一个单元格中键入它，select该单元格右下方的黑色方块，然后向下拖动。