使用滚轮向下滚动Excel中的VBA组合框，锁定Excel工作表

我目前在Excel中有一个工作表，上面有两个活动的X控件组合框。这些组合框将被输入，并且会出现一个下拉列表，其中包含每个框的另一个工作表中的字符串。有没有一种方法可以让我对组合框进行编程，以便通过鼠标上的滚轮向下滚动其中的项目？使用滚轮时，即使下拉菜单打开，整个纸张也会向下滚动。我想把工作表锁上，这样就永远不能向下滚动了

---

如果有解决办法，请告诉我。谢谢。

在您的工作表上，您可以使用

工作表\u Activate

事件下的以下内容将滚动区域限制在最适合您需要的范围内：

Private Sub Worksheet_Activate()
    Me.ScrollArea = YourViewableRange
End Sub

---

其中，

YourViewableRange

表示要保留在屏幕上的区域。您好，

Hi@nybayly，这不起作用。我输入的代码更改为我的工作表名称Tool.ScrollArea=“A1:I18”。然后，我将属性窗口中的Scroll区域或工作表更改为该范围。它将工作，直到我在保存后关闭并重新打开工作表，然后我在项目窗口中指定的范围消失。您将代码放置在哪里？确保未将其放置在模块中，而是放置在工作簿或工作表代码模块中（在VBA编辑器中双击工作表名称或“ThisWorkbook”）。当你说“项目窗口内指定的范围消失”时，我觉得这听起来就像你在“即时窗口”上输入代码一样，即时窗口只是一个终端，只运行一次代码。你能确认吗？代码在工具表模块中，我在其中声明了一些变量，在我的第一个组合框的代码之前。我所说的消失是指在属性窗口（F4）中，其中的选项包括工作表本身的滚动区域、标准宽度、可见等。