vba保存文件为xlsx格式_另存为xlsx格式疑问

我想要excel另存为xlsx格式的文件，这个文件所有的东西选择性粘贴、去掉个人信息、取消隐藏、以显示精度为准，而不改变原来的excel文件，下面代码当excel sheet少的时候没问题，但当表格多的时候就卡死，一直转圈求大神帮忙

Sub Maco()

Dim C As Shape

Dim Wb As Workbook

Dim I As Long

Dim Sh As Worksheet

Dim kl As Integer

Dim na As Name

Dim wkbOne As Workbook

Application.ScreenUpdating = False

ActiveWorkbook.PrecisionAsDisplayed = True

Application.DisplayAlerts = False

ActiveWorkbook.Sheets.Copy

Set Wb = ActiveWorkbook

For I = 1 To Wb.Sheets.count

For Each C In Sheets(I).Shapes

If C.Type = 8 Or C.Type = 12 Then C.Delete

For Each Sh In Sheets

Sh.Protect AllowFiltering:=True

Sh.Unprotect '去密码保护

Sh.UsedRange = Sh.UsedRange.Value '选择性粘贴

For kl = 1 To Sheets.count '取消隐藏表

Sheets(kl).Visible = True

Next kl

On Error Resume Next

For Each na In ActiveWorkbook.Names '删除名称管理器

Debug.Print na.Name

na.Visible = True

na.Delete

Set wkbOne = Application.ActiveWorkbook '删除个人信息

wkbOne.RemovePersonalInformation = True

Application.Dialogs(xlDialogSaveAs).Show ("XXX工程电子版.xlsx")

Wb.Close

'Application DisplayAlerts = True

'ActiveWorkbook.PrecisionAsDisplayed = False

Application.ScreenUpdating = True

End Sub

vba保存文件为xlsx格式_另存为xlsx格式疑问相关推荐

word 宏命令批量把当前文件夹下的doc另存为docx格式
问题与需求: 程序生成了一批doc文件,因为是模板生成的,虽然后缀是doc文件,但是有些软件识别还是hmt格式的单网页格式,所以需要另存为真正的docx格式. 实现: 最后实现为,运行当前宏命令sav ...
java是什么格式_是java格式
错误:编码GBK的不可映射字符的解决办法最近在重新补javaSE的基础,编辑器编写完代码以后,在控制台运行代码段的时候,出现了以下的错误提示:错误:编码GBK的不可映射字符在通过查询谷哥和度娘以后 ...
java 解析日期格式_日期/时间格式/解析，Java 8样式
java 解析日期格式自Java 几乎开始以来,Java开发人员就通过java.util.Date类(自JDK 1.0起)和java.util.Calendar类(自JDK 1.1起 )来处理日期 ...
vba保存文件为xlsx格式_使用VBA打开制表符分隔的.txt文件以保存为.xlsx格式
我正在尝试在Excel中使用VBA来自动将.txt文件(制表符分隔)转换为.xlsx文件 . 这就是我所拥有的: Set WB = Workbooks.Open(folder + file, , , ...
vba保存文件为xlsx格式_Vba把Excel某个范围保存为XLS工作薄文件
Dim wn$, shp As Shape, arr Application.ScreenUpdating = False Application.DisplayAlerts = False wn = ...
vba 保存word里面的图片_笔记7 【office精华课】一套课程学会Word+Excel+PPT（一）【Word】（2020年第37周周五）...
[office精华课] <一套课程学会Word+Excel+PPT> 课程目录:(总时长合计:28:56:25) =================================== [ ...
vba 保存word里面的图片_如何将Word表格保存为图片？这3种方法你用过没？
如何将Word中的表格另存为图片呢?本期Word妹与大家分享3个快速解决的办法. 第一种:将表格区域转换为图片选中表格并复制,之后点击开始--剪贴板--粘贴--选择性粘贴,随后在打开的界面中选中[图 ...
webpack 保存文件后自动打包_继webpack后又一打包神器Parcel
前言: 在继grunt.gulp实现自动化构建之后,webpack又引领前端打包潮流,众所周知的是,vue-cli的脚手架就是基于webpack进行项目打包的.而webpack还在上升的势头的时候,又 ...
使用python的win32com模块另存excel文件，如xls另存为xlsx、xlsm另存为xlsx、csv另存为xlsx
import win32com.client as win32# 1.创建 excel 程序 app = win32.Dispatch("excel.application") # ...

vba保存文件为xlsx格式_另存为xlsx格式疑问

vba保存文件为xlsx格式_另存为xlsx格式疑问相关推荐

最新文章

热门文章