2、ThisWorkbook.SaveAs ' 另存为工作簿 把当前工作簿另存为一份新的工作簿 Workbook对象的SaveAs方法使用另外一个文件名保存对工作簿所做的更改,语法如下: SaveAs(FileName,FileFormat,Password,WriteResPassword,ReadOnlyRecommended,CreateBackup,AccessMode,ConflictResolution,AddToMru,TextCodepage,TextVisualLayout,Lo...
ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "文件名", FileFormat:=xlWorkbookNormal 另存为xls的工作簿 'ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & "文件名", FileFormat:=xlExcel8 另存为PDF ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=ThisWorkbook.Pat...
1 新建一个Excel文件并保存。打开VBE，可以用快捷键<Alt+F11>.VBE的介绍可以参照下面的链接后者百度下找找。2 新建一个模块，输入下面的代码。Sub SaveAsMacroEnable() Dim OldFileName As String OldFileName = Left(ThisWorkbook.FullName, InStr(ThisWorkbook.FullName, ".") - 1) ActiveWorkbook.SaveAs...
SetNewBook = Workbooks.AddDofName = Application.GetSaveAsFilenameLoopUntilfName <>FalseNewBook.SaveAs Filename:=fName 支持和反馈 有关于 Office VBA 或本文档的疑问或反馈? 请参阅Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
上下文/代码:打开和编辑在特定文件夹中找到的所有.txt文件的VBA宏。 Private Sub CommandButton1_Click() ChDir "C:\Users\mjkut\Desktop\SmrtSkt\Sensor Data\EXCEL OUTPUT" Dim MyFolder As String Dim MyFile As String Dim Headers() As Variant ...
Sub MySaveAsWork()ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\book123.xls"End Sub 代码解析：MySaveAsWork过程将代码所在的工作簿保存为“book123”工作簿文件。如果要保存为指定的文件名，可以使用INPUTBOX,弹出对话框，让使用者录入一个文件名后再保存。三：如果用户希望工作簿在保存为另一文件名后...
Saveas 是把当前文件另存为另一个文件,所以"当前"文件就变成目标文件了,想要做一个备份,而真正的保留当前文件,请使用 SaveCopyAs,这样才可以达到楼主的目的...即:把 ThisWorkbook.SaveAs ("d:\temp\temp全省站点名单1.xls") 改为:ThisWorkbook.SaveCopyAs ("d:\temp\temp全省站点名单1.xls")Workboo...
The reason why I write about PDF is relatively straightforward:PDF is one of the most widely used file formats. This particular Excel tutorial also focuses on the topic of working with Excel and PDF files. More precisely,I explain in detail how you can save Excel files as PDF using VBA, ...
Since Excel 2010, it has been possible to save Excel as PDF. The PDF format was then and continues to be, one of the most common file formats for distributing documents. The code examples below provide the VBA macros to automate the creation of PDFs from Excel using the ExportAsFixedFormat...
在Excel中使用VBA保存格式和数值的数据,可以通过以下步骤完成: 1. 打开Excel,按下Alt + F11组合键打开VBA编辑器。 2. 在VBA编辑器中,可以看到“项目资源管理器”窗口和“...