写一段vba代码
Sub 关闭文件()
Dim i As Integer
For i = Workbooks.Count To 1 Step -1 '从最后一个工作簿开始循环，每次减少1
Workbooks(i).Close False '关闭打开的工作簿，不保存内容
Next i
End Sub
免责声明：
以上内容除特别注明外均来源于网友提问，创作工场回答，未经许可，严谨转载。