Excel中vba教程 设置行高实例
发布时间：2022-05-25 16:02:22
在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
第七，完成上面的操作，最后的界面就如上图所示的一样了。然后，当我们点击工作表中的“设置行高”按钮，就会弹出“输入行高”对话框，可以在这里输入数值来调整行高。也可以单击“自动设置行高”按钮，来清除所设定的行高。
0
投稿猜你喜欢
- 今天学习多条件查找的方法，本文整理了10种excel多条件查找方法和公式。【例】，要求在C12单元格，根据A12车型和B12排量，从上表中查
Excel怎么使用text函数计算两个日期相差的时间？excel中想计算两个日期之前相差多少小时，该怎么计算呢？下面我们就来看看使用text- bios是电脑最基本的设置之一，它是计算机内主板上的一个ROM芯片上的程序，主要功能是为计算机提供最直接的硬件设置和控制。我们不难看出，bi
- 有朋友在升级了win10系统之后发现玩《魔兽世界》等游戏时会偶尔卡顿(掉帧、掉线)的问题。win10 玩魔兽世界卡顿如何解决?这是由于win
- 为了防止数据丢失，我们一般会将表格转换成图片的形式，那么，在wps表格中怎样转换呢?下面就让小编告诉大家怎样将wps表格转换为图片。将wps
- edge浏览器是现在非常火热的浏览器之一，也是微软系统自带的浏览器，最近有用户反馈自己在用edge浏览器看腾讯视频的时候，经常性的提示内存不
- 大家在使用win10电脑时应该都知道，如果我们在电脑中浏览了什么网页、看过什么视频是会留下使用痕迹的。那如何查win10电脑使用痕迹呢？有些
- 好签是一款简单操作的办公应用软件，里面有一款非常方便的功能，那就是电子签字，这样子即使人在异地出差不能及时处理公司以流程审批签字，利用电子签
- 今天，朝鲜大神Luca Todesco在推特上放出了Beta 1版的iOS 10.1/10.1.1越狱。按照他的说法，Beta 1支持iPh
- 三星笔记本电脑是由三星集团旗下的三星电子公司生产的，三星集团作为韩国最大的企业，也是一个跨国的企业集团，凭借着三星品牌的极大影响力，三星笔记
- ppt怎么设置很漂亮的表格样式？ppt中想要绘制一个特别漂亮的绿色表格该怎么绘制呢？下面我们就来看看ppt表格样式设置的方法，需要的朋友可以
- 论文一般首页是不需要设置页码的，而是从第二页开始才设置页码，这在wps文字中究竟是怎样实现的呢?DY 下面就让小编告诉你wps怎样从第二页开
- Win8.1系统开启超级管理员帐户的方法 方法一：通过计算机管理启用1、Win + X快捷键调出系统快捷菜单，选择“计算机管理
- 在安装win8.1系统时，有一个阶段会出现“你可以从应用商店获取新应用（正在安装应用）”的界面，这个阶段用时长，而且什么都干不了，针对此问题
- 现在我们日常使用的鼠标，起码都带有一个滚轮。滚轮的左右主要就是浏览网页进行上下滑动。有些小伙伴不习惯使用滚轮，想要禁用滚轮却不知道怎么操作。
- Wps是一款很多小伙伴都会使用到的文档编辑办公软件，而我们有时候在使用Wps编辑表格的时候难免会因为一些特殊情况需要将其全屏查看，很多小伙伴
- 在我们的日常工作中,越来越需要频繁使用WPS演示,于是WPS演示抛头露面的场合越来越多;WPS相比Office，它的优势体现在体积小，安装卸
- 通常我们都是用表格来存储数据，那excle该怎么保密?下面是小编为大家精心整理的关于如何给excle表格加密？希望能够帮助到你们。方法/步骤
- Win10怎么设置自动关机？很多朋友们还不会，下面小编就给大家带来Win10系统设置自动关机的方法，一起来看看吧在不少时候我们都需要用到自动
- 在打印的时候，会提前查看表格的分页情况，如果需要调整增添一页怎么做呢？excel分页预览怎么插入第二页？1、插入分页符如果要重新调整分页符的
