使用windows.arrange

我知道这应该是微不足道的,但这正是为什么它很难找出错误的原因。 我需要每天平铺几十次我的excel窗口,所以决定logging一个可以使用热键的macros,并避免需要反复按Alt + W + A Enter。

Sub tile() ' ' tile Macro ' ' Keyboard Shortcut: Ctrl+e ' Windows.Arrange ArrangeStyle:=xlTiled End Sub 

但是,当我尝试运行它时,没有任何反应。 我试图使用热键,并直接运行它。 有没有关于这个代码不应该正常工作?

谢谢。

编辑:代码工作时,没有窗户最小化。 但是,当一个或多个窗口最小化时,代码将不起作用。

如果在同一个Excel应用程序中有多个窗口,则:

 Sub tile() ' ' tile Macro ' ' Keyboard Shortcut: Ctrl+e ' Application.Windows.Arrange ArrangeStyle:=xlArrangeStyleTiled End Sub 

我认为你需要参考excel应用程序。 尝试将行更改为Excel.Windows.Arrange ArrangeStyle:=xlTiled

但是,当我尝试运行它时,没有任何反应。 我试图使用热键,并直接运行它。

你的代码没有问题 。 您不必添加ExcelApplication使其工作正如其他答案中所build议的..

您不能将CTRL + E分配给它。 它被保留为Flash Fill 。 当您通过View Macros分配键时,select您的macros,然后单击Options 。 在那里你可以设置快捷键。 如果你想使用E ,那么inputE ,你会看到CTRL + SHIFT + E已经被赋值了。

在这里输入图像说明