遇到数字中有负数如果想转换成文本格式，通过右键变更格式可能无效，如何使用VBA批量将Excel的单元格转换成文本格式呢？下面我来操作演示一下，希望对大家有用！品牌型号：联想ThinkPad X13系统版本：Windows7或10软件版本：Excel2016方法/步骤1/5分步阅读

这里有一张表格，其中负数带负号符号，下面操作将批量将数字转变成文本格式；

2/5

通过按组合按键【Alt+F11】调出VBA编辑器，插入宏取名为【批量转换单元格为文件格式】；

3/5

方法分析，数字转换文件只需要在单元格内容前面添加一个单引号符号，所以代码首先要遍历所有的单元格，这里就需要插入一个循环（For Each rng In ActiveSheet.UsedRange next）遍历所有使用的单元格；

4/5

在循环体内插入字符拼接语句（rng.Value = rng.Value ），将遍历的单元格内容前面逐一添加单引号；

5/5

运行宏代码后，可发现所有单元格内容格式已变为文件格式。

注意事项

Tips：如有错误，欢迎指正；欲知更多相关信息，请关注我！

单元格转换文本数字转文本格式