发布作者:
百度推送:
功能待实现
作品采用: 《 署名-非商业性使用-相同方式共享 4.0 国际 (CC BY-NC-SA 4.0) 》许可协议授权
###调整Excel表格不自动换行
有时候使用excel的时候文本不自动换行,使用如下方法可以解决该问题
第一步,Alt+F11,打开编辑器 第二步,在打开的页面双击自己的Sheet页,输入一下脚本,保存即可
1Dim dbRowHeight As Double
2Private Sub Worksheet_Change(ByVal Target As Range)
3Target.RowHeight = dbRowHeight
4End Sub
5Private Sub Worksheet_SelectionChange(ByVal Target As Range)
6dbRowHeight = Target.RowHeight
7End Sub