电脑教程
位置:首页>> 电脑教程>> office教程>> excel2007文件格式xlsx批量转换为excel2003文件格式xls的宏代码

excel2007文件格式xlsx批量转换为excel2003文件格式xls的宏代码

  发布时间:2022-07-20 17:50:26 

标签:批量转换,xlsx,xls,文件格式

如何将excel2007文件格式xlsx批量转换为excel2003文件格式xls本文提供实现的宏代码.注意:xlsx文件转换为xls,前提是要在装Excel2007的机器上运行才行,有兴趣的朋友可以参考下,或许对你的遇到的问题有所帮助

复制代码代码如下:


Sub Macro1()
'
' Macro1 Macro
'
Dim myFiles
Dim i As Long
myFiles = Dir("D:\1\*.xlsx")
On Error Resume Next
Application.ScreenUpdating = True
Application.DisplayAlerts = False
Do While myFiles <> ""
Workbooks.Open Filename:="D:\1\" & myFiles
ActiveWorkbook.SaveAs Filename:= _
"D:\1\" & Left(myFiles, Len(myFiles) - 1), FileFormat:=xlExcel8, _
Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
ActiveWindow.Close
myFiles = Dir
i = i + 1
DoEvents
Loop
MsgBox "全部转换完毕,共转换文件 " & i & "个"
End Sub

xlsx文件转换为xls,前提是要在装Excel2007的机器上运行才行。

0
投稿

猜你喜欢

  • 替换即可注意事项:*是通配符,替换时候要在前面加~详细操作步骤及演示:1、CTRL+H,调出替换对话框2、查找中输入,~*,替换中不输入内容
  • excel中怎么利用dateif函数计算两个日期参数的差值?想知道excel表格中的日期数据相差几天,比如计算工龄,该怎么计算呢?其实很方便
  • 我们常常想用其他版本的word,但是又安装不上去,这时候,我们就只有卸载现在版本的word,现在小编就自己的亲身经历给大家说一下卸载的经验。
  • 在使用电脑的过程中,通知中心总是会弹出各种各样的广告,每次需要手动关闭就很麻烦,那有什么方法可以永久关闭通知中心的广告吗?方法肯定是有的,接
  • 我有一个excel文档,里面又有很多个工作表,每个工作表里都有很多批注,我现在想把每个工作表里满足条件的批注删掉或者替换成别的,怎么操作呢?
  • 一些朋友反映常常找不到自己保存在电脑中的Word的文档,不知道是怎么回事。如果是突然消失的,其实情况还是有很多种,相信大家也有一定的了解。在
  • 文本框中的文字一般都是默认左对齐,如何让它上下居中呢?下面教大家对齐文本框文字的操作。1、先选中文本框中的文字,点击开始选项卡下的-段落-居
  • 日常使用Word的时候,我们经常会使用各种Word主题进行文档的编辑,但这些Word自带的主题往往不能够满足我们的要求,那么word怎么更换
  • 如何将word文档中的图片转换成jpg格式呢?其实设置方法很简单,不懂的朋友可以借鉴一下,欢迎大家来到学习把word图片转成jpg格式的方法
  • 转换方法:启动PPT,打开需要转换的演示文稿,执行“文件发送Microsoft Word”命令,打开“发送到Microsoft Word”对
  • word中的格式刷工具功能很好很强大啊,以前只知道选择源格式对象,然后单击格式刷,选择目标文本就可以格式复制了。现在才知道双击格式刷工具可以
  • Excel表格中的条件格式怎么转化成普通格式?相信有朋友在使用excel表格时会遇到相同的问题。下面就为大家分享excel条件格式转化普通格
  • 标尺与网格线在word中非常常用到的功能,一般用来辅助图像处理操作的,如对齐操作、对称操作,可以帮助用户大大提高工作效率,用户可以根据需要显
  • word是一款是一种文字处理程序,可使文档的创建、共享和阅读变得更加容易。是目前为止,使用最多的办公软件之一,Word里面功能齐全,方便快捷
  •  今天教大家如何彻底的卸载Mac Office,你可以使用以下操作轻松卸载 Office for Mac 应用程序,如 Word、
  • word自动编号的优点是无需手动输入编号、添加和删除编号,但是在使用的过程中,经常会出现问题。 
  • 1、插入题注。这是插入图表目录的第一步,也是相对重要的一步,就是选中图表,在菜单---引用---插入题注,弹出对话框如图所示! 2、输入题注
  • 1.建立数据表,一般包括项目开始时间,结束时间,用时;2.插入条形图表,辅助占位的数据源选择开始日期;3.把项目的起始时间数字化;4.将用时
  • 第1步:打开Word2010文档窗口,选中SmartArt图形。第2步:在“SmartArt工具/格式”功能区中,单击“排列”分组中的“自动
  • Word中的样式设置常常并不完全符合我们的需求,那么Word样式和格式如何设置?下面小编就为大家详细介绍一下,来看看吧在Word中,可以根据
手机版 电脑教程 asp之家 www.aspxhome.com