excel打开vba快捷键 excel打开vb的快捷键

小爱给大家谈谈excel打开vba快捷键，以及excel打开vb的快捷键应用的知识点，希望对你所遇到的问题有所帮助。

1、注意 c:a 目录下的文件不要太多,免得机 Sub 打开excel表格() Dim myPath$, myFile$, AK As WorkbookApplication.ScreenUpdating = False '冻结屏幕，以防屏幕抖动 myPath = "c:a" '把文件路径定义给变量 myFile = Dir(myPath & ".xls") '依次找寻指定路径中的.xls文件 Do While myFile <> "" '当指定路径中有文件时进行循环 If myFile <> ThisWorkbook.Name Then Set AK = Workbooks.Open(myPath & myFile) '打开符合要求的文件 End If myFile = 找寻下一个.xls文件 Loop Application.ScreenUpdating = True '冻结屏幕,此类语句一般成对使用 End Sub。

本文到这结束，希望上面文章对大家有所帮助。