excel用快捷键放大和缩小工作表

来源:互联网 时间:2016-01-03

Excel中的许多命令都可以使用快捷键来完成,但仍然有一些命令没有指定快捷键。例如在“常用”工具栏中的“显示比例”命令。我们可以用下面的VBA代码来实现用快捷键调整工作表显示比例,将下列代码输入到标准模块中:

Sub ZoomIn()

Dim ZP As Integer

ZP = Int(ActiveWindow.Zoom * 1.1)

If ZP > 400 Then ZP = 400

ActiveWindow.Zoom = ZP

End Sub

Sub ZoomOut()

Dim ZP As Integer

ZP = Int(ActiveWindow.Zoom * 0.9)

If ZP < 10 Then ZP = 10

ActiveWindow.Zoom = ZP

End Sub

每执行一次上述代码,ZoomIn()可以将当前工作表的显示比例放大10%,ZoomOut()可以将当前工作表的显示比例缩小10%,需要说明的是Excel只允许将显示比例最大调整到400%,最小到10%,超过这个比例将停止放大或缩小。

下面给这两个宏指定快捷键,方法如下:

1.单击菜单“工具→宏→宏”,或按Alt+F8,打开“宏”对话框。

2.选择宏“ZoomIn”,单击“选项”按钮,在“Ctrl+”右侧的文本框中输入指定的英文字母,如“i”,单击“确定”按钮,然后关闭“宏”对话框。这样,当按快捷键“Ctrl+i”时将放大工作表,注意指定快捷键时最好不要与系统快捷键相冲突,如Ctrl+O为系统给定的显示“打开”对话框,指定快捷键时就不用“Ctrl+O”。

3.用同样的方法给宏“ZoomOut”也指定一个快捷键,如“Ctrl+j”,这样,当按快捷键“Ctrl+j”时将缩小工作表。

相关阅读:
Top