Microsoft Slider 控件 - 重复图像
Microsoft Slider control - Duplicate Image
每当我使用 MS Slider 控件加载 excel 宏文件时,sheet 的左上角会出现滑块的重复图像。滚动鼠标或在 sheet 秒之间移动时,滑块的副本会消失。
我怎样才能去掉重复的滑块?
这只是一种解决方法。
可能是这些 ActiveX 对象的 ScreenUpdate 错误。您可以通过激活位于滑块下方的单元格然后在打开工作簿并且活动表位于滑块所在的位置时返回顶部来解决此问题。
下面假设滑块位于 Sheet1 和第 50 行之上。将下面的代码添加到 ThisWorkbook 模块。
Option Explicit
Private Sub Workbook_Open()
With ThisWorkbook.ActiveSheet
If .Name = "Sheet1" Then
.Range("A100").Activate
.Range("A1").Activate
End If
End With
End Sub
每当我使用 MS Slider 控件加载 excel 宏文件时,sheet 的左上角会出现滑块的重复图像。滚动鼠标或在 sheet 秒之间移动时,滑块的副本会消失。
我怎样才能去掉重复的滑块?
这只是一种解决方法。
可能是这些 ActiveX 对象的 ScreenUpdate 错误。您可以通过激活位于滑块下方的单元格然后在打开工作簿并且活动表位于滑块所在的位置时返回顶部来解决此问题。
下面假设滑块位于 Sheet1 和第 50 行之上。将下面的代码添加到 ThisWorkbook 模块。
Option Explicit
Private Sub Workbook_Open()
With ThisWorkbook.ActiveSheet
If .Name = "Sheet1" Then
.Range("A100").Activate
.Range("A1").Activate
End If
End With
End Sub