Excel中vba教程——设置行高实例

在excel工作表中对单元格进行行高设置操作，一般情况下，都是通过点击菜单：格式——行——行高，然后进行设置。

　　为了让大家逐渐熟悉Excel中vba基础知识，我们通过一系列的实例来加以介绍。

　　首先运行excel，新建一工作表，输入如下数据，详见下图：

　　输入完数据后，进行按钮的录入和VBA代码编写部分。

　　第一，依次单击菜单：视图——工具栏——窗体，调出窗体工具栏。

　　第二，单击窗体工具栏中的按钮，鼠标成为十字形状，然后在工作界面拖动一矩形框，松开鼠标，完成按钮的录入。

　　第三，松开鼠标后，会弹出“指定宏”对话框，单击其中的“新建”，出现Visual Basic代码编写界面。

　　第四，全选代码界面现有的代码，删除，并将下面一段代码复制进去：
Sub 设置行高()
    Dim h As Long, r As Long, i As Integer, n As Integer
    Dim ws1 As Worksheet
    h = Application.InputBox(prompt:="请输入所选行的高度：", _
        Title:="输入行高", Type:=1)

    Set ws1 = ActiveSheet
    n = Selection.Rows.Count
    r = ActiveCell.Row
    For i = 1 To n
        ws1.Rows(r + i - 1).RowHeight = h
    Next
    Set ws1 = Nothing
End Sub

　　第五，单击保存，关闭Visual Basic代码编写界面，并右击该按钮，选中按钮上的文字，重命名为：设置行高。

　　第六，参考1-5步的操作，在页面新建另外一个按钮，并重命名为：自动设置行高。该按钮的代码为：
Sub 自动调整行高()
Selection.Rows.AutoFit
End Sub

　　第七，完成上面的操作，最后的界面就如上图所示的一样了。然后，当我们点击工作表中的“设置行高”按钮，就会弹出“输入行高”对话框，可以在这里输入数值来调整行高。也可以单击“自动设置行高”按钮，来清除所设定的行高。

　　以上就是Excel中vba教程——设置行高实例的具体操作步骤。对excel感兴趣的朋友可加Excel学习交流群：284029260
　　Excel教程中vba教程关联阅读文章：《excel中VBA基础入门介绍》

Excel中vba教程——设置行高实例相关推荐

Excel中时间相减的实例教程
在上一篇文章我们学习了excel时间计算的基础知识,知道了时间对应的小数差值,我们将这个差值再乘以24就可以计算结果的单位转换为小时.理解了Excel处理时间的规律,有助于理解公式的含义.我们接下来就 ...
Excel中vba 立即窗口使用方法详细介绍
我们在VBE立即窗口中输入命令,回车后立即运行,估计这就是"立即窗口"的由来吧.对Excel感兴趣的朋友可加Excel学习交流群:284029260 第一,如何显示vba 立即窗口 ...
python和vba操作excel_python调用excel中VBA代码
python中调用excel中的VBA代码,本机需要安装python以及该python版本对应的"pywin32-214.win32-py2.5.exe" #!/usr/bin/e ...
c语言运行excel中vba程序,VBA代码在WPS上可运行，在EXCEL中报错
本人是一名VBA爱好者兼VBA小白,因工作需要,最近想要做1个EXCEL模板,通过VBA代码自动调用浏览器下载数据,导入EXCEL中进行处理.但在编写VBA代码过程中发现,同样的代码在WPS中可以运行 ...
Excel中VBA编程学习笔记（一）
1.注释及编码规则注释: 单引号:可以位于句子结尾或者单独一行: Rem:单独一行编码规则: 如果VB中的关键字是由多个英文字母组成,则系统自动将每个单词的首字母转换成大写字母,其余字母一律转换成 ...
Excel中VBA操作工作表相关
VBA中已有工作簿合并表格数据 Sub 合并目录所有工作簿全部工作表() On Error Resume Next Dim MP, MN, AW, Wbn, wn Dim Wb As Workbook ...
Excel中VBA编程学习笔记（十）--单元格(cell)
1.单元格引用引用含义 Range("A1") 单元格A1 Range("A1:B2") A1到B2的单元格区域 Range("C5:D9,G9: ...
HSSFWorkbook导出Excel数据换行和设置行高
想导出数据格式: 第一步:定制显示格式 HSSFCellStyle styleCon_left_line = wb.createCellStyle(); styleCon_left_line.clon ...
提高Excel中VBA效率的四种方法
由于Microsoft Office办公套件的广泛应用,以及该软件版本的不断提升,功能不断完善,在Office办公套件平台上开发出的的VBA应用程序越来越多,而VBA是一种宏语言,在运行速度上有很大的 ...
在EXCEL中VBA编程检验身份证号码有效性
*2022-12-05 改正代码中错别字,规范表述 *2022-11-30 1.增加了过程clearB()用来清除B1:Bx原有的出错说明,在过程examIdentityCard() 开头调用 2.修 ...

Excel中vba教程——设置行高实例

Excel中vba教程——设置行高实例相关推荐

最新文章

热门文章