最近在处理Excel表格里面一些有规律的数据需要使用到换行，使用公式里面的换行函数CHAR(10)不起作用。如果进行手动换行，数据量较大，比较麻烦，最后想到的是可以使用VBA里面的换行符Chr(10)进行换行，省时省力。
工具/原料
Excel2010
方法/步骤
1、打开Excel表格，点击【开发工具】，【VisualBasic】进行打开VBA编辑器。
2、在VBA编辑器的菜单栏上面点击【插入】，【模块】。
3、在代码窗口里面输入一下程序：SubChar10()OnErrorResume咯悝滩镞Next'忽略执行过程中遇到的错误DimiAsLong刻八圄俏9;定义i为长整型SetMysheet1=ThisWorkbook.Worksheets("Sheet1")Fori=2To1200'循环执行至1200行Mysheet1.Cells(i,2)="正向："&Mysheet1.Cells(i,1)&".FWD"&_Chr(10)&"反向："&Mysheet1.Cells(i,1)&".REV"NextEndSub
4、程序函数释义：“SetMysheet1=ThisWorkbook.Workshe娣定撰钠ets("胨检馁秣Sheet1")”是指将本工作薄里面的“Sheet1”工作表赋值给了“Mysheet1”；&是字符之间的连接符；Chr(10)是换行符。
5、在VBA编辑器的工具栏里面点击“运行”图标运行程序。
6、程序运行完成后，在Excel表格里面就可以看到所需的结果。
