1、这里有一张表格,其中负数带负号符号,下面操作将批量将数字转变成文本格式;
2、通过按组合按键【Alt+F11】调出VBA编辑器,插入宏取名为【批量转换单元格为文件格式】;
3、方法分析,数字转换文件只需要在单元格内容前面添加一个撮劝丛食单引号符号,所以代码首先要遍历所有的单元格,这里就需要插入一个循环(For Each r荏鱿胫协ng In ActiveSheet.UsedRange next)遍历所有使用的单元格;
4、在循环体内插入字符拼接语句(rng.Value = "'" & rng.Value & ""),将遍历的单元格内容前面逐一添加单引号;
5、运行宏代码后,可发现所有单元格内容格式已变为文件格式。