VBA怎么控制住Excel界面
发布时间:2022-03-11 11:24:53
VBA怎么控制住Excel界面?如何使用VBA操控Excel界面?本文讲解操控工作表中一些界面元素的VBA代码。
工作表中的行列
隐藏和取消隐藏行标题
不能够分别单独隐藏行标题和列标题,只能同时隐藏或者显示这两个标题。
示例代码:
‘隐藏和取消隐藏活动窗口中活动工作表的行标题和列标题
‘隐藏标题
ActiveWindow.DisplayHeadings= False
‘取消隐藏标题
ActiveWindow.DisplayHeadings= True
隐藏和取消隐藏工作表行
可以使用下列任一VBA语句隐藏活动工作表中的所有行:
‘隐藏工作簿的活动工作表中所有行
ActiveSheet.Rows.Hidden= True
ActiveSheet.Rows.EntireRow.Hidden= True
ActiveSheet.Cells.Rows.Hidden= True
要隐藏其他工作表中的行,只需使用该工作表代替ActiveSheet,例如使用Sheets(1)代表第1个工作表,或者使用Worksheets(1)代表第1个标准工作表。隐藏所有行后,行标题几乎被隐藏,但列标题仍然在工作表中。
要取消隐藏所有行,可以使用下列任一VBA语句:
‘取消隐藏工作簿的活动工作表中所有行
ActiveSheet.Rows.Hidden= False
ActiveSheet.Rows.EntireRow.Hidden= False
ActiveSheet.Cells.Rows.Hidden= False
下面的示例代码隐藏指定行:
‘隐藏指定的行
‘仅隐藏第2行
ActiveSheet.Rows(2).Hidden= True
‘隐藏第3行和第4行
ActiveSheet.Rows(“3:4”).Hidden= True
‘隐藏非连续的行
ActiveSheet.Range(“6:6,8:10,12:13”).EntireRow.Hidden= True
上面语句中的逗号是联合操作符,用来组合一系列行。
行高
示例代码:
‘设置活动工作表所有行的高度
ActiveSheet.Rows.RowHeight= 15
‘设置第2行的高度
ActiveSheet.Rows(2).RowHeight= 20
‘设置第4行至第6行的高度
ActiveSheet.Rows(“4:6”).RowHeight= 10
‘设置非连续行的高度
ActiveSheet.Range(“8:8,10:12”).RowHeight= 10
隐藏行的高度是0。设置隐藏行的高度为非零值将取消隐藏行。
隐藏和取消隐藏工作表列
可以使用下列任一VBA语句隐藏活动工作表中的所有列:
‘隐藏工作簿的活动工作表中所有列
ActiveSheet.Columns.Hidden= True
ActiveSheet.Columns.EntireColumn.Hidden= True
ActiveSheet.Cells.Columns.Hidden= True
要隐藏其他工作表中的列,只需使用该工作表代替ActiveSheet,例如使用WorkSheets(1)代表第1个工作表,或者使用Worksheets(2)代表第2个工作表。隐藏所有列后,列标题几乎被隐藏,但行标题仍然在工作表中。
要取消隐藏所有列,可以使用下列任一VBA语句:
‘取消隐藏工作簿的活动工作表中所有列
ActiveSheet.Columns.Hidden= False
ActiveSheet.Columns.EntireColumn.Hidden= False
ActiveSheet.Cells.Columns.Hidden= False
下面的示例代码隐藏指定列:
‘隐藏指定列
‘仅隐藏列B
ActiveSheet.Columns(2).Hidden= True
‘隐藏列D和列E
ActiveSheet.Columns(“D:E”).Hidden= True
‘隐藏非连续的列
ActiveSheet.Range(“G:G,J:K,M:N”).EntireColumn.Hidden= True
上面语句中的逗号是联合操作符,用来组合一系列列。
列宽
示例代码:
‘设置第1个工作表中所有列的宽度
Worksheets(1).Columns.ColumnWidth= 8
‘设置列B的宽度
Worksheets(1).Columns(2).ColumnWidth= 3
‘设置列D至列F的宽度
Worksheets(1).Columns(“D:F”).ColumnWidth= 2
‘设置非连续列的宽度
Worksheets(1).Range(“G:G,J:K”).ColumnWidth= 4
隐藏列的宽度是0。设置隐藏列的宽度为非零值将取消隐藏列。
猜你喜欢
- excel使用if判断单元格包含特定字符,是怎么去进行操作实现的呢?下面小编马上就告诉大家Excel中使用if函数判断单元格特定字符的方法。
- word怎么设计条形码?word中想要设计一款条形码,该怎么设计呢?下面我们就来看看word设计条形码的教程步骤,很简单,需要使用word制
- Excel2010单元格、行和列怎么插入首先选中一个单元格,在右击菜单中选中“插入”按钮,如下图所示。打开单元格插入对话框,这时你可以看到下
- 如果要在Excel表格中做彻底隐藏数据的话,要怎么做呢?下面介绍简单的操作步骤和方法,希望可以帮到你在日常工作中经常会使用excel,有时需
- 奇怪的单元格虚线框,如下图所示,下图红框处 而且想打印这页内容,打印预览的时候,结果显示却是这样的。(小伙伴录制视频的截图,不清晰
- Excel中的快速填充键ctrl+e没反应,不能用是为什么?Excel中的快速填充键ctrl+e没反应,这是因为Excel版本太低了。Exc
- 有很多安装win10专业版系统用户在使用电脑的过程中都遇到过蓝屏问题,并提示inaccessibleboot device无法启动装置,安全
- 使用Offset属性可以使用Range对象的Offset属性返回一个基于引用的Range对象的单元格区域,如下面的代码所示。00.00.#0
- 已经有很多小伙伴已经更新了Win10的最新版本,但是还有很多小伙伴还没进行更新,现在更新Win10 2004的方法很多。下面就给大家介绍一下
- excel如何设置单元格内容在指定行区域内容居中大致可以合并居中、跨越合并,以及跨列居中,这些方法到底有什么区别呢,下面小编就为大家详解Ex
- 1、如何快速选取特定区域?使用F5键可以快速选取特定区域。例如,要选取A1:E5,最简便的方法是按F5键,出现“定位”窗口,在“引用位置”栏
- word 2010有时选择页面纸张大小时会发现没有A3的选项这可能是因为word2010当前所选打印机不支持A3,可以点击文件菜单中的&qu
- 在Excel中录入好数据以后接着就是把数据给打印出来,在打印前我们都需要设置一下打印表格的方式,或许有朋友还没会如何打印表头,接下来是小编为
- Win10系统的ipv6无访问权限无法连接网络怎么办?许多用户在使用电脑的时候经常会出现网络无法连接的问题,而导致网络无法连接的问题有很多,
- 在 本系列有关INDEX-MATCH的第1部分中,我从以下两个示例开始:公式1:= INDEX(Product,2,1)公式2:= $ B
- 一个折线图或是XY散点图,需要增加两条上限和下限,方便与实际数据进行比较,看是不是在要求的范围内?这种图表通常在Excel中做好,然后贴到W
- Excel表格中高亮的重复项如何取消?很多朋友并不是很清楚,其实方法很简单的,下面小编就为大家详细介绍一下,不会的朋友快快来学习吧有时候在E
- Excel中有太多的空白行具体该如何进行去掉呢?下面是由小编分享的excel表格去掉多余的空白行教程,希望本教程能帮到大家。excel表格去
- 在我们使用word的时候,经常会遇到需要各种画形。如果使用网上搜索的图片有时不是很清晰,那么就自己动手画一个清晰的图形吧!下面小编就教大家在
- 今天跟大家分享的excel图表制作技巧可以达到下图所示的效果,这样谁达到目标,谁没达到目标就一目了然:假设我们手上有下面一组数据:我们选中A