本文主要是介绍VBA跨Excel工作薄，按照Excel工作表样板表行高、列宽值调整目标工作表行高、列宽，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
点击观看视频效果
文章目录
- 前言
- 1.数字转字母
- 2.获取单元格行高
- 3.获取单元格列宽
- 4.调整行高、列宽
前言
格式刷在我们调整Excel工作表、Word文档的格式时经常使用到，它可以帮助我们快速批量调整字体、大小、颜色、背景色等，甚至是表格行高列宽、字间距大小等。但如果在不同的Excel工作薄或跨Word文档，格式刷却不能使用。
用VBA代码，将样板工作表的行高、列宽的值保存在三维数组内，再按数组值依次调整目标工作表行高、列宽。
1.数字转字母
Public Function GetEngName(argColumn As Integer) As String '数字转字母Dim strEngName As StringDim iNum, iMod As IntegeriNum = argColumn \ 26iMod = argColumn Mod 26If (iMod = 0) ThenIf (iNum = 1) ThenstrEngName = Chr(90)ElsestrEngName = Chr(65 + iNum - 2) + Chr(90)End IfElseIf (iNum = 这篇关于VBA跨Excel工作薄，按照Excel工作表样板表行高、列宽值调整目标工作表行高、列宽的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
