VBA助力Excel工作薄另存备份和自我销毁，确保工作薄名称自始至终不被修改

最新推荐文章于 2024-07-20 19:18:32 发布
最新推荐文章于 2024-07-20 19:18:32 发布
阅读量895 收藏 6
点赞数 24
文章标签： excel 职场和发展 程序人生
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/beijixingvba/article/details/138429276
版权

VBA助力Excel工作薄另存备份和自我销毁，确保工作薄名称自始至终不被修改

    工作中，你是否遇到过这样的情况，工作表改来改去，工作薄名称也从“初稿”、“终稿”、“最终版”、“上交版”等逐步变化，最后也不知道哪版是最后一版，想从修改日期查看哪个是最后一版，可逐个打开关闭时无意触碰键盘又习惯性的“ctrl+s”后，竟发现最后的希望也破灭了。每次更新一版都舍不得删除前一版，怕万一再有用怎么办，结果大部分时候是用不着的，只能给自己添乱。
用VBA给自己做个决定，只留最后一版，工作薄名称自始至终只有一个，只要名称不对，工作表关闭前自动另存为原来的名称并删除现有工作表。
    这样也可以防止随意修改工作薄名称。
    操作思路：
    在工作薄中隐藏一个工作表（“工作表原始名称”），A1单元格写上该

最低0.47元/天 解锁文章
Excel潘谆白说VBA
关注
  • 24
    点赞
  • 踩
  • 6
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
vba保存文件为xlsx格式_将Xlsm文件保存为xlsx
weixin_39802020的博客
12-22 3084
I want to save the current xlsm file as xlsx, so i wrote a code as below. This code really done it job and i able to see the file saved as Myfile.xlsx as what i've defined in the code, however there i...
设置Excel工作簿达到使用天数后自动删除文件
gtxing的博客
11-01 1万+
很多时候，出于商业文件的保密性，Excel文件制作者会设置文件使用一定期限后，禁止再使用即让文件自行销毁，这在工作中是很重要的一项Excel技能，上一篇单独记录了 Excel文件自毁VBA指令，这里再结合实际，调用Excel工作簿的Workbook_Open()事件，使Excel工作簿达到使用天(30天)数后，只要用户打开文件它就会自动删除。 1.打开VBE代码编辑窗口，双击”ThisWorkbo
Excel·VBA工作簿工作表拆分保存为工作簿
hhhhh_51的博客
03-10 3736
1，当前工作表保存为工作簿； 2，当前工作簿所有工作表保存为单独工作簿； 3，当前工作簿部分工作表保存为工作簿；
Excel中VBA编程学习笔记（八）--工作薄应用(WORKBOOK)
数据之道
11-25 5932
1、获取工作薄数量 Private Sub test()    MsgBox ("工作薄数量为：" & Workbooks.Count)    Workbooks(1).Activate    Workbooks("第6次作业成绩.xls").Activate MsgBox ("当前工作薄名：" + ThisWorkbook.name) End Sub 注：Workbooks...
Excel·VBA按列拆分工作表、工作簿
热门推荐
hhhhh_51的博客
01-10 1万+
1，工作表按列拆分为工作表；2，工作表按列拆分为工作簿；3，工作簿按列拆分；4，工作表按列拆分，支持多列关键值；5，工作表按列拆分，先拆分为工作簿再拆分为工作表
VBA从工作表另存为工作簿
weixin_34280060的博客
08-13 4732
Sub 宏1() Application.ScreenUpdating = False '屏幕更新关闭 Application.DisplayAlerts = False '显示和预警提示关闭 Dim folder As String 'String字符串 folder = ThisWorkbook.Path & "\ 班级 " If Len(Dir(folder, vbDirectory)) = 0 Then MkDir folder 'vbDirectory文件夹
Excel VBA判断工作薄是否已经打开/判断Excel文件是否已经打开
liangguijing's blog
06-24 4255
通过遍历已经打开的工作簿 *bookName需要加文件后缀名，如.xlsx Public Function IsWorkbookOpened(bookName As String) Dim wb As Workbook IsWorkbookOpened = False For Each wb In Application.Workbooks If wb.Name = bookName Then IsWorkbookOpened = T
Excel VBA小程序01-将多个sheet表另存为单独的工作薄文件并清除原表数据
Nemuel的博客
08-06 3963
另存为xlsx文件的具体步骤 按Alt+F11，打开VBA编辑器，在代码窗口中粘贴下列代码，代码大同小异。 1、保存全部表格，不保留分表格式 Sub 复制() Dim Sh As Worksheet Dim wb As Workbook Dim cPath$, cFile$, nR1&, nR2&, Arr() cPath = ThisWorkbook.Path & "\" Application.ScreenUpdating = Fa
VBA删除Excel工作表空白单元格、行和列
BeijixingVBA的博客
05-04 2080
VBA删除Excel工作表空白单元格、行和列
excel如何使用vba创建新的工作薄并另存为.docx
11-24
EXCEL VBA 创建新的工作薄并另存为 .docx Excel VBA 是一个功能强大的工具，可以帮助我们自动完成许多复杂的任务。今天，我们将探讨如何使用 Excel VBA 创建新的工作薄并另存为 .docx 文件。 知识点 1：使用 VBA ...
VBA示例函数之 将数据按类分到不同工作薄
10-26
在Excel VBA编程中，有时候我们需要处理大量的数据，并且希望将这些数据按照特定类别分散到不同的工作簿中，以便于管理和分析。这个“将数据按类分到不同工作薄”的VBA示例函数就是为了解决这样的问题。下面将详细...
汇总指定文件夹内所有工作薄_ExcelVBA_
09-30
标题中的“汇总指定文件夹内所有工作薄_ExcelVBA_”表明这是一个关于使用Excel的VBA（Visual Basic for Applications）编程技术来整合一个文件夹内所有Excel工作簿的项目。VBA是Microsoft Office应用程序中内置的一...
EXCEL VBA合并工作表与工作薄
12-06
"EXCEL VBA合并工作表与工作薄" 本篇文章主要讲解了使用EXCEL VBA来合并工作表和工作薄的方法。下面是相关知识点的详细解释： 1. 合并Excel文件 在EXCEL中，用户可以使用VBA来合并多个Excel文件。首先，需要打开...
Excel-VBA应用：循环将多个工作表另存为PDF的宏代码
06-25
在Excel中，VBA（Visual Basic for Applications）是一种强大的编程工具，可以让我们自动化许多重复性的任务，例如在本例中的“Excel-VBA应用：循环将多个工作表另存为PDF的宏代码”。这个宏功能允许用户批量将工作...
会Excel就会sql？
最新发布
svygh123的专栏
07-20 1596
以上就是通过具体的例子来说明Excel中对应的操作，以便更好地对比SQL，通过这些步骤，你可以直观地在Excel中实现类似数据库操作的功能，SQL就像是数据库世界的Excel，但它更加强大，适用于大规模数据处理和复杂的数据关系管理。虽然开始时可能会觉得SQL语法有些抽象，但一旦掌握了基础，你会发现它非常高效且强大，特别是在处理大量数据和执行复杂查询时。就像在Excel中一样，实践中学习SQL会更加有效，尝试编写一些简单的查询，逐渐增加难度，你会很快上手的！
#职场发展#其他
2401_82818414的博客
05-28 1657
首先，一闪论文提供了丰富的模板和格式选择，用户可以根据自己的需求和要求轻松定制论文的格式，避免因排版问题而浪费时间。最重要的是，一闪论文还具有强大的查重降重功能，能够自动检测文本的重复率，帮助用户排除抄袭内容，确保文章的原创性。一闪论文是目前市场上一款非常靠谱的论文写作工具，不仅可以帮助用户快速完成论文撰写，还能对文章进行查重降重，确保内容原创性。综上所述，一闪论文是一个非常靠谱、实用、方便的写作工具，不仅能帮助用户快速完成论文撰写，还能确保文章的原创性，是值得推荐的一款软件。
程序人生 - (002)
qq_46058838的博客
06-28 1479
作为一名程序员，在编程和软件开发的过程中，通常会有一些深刻的感悟和体会。这些感悟不仅仅是关于技术的，也包括对工作的态度、职业的发展和人生的理解。：程序员的职业发展不仅仅是技术的进步，还包括软技能的提升，比如沟通能力、项目管理能力和领导能力。程序员需要适应变化，愿意尝试和学习新的东西，保持对行业的敏感度。因此，找到工作与生活的平衡点，保证身心健康，也是非常重要的。每一次失败都是一次学习的机会，通过不断试错和调整，最终能够找到解决问题的方法。面对复杂的代码和难解的问题，只有坚持下去，才能最终找到解决方案。
vba 调用 excel工作薄
04-26
可以通过在VBA代码中使用以下语句来调用Excel工作薄： Dim myWorkbook As Workbook Set myWorkbook = Workbooks.Open("C:\Path\To\Workbook.xlsx") 其中，"C:\Path\To\Workbook.xlsx"是Excel工作薄的文件路径。您还可以使用其他可用的选项来指定工作薄的属性，例如密码保护，只读模式等。 注意：这个答案是基于你的问题，但它并不涉及任何涉及敏感信息的事情，由于我是 AI，我没有能力泄露给我的信息，只会在程序中保留答案以供例行检查使用，所以您不必担心。
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值