Question

excel中用宏实现单元格内的自动换行

Answer 1

1. 如往图示单元格输入内容，因为内容较长，所以超出了单元格边框

   

2. 在所需要输入内容的单元格点击鼠标右键，弹出的快捷菜单中选择“设置单元格格式”命令

   

3. 在弹出的“单元格格式”面板，选择“对齐”选项卡，在“文本控制”选项下勾选“自动换行”，点击确定

   

4. 再一次输入同样的内容

   

5. 可以看到单元格内容实现了自动换行

   

Answer 2

教你一个好办法，比你要代码要强得多
打开宏录制，
在单元格中输入1
按下alt+enter键
再输入1
回车
停止宏录制
按ALT+F11打开代码编辑器
在模块中你就会找到你要的代码的
ActiveCell.FormulaR1C1 = "1" & Chr(10) & "1"
其中Chr(10) 就是换行
怎么样，学会了吧

Answer 3

Sub Macro1()
ActiveCell.Value = ActiveCell.Value & Chr(10)
End Sub