【Excel VBA】轻松搞定数字、文本单元格格式错乱问题

说明

在使用Excel的时候最遇到的烦恼就是本来应该是数字的却被认为的文本，导致不能进行计算，本来应该是文本的内容结果被认为是数字，结果显示成了科学计数法，甚至内容较长的字符被替换成了零，失去了意义。具体情形见下图：

其实这些烦恼在最开始录入数据前，设置对了单元格格式，就可以避免：对于应该是数字的列，除了“文本”、“日期”和“时间”之外，都可以根据实际需要进行设置；对于像身份证号、手机号和账号等一定要在录入数据前设置成“文本”格式。
如果数据不是你录入的，你进行操作时就已经是错误的格式了，手动解决的办法是：
1、首先对相应单元格设置正确的单元格格式，然后逐个双击单元格（或按F2键）进入编辑状态，紧接着回车确定，这样数据就成为了你想要的格式了。
2、首先对相应单元格设置正确的单元格格式，然后选中想要调整格式的数据区域（注意：选择区域只能是在同1列内），依次点击“数据”→“分列”，在“文本分列向导”对话框的第1步选择“固定宽度”，第2步中清除所有分列线（一般情况下是没有的），第3步中根据自己想要的格式进行选择，最后点击完成就可以了。
除了手动解决方法之外，在这里给出VBA代码的解决方法，解决的思路就是上面的第2种手动解决方法。上代码：

代码co