ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlNormal '将工作簿另存为EXCEL默认格式,请帮忙改成较旧版本的语法代替新特性
时间: 2024-04-13 10:30:55 浏览: 162
为了将工作簿另存为较旧版本的Excel默认格式,您可以使用以下代码替换原始代码中的`FileFormat:=xlNormal`:
```vba
ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlWorkbookNormal
```
这样,工作簿将以Excel默认格式进行保存,并且兼容较旧版本的Excel。请注意,这里使用了`xlWorkbookNormal`作为替代,它是较旧版本的常量,表示Excel的默认文件格式。
相关问题
ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlNormal '将工作簿另存为EXCEL默认格式
根据您提供的VBA代码,您可以使用`FileFormat:=xlWorkbookNormal`来将工作簿另存为Excel的默认格式。这将确保工作簿以Excel默认的格式进行保存。
以下是修改后的VBA代码示例:
```vba
ActiveWorkbook.SaveAs Filename:=MyBook.Path & "\" & sht.Name, FileFormat:=xlWorkbookNormal
```
请注意,`xlNormal`是Excel中的常量,表示普通文本文件格式,而`xlWorkbookNormal`是另一个常量,表示Excel的默认文件格式。通过使用`FileFormat:=xlWorkbookNormal`,您可以将工作簿保存为Excel的默认格式。
vba中函数”ActiveWorkbook.SaveAs Filename:=“怎么使用
VBA中的`ActiveWorkbook.SaveAs`函数用于将当前活动的工作簿保存为指定的文件名和格式。具体用法如下:
```
ActiveWorkbook.SaveAs Filename:=文件名, FileFormat:=文件格式
```
其中,参数`Filename`表示要保存的文件名,可以是完整的路径和文件名,也可以只是文件名。如果只是文件名,则默认保存在当前工作目录下。例如:
```
ActiveWorkbook.SaveAs Filename:="test.xlsx"
```
以上代码表示将当前工作簿保存为名为“test.xlsx”的文件,并保存在当前工作目录下。
参数`FileFormat`表示要保存的文件格式,可以是Excel支持的任意格式。例如:
```
ActiveWorkbook.SaveAs Filename:="test.pdf", FileFormat:=xlPDF
```
以上代码表示将当前工作簿保存为名为“test.pdf”的PDF文件。
需要注意的是,`SaveAs`函数会将当前工作簿的保存路径和文件名修改为指定的值,因此需要确保在调用该函数之前已经保存了当前工作簿的修改,否则可能会出现数据丢失的情况。
阅读全文