EXCEL自动换行自动行高，仍打印不全 VBA搞定

2025-05-23 02:16:40

1、在打印前，先把所有表格调整为自动适就行高，然后在开发工具查看代码中执行以下 VBA代码!在Excel 2003的文件中执行以下语句Sub hg()For I = 1 To Range("A1048576").End(xlUp).Row Rows(I).RowHeight = Rows(I).RowHeight + Rows(I).RowHeight/2NextEnd Sub在excel 2007的文件中执行以下语句Sub hg()For I = 1 To Range("A1048576").End(xlUp).Row Rows(I).RowHeight = Rows(I).RowHeight + Rows(I).RowHeight/2NextEnd SubRows(I).RowHeight/2 是可调整项表示现有的行高+再加上行高的一半做为行间距还搞不定的，邮件我 365345@qq.com

声明：本网站引用、摘录或转载内容仅供网站访问者交流或参考，不代表本站立场，如存在版权或非法内容，请联系站长删除，联系邮箱：site.kefu@qq.com。