如果在某个区域中输入了相同的数组公式,选择其中某一部分单元格进行修改时,Excel将提示“不能更改数组的某一部分”,这时需要选择全部的数组进行修改。当活动单元格在数组区域中时,可以用下面的VBA代码选择当前整个数组区域,并且在状态栏中给出提示信息。
Public Sub SelectArray()
Dim Msg As String
On Error GoTo DispOnSstatusbar
Msg = "选择的单元格不在数组区域中。"
ActiveCell.CurrentArray.Select
Msg = "已选择数组区域:" & Selection.Address
利用VBA批量添加邮件链接
如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接,用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接,假设该区域为F2:F18。 Sub ConvertToEmail()Dim convertRng As RangeSet convertRng = Range("F2:F18&qu
DispOnSstatusbar:
Application.StatusBar = Msg
End Sub
excel用快捷键放大和缩小工作表
Excel中的许多命令都可以使用快捷键来完成,但仍然有一些命令没有指定快捷键。例如在“常用”工具栏中的“显示比例”命令。我们可以用下面的VBA代码来实现用快捷键调整工作表显示比例,将下列代码输入到标准模块中: Sub ZoomIn()Dim ZP As IntegerZP