从 Excel 复制粘贴时如何更改分隔符？

Question

我想从 Excel 复制单元格并将它们粘贴到记事本中，使用逗号,作为分隔符，而不是制表符。

有没有办法更改分隔符而无需在记事本中进行查找和替换或将电子表格保存为 CSV？

Answer 1

我认为没有任何方法可以更改从 Excel 将文本复制到剪贴板时使用的默认分隔符（即 Tab）。但是，您可以做的是创建一个宏来实现您想要的结果。

1. 创建一个名为CopySelectedCells 之类的宏，并可选择分配一个键盘快捷键，以便您可以快速调用它（例如，我分配了它Ctrl+ Shift+ C）：

   

2. 在上面显示的主宏对话框中，单击编辑按钮打开 VBA 编辑器。

3. 转到Tools menu / References并单击浏览按钮。

4. 添加Windows\System32\FM20.dll：

   

5. 选择现在添加到可用引用列表中的Microsoft Forms 2.0 对象库选项：

   

6. 编辑宏代码如下所示：

   Sub CopySelectedCells()
       Dim str As String
       For Each rangeRow In Selection.Rows
           For Each rangeCol In rangeRow.Cells
               str = str & rangeCol.Value & ","
           Next
           str = Left(str, Len(str) - 1) & vbCrLf
       Next
   
       With New DataObject
           .SetText str
           .PutInClipboard
       End With
   End Sub
   

7. 关闭 VBA 编辑器，选择一系列单元格并调用宏，然后粘贴到记事本中以查看逗号分隔的结果。