怎么设置滚动条的位置(VBA编程，如何对窗体滚动条进行上下左右移动，这个方法真实用)

Posted 2023-05-26

篇首语：曾无好事来相访，赖尔高文一起予。本文由小常识网(cha138.com)小编为大家整理，主要介绍了怎么设置滚动条的位置(VBA编程，如何对窗体滚动条进行上下左右移动，这个方法真实用)相关的知识，希望对你有一定的参考价值。

怎么设置滚动条的位置(VBA编程，如何对窗体滚动条进行上下左右移动，这个方法真实用)

Excel表，通常会超出屏幕大小，这样就需要对滚动条进行操作，初学的朋友可能对滚动条有一个很模糊的认识，实际上并不知道如何操作。

本节不做科普，我们将介绍，如何利用VBA代码对滚动条位置进行操作。

对滚动条进行操作，实际上实现了页面的跳转功能。

下面用一个示例来进行详细说明，如图所示可实现按行滚动和按页滚动，其代码不一样。

首先，按行滚动使用：ActiveWindow.SmallScroll toright:=1

也就是SmallScroll方法，它是Window对象下的一个方法。

同理按页滚动使用：ActiveWindow.LargeScroll down:=1

很显然，使用的是LargeScroll方法，一个大一个小的意思，不知道为什么起这样的名称，并不及适合。

这两个方法分别有几个参数需要设置，才能正常使用，达到想要的效果。

SmallScroll (Down、Up、ToRight、ToLeft)

名称	必需/可选	数据类型	说明
Down	可选	Variant	将内容向下滚动的行数。
Up	可选	Variant	将内容向上滚动的行数。
ToRight	可选	Variant	将内容向右滚动的列数。
ToLeft	可选	Variant	将内容向左滚动的列数。

LargeScroll (Down、Up、ToRight、ToLeft)

名称	必需/可选	数据类型	说明
Down	可选	Variant	向下滚动内容的页数。
Up	可选	Variant	向上滚动内容的页数。
ToRight	可选	Variant	向右滚动内容的页数。
ToLeft	可选	Variant	向左滚动内容的页数。

参考上表，可以很清楚地明白，分别指上、下、左、右移动的量。

如果是按行滚动就是行或列数，如果是按页滚动就是以页为单位，一个页面就是多个行。

重点还是要自己动手实践操作一下，下面给出一些代码，参考学习：

Private Sub CommandButton2_Click()ActiveWindow.LargeScroll down:=1Me.CommandButton2.Top = ActiveWindow.TopMe.CommandButton5.Top = Me.CommandButton2.TopEnd SubPrivate Sub CommandButton4_Click()ActiveWindow.SmallScroll toleft:=1End SubPrivate Sub CommandButton5_Click()ActiveWindow.LargeScroll up:=1End Sub

滚动条操作在大量数据页的情况下使用，十分有用，所以有必要认真学习一下。

欢迎关注、收藏

---END---