求VBA 将一个单元格里的一串数字在两码之间插入分隔符[半角的","],谢谢。只有5分了全给您~

可以编写个简单自定义函数完成。

Function SplitN(cell As Range)

Set cell = cell.Range("A1")

For i = 1 To Len(cell)

SplitN = SplitN &Mid(cell, i, 1) &","

Next i

SplitN = Left(SplitN, Len(SplitN) - 1)

End Function

测试如图：

相信很多人都遇到过一堆很复杂的数据，或者说用sqload导出来的数据格式根本不能用，如果把这些数据放到excel中去怎么办，放进去后全都集中在第一列中了，能不能通过excel中自带的功能把这些数据分列处理呢，那么，接下来，我就为大家解决碰到一堆数据不能在excel中分开展示的难题，如果觉得我的方法不错，请大家帮忙点个赞，谢谢！

开启分步阅读模式

工具材料：

excle 2010

WPS

UE

*** 作方法

01

这些数据原先是按照一定格式分开的，比如说逗号、"|"、“/”等等，只要是统一隔开的，如图所示是逗号隔开的一系列号码，单纯放到excel或者WPS中根本无法分列开来；

02

我们把这些数据先拷贝到excel中的第一行第一列上，如图所示：

03

然后，我们全部选中拷贝进来的数据，找到【数据】菜单栏下面的子菜单【分列】，如图所示

04

接着，打开【分列】菜单，会d出一个对话框，在“原始数据类型”下面选择最合适的文件类型，这里我们选中“分隔符号（D）”,在下面可以看到预览选定数据，单击【下一步】，如图所示：

05

设置分列数据所包含的分隔符号，我们在“逗号”的选项框中选中它，如果是其它的符号，则选择其它的分隔符，也可以在自定义的分隔符写出来，然后我们可以在下面看到预览效果，如图所示：

06

接下来，我们要设置数据在excel表格中的数据类型，在“列数据类型”下面可以自由选择我们需要的数据类型，我们这里选择“常规”，选择后，可以在下面看到预览效果，如图所示：

07

单击【完成】后，我们在excel中就可以看到我们想要的分列效果，这样就可以方便我们做后续的数据处理了，如图所示：

特别提示

excel和WPS分列的菜单分布不同，注意查找，一般都是在【数据】菜单栏里面

UE这个工具很好用，可以在UE里面处理一些原始数据

分两太步进行即可:1、文档进行分节 在有页眉的那个文档的最后插入一个分节符(插入--分隔符--分节符下一页)，出来一个空白页。在这个空白页中设置页眉和页脚(将同节一样的调成你想要的空白)，设置好后一定要按一下“链接到前一个”那个按钮，否则前节的页眉等也被修改了。2、将第二个文档全选复制到第二节中。OK 祝你成功

---