VBA学习14_Application

pigerr杨

已于 2022-10-27 16:39:03 修改

阅读量527

点赞数 1

CC 4.0 BY-SA版权

文章标签：学习 excel

于 2022-10-27 16:38:22 首次发布

本文链接：https://blog.youkuaiyun.com/pigerr/article/details/127555178

博客介绍了Excel中Application对象相关内容，包括代表Excel应用本身，还提及当前活动工作簿、工作表的表示，是否显示警告框、退出Excel的设置，重点介绍了调用系统函数的Application.WorksheetFunction。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

Application: 代表Excel应用本身
Application.ActiveWorkBook : 当前活动工作簿
Application.ActiveSheet : 显示当前活动工作表
Application.DisplayAlerts: 是否显示Excel警告框
Application.Quit: 退出Excel

Application.WorksheetFunction : 调用系统函数

Sub 最高销量()
	Dim  r As Range, m As  Integer
	m = Application.WorksheetFunction.Max(Range("b2:d7"))
	Cells(9,4) = m	
End Sub

Sub 保存工作簿示例()
	Dim  w2 as workbook
	Set w2 = WorkBooks.Add
	w2.WorkSheets(1).Cells(2,2) = "新文件 !"

	Application.DisplayAlerts = False
	' 将改文件保存在本工作簿所在文件夹下
	w2.SaveAs("数据.xlsx")
	Application.DisplayAlerts = True
	w2.Close
End Sub