如何仅关闭一个特定的Excel工作簿？

要关闭一个特定的Excel工作簿，可以按照以下步骤进行操作：

首先，确保你已经打开了Excel应用程序，并且目标工作簿已经在其中打开。
在Excel的菜单栏中，点击"文件"选项。
在弹出的文件菜单中，选择"关闭"选项。
Excel会自动关闭当前活动的工作簿，但是如果你只想关闭特定的工作簿，而不是关闭所有工作簿，可以按住"Ctrl"键并点击需要关闭的工作簿的标签。
在点击工作簿标签后，Excel会将该工作簿设为活动工作簿，并取消其他工作簿的选中状态。
最后，再次按照步骤2和步骤3的操作，Excel会关闭选中的工作簿，而其他工作簿将保持打开状态。

需要注意的是，以上操作仅适用于关闭Excel中的工作簿，而不会关闭Excel应用程序本身。如果需要关闭整个Excel应用程序，可以点击文件菜单中的"退出"选项或使用快捷键"Alt+F4"。

关于Excel工作簿的更多信息，你可以参考腾讯云的Excel文档：Excel文档

相关·内容

Excel小技巧79：如何跟踪Excel工作簿的修改

默认情况下，更改历史记录仅保留30天。如果你对Excel工作表进行更改，然后在45天后再次打开该工作簿，则在关闭该工作簿之前，你将能够看到所有45天的更改历史记录。...但关闭时，任何超过30天的更改历史记录都将消失。这意味着下次打开它时，你将无法看到45天前所做的更改。 4. 无论何时开启跟踪，工作簿都将成为共享工作簿。这意味着多个用户将对文档进行更改。...上面是在Excel中如何进行跟踪的一些基本知识，接下来让我们来讨论如何启用它、更改设置和跟踪更改！...“位置”选项允许你仅跟踪电子表格特定部分的更改。只需单击右侧的按钮，然后选择要跟踪的单元格范围。最后，如果你不想让其他人知道你正在跟踪更改，可以取消选中“在屏幕上突出显示修订”选项。...图6 单击“确定”按钮，将添加一个名为“历史记录”的工作表，让你查看对该工作簿所做的所有更改，如下图7所示。 ? 图7 在某个时候，你需要接受或拒绝更改。

6.6K3 0

从关闭的工作簿中复制数据

标签：VBA 要从关闭的工作簿中复制数据，有很多种方法，下面介绍最基本的一种方法。...假设要将一个工作簿中工作表Sheet2的单元格区域A1:B50的数据复制到当前工作簿的工作表Sheet1相应的单元格区域，可以使用下面的代码： Sub testCopyValueFromClosedWorkbook...wksThis.Range("A1:B50").Value = wksThat.Range("A1:B50").Value wbThat.Close False End If End Sub 代码的思路很简单...：打开选择文件对话框，选择要复制的数据所在的工作簿文件，然后打开该工作簿，将其中数据所在工作表相应单元格区域数据复制到当前工作簿相应工作表区域，然后关闭该工作簿。

1181 0

Excel实战技巧57：标识并使用VBA代码识别特定的工作簿

有时候，需要使用代码确认某个工作簿是否是特定模板创建，或者是否属于某个应用程序，如果是就打开并操作该工作簿或应用程序。如何实现呢？...一种常用的方法是对工作簿文件添加自定义的文档属性，这样让代码在不打开工作簿的情况下判断是否是想要的工作簿。...为工作簿添加自定义文档属性单击“文件——信息——属性——高级属性”，打开工作簿的“属性”对话框。...图1 安装工具库DSOFile.dll 我们要使用名为DSOFile.dll的COM对象从关闭的工作簿中读取文档属性，因此，需要下载并安装该DLL。...vFileNames) If FileHasSomeProperty(vFileNames(i), strPropertyName) Then MsgBox "具有特定标识的工作簿存在

1.8K1 0

Excel Power Query学习：如何合并两个Excel工作簿

本文主要讲解如何使用Power Query以完全可审核、易于执行的方式解决合并两个工作簿的问题，主要是将两个工作簿中工作表的数据放到一起。...装载文件打开一个新工作簿，单击功能区“数据”选项卡“获取和转换数据”组中的“获取数据——来自文件——从文本/CSV”，如下图1所示。...图1 导航到示例文件夹中的文件，将其连接到Power Query，然后选择“加载——加载到…”，如下图2所示。图2 在弹出的“导入数据”对话框中，选择“仅创建连接”，如下图3所示。...然后，可以通过在“查询设置”区域的属性名称中将其重命名，如下图8所示。图8 单击功能区中的“关闭并上载”将其发送到Excel，如下图9所示。图9 结果如下图10所示。...那么，是不是加载了两个文件的全部数据呢？我们可以验证。一个简单方法是将hof_inducted和hof_not_inducred作为表加载到工作簿中。

2K2 0

Excel小技巧78：恢复未保存的Excel工作簿

excelperfect 我们可能碰到过这样的情形，正在编辑Excel工作簿时，Excel突然崩溃了（例如Excel老半天都没有响应）或者电脑突然断电了，这让我们来不及保存工作簿。...此时，如何恢复我们的成果？幸好，Excel提供了一些选项和功能可用于恢复未保存的文件。在Excel中，有一个自动保存功能，可以临时保存文件。...保留上次自动保留的版本：如果没有保存就关闭工作簿，保留最新版本：它会创建文件的备份版本。注意：确保恢复时间尽可能短以保存更多版本。...除此之外，还有一个“自动恢复例外情况”选项，可以帮助恢复文件的最后未保存版本（保存一次）。默认情况下，上述选项都已被激活，并将未保存的工作簿连续保存在你的系统上。...当你正在处理尚未保存到任何位置的文件时，Excel崩溃了或没有保存就将其关闭了，此时，重新打开Excel，单击Excel左上角“文件——打开”，再单击右侧的“最近”，接着单击右下方的“恢复未保存的工作簿

2.1K0 0

如何在前端应用中合并多个 Excel 工作簿

前言|问题背景 SpreadJS是纯前端的电子表格控件，可以轻松加载 Excel 工作簿中的数据并将它们呈现在前端浏览器应用的网页上。　　...在某些情况下，您可能需要将来自多个工作簿的数据（例如，来自不同部门的月度销售报告）合并到一个工作簿中，实现此目的的一种方法是使用多个隐藏的 SpreadJS 实例来加载所有工作簿，然后将它们合并到一个电子表格中...此文将向您展示如何合并多个 Excel 工作簿并将它们作为单个电子表格显示在您的前端浏览器应用中。设置项目要加载 SpreadJS，我们需要添加主要的 JavaScript 库和 CSS 文件。...文件当用户准备好最终将所有工作簿合并为一个时，他们可以单击“合并工作簿”按钮，将每个工作簿中的每个工作表复制到页面上可见的 SpreadJS 实例： function MergeWorkbooks(...添加该代码后，您现在可以加载多个 Excel 工作簿并使用 SpreadJS 将它们合并为一个。

2722 0

Excel VBA在一个工作簿内把总表拆分多个工作表

知识点：字典，主要是item中可以是union(),并进行复制 ======代码如下======= Sub 在一个工作簿内把总表拆分多个工作表() Dim title_rng As Range,...scripting.dictionary") With ActiveSheet On Error Resume Next col_rng = Application.InputBox("请输入要拆分的列...(1) endrow = Cells.Find("*", Cells(1, 1), xlValues, xlWhole, xlByRows, xlPrevious).Row '计算最后一个工作表的非空行号...endCol = Cells.Find("*", Cells(1, 1), xlValues, xlWhole, xlByColumns, xlPrevious).Column '计算最后一个工作表的非空列号...s), .Cells(i, 1).Resize(1, endCol)) End If Debug.Print i Next i MsgBox "将拆分出工作表数有

2.5K4 0

常用功能加载宏——一个工作簿的工作表另存为工作簿

前面实现了多个工作簿和合并到一个工作簿的功能，反过来，将一个工作簿里的工作表，另存为多个工作簿，然后分发给不同的人，应该也是经常会碰到的。让我们看看使用VBA如何实现： ?...首先在customUI.xml中增加代码：工作表保存工作簿" onAction="rbbtnSht2Wb" imageMso...IRibbonControl) Call MShtWk.Sht2Wb End Sub 函数实现： Sub Sht2Wb() Dim path As String '保存在活动工作簿同一目录下...path = ActiveWorkbook.path & Application.PathSeparator '关闭屏幕更新，提高速度 Application.ScreenUpdating...= False Dim sht As Worksheet For Each sht In Worksheets sht.Copy '按工作表的名称保存工作簿

1.6K4 0

快速汇总多个工作簿工作表中的数据(Excel工具推荐)

比方，我们有以下三个工作簿这三个工作簿含有第一季度各品牌在各个国家的销售数据，又分为若干不等的工作表。...我们需要将这些销售数据汇总做个统计，查看总体一季度的销售情况，或者各个国家一季度的情况，再或者各个品牌的情况。这时候手头只有Excel,没有其他软件。...最笨的办法是挨个打开这些工作簿，手动将数据源串联起来，然后做数据透视。可是 1.有时候数据源过大，超出单个Excel文件承载范围，你无法串联。...然后有一天我在ExcelHome论坛发现了版主写的一个神器，可以自动生成SQL语句，实现跨工作簿/工作表进行数据汇总透视。(点击阅读原文可以找到工具下载链接)下面介绍下该工具的使用方式。...这个工具的另外一个好处是，数据源字段格式不一定要一样，比方这个工作表中有销售数量，销售额字段，那个工作表中还有“折扣“等字段，对你的结果不会产生影响，只是取你需要的字段即可。

10.9K1 0

Excel应用实践10：合并多个工作簿中的数据

学习Excel技术，关注微信公众号： excelperfect 这是ozgrid.com论坛中的一个问题贴子：我有超过50个具有相同格式的Excel文件，它们的列标题相同，并且都放置在同一文件夹，有什么快速的方法将它们合并到一个单独的...Excel文件的一个工作表中？...在“合并.xls”工作簿中，有三个工作表。其中，“设置”工作表中的单元格B2中的数据为每个工作簿中想要合并的工作表名，这里假设每个工作簿中的工作表名相同；单元格B3为要合并的数据开始的行号。 ?...Dim openWb As Workbook ' 工作表中最后一个数据单元格所在的行 Dim lastRowx As Long ' 打开工作簿 Workbooks.Open...thisWb.Sheets(importedSheet).Range("A"& importPtr) = openWb.Name End If End With ' 关闭工作簿

2.3K4 1

Excel应用实践21：实现工作簿所有工作表中的多值替换

学习Excel技术，关注微信公众号： excelperfect 有两个工作簿，一个工作簿中存放着要查找并替换成的文本，如下图1所示，列A中是要查找的文本，将列A中查找到的文本替换成列B中相应的文本，例如...，将找到的“Excel”替换成“完美Excel”。...图1 另一个工作簿中是我们要替换其文本的工作簿，我们要在该工作簿所有工作表中查找上图1列A中的值并将找到的文本替成列B中的文本，如图2所示。 ? 图2 要实现的结果如下图3所示。 ?...在图1所示的工作簿中，打开VBE，插入一个标准模块，输入代码： '查找并替换指定工作簿中的多个文本 Sub MultiFindReplace() Dim ReplaceListWB As Workbook...,2).Value, _ xlPart, ,False) Next i End With Next '保存并关闭要替换文本的工作簿

3.1K1 0

神奇的AI编程小例子——合并两个工作簿的工作表到一个工作簿

今天帮一个朋友干点活，涉及到了两个表格文件的工作表合并到一个工作簿，分别作为单独的工作表。...] # 创建目标工作簿中的新表 target_sheet = target_workbook.create_sheet(title=sheet_name) # 复制其他工作簿表的数据到目标工作簿表...target_workbook.save('目标工作簿.xlsx') 在示例代码中，你需要将目标工作簿.xlsx和其他工作簿.xlsx替换为实际的文件路径。...接下来，我们获取其他工作簿中的表名，并使用create_sheet方法在目标工作簿中创建相应的新表。然后，通过遍历其他工作簿中的每个表，我们可以复制数据并将其追加到目标工作簿的对应表中。...这个示例代码适用于将其他工作簿中的所有表追加到目标工作簿中。如果你只需要追加某个特定的表，可以根据需要做出相应的修改。代码几乎不用修改，完全能实现功能。

3071 0

VBA: 将多个工作簿的第一张工作表合并到一个工作簿中

一般的操作方法是打开两个工作簿（目标工作簿和待转移的工作簿），然后选中需要移动的工作表，右键单击以后选择“移动或复制”。接下来在新的对话框里面进行设置。这种方法适合在移动少量工作表的时候使用。...如果有很多的工作簿，都需要进行移动的话，一个一个打开然后再操作比较费时费力。这时就可以使用VBA来批量进行操作。...在目标工作簿内，插入一个模块，然后导入如下的代码： Option Explicit Sub MergeWorkbook() '将多个工作簿的第一张工作表合并到目标工作簿中...End Sub (1) 将目标工作簿和待转移的工作簿放在同一个文件夹内；（2）上述代码要实现的功能是，将同一个文件夹内所有工作簿（目标工作簿除外）的第一张工作表拷贝到目标工作簿内，并将表名设置为拷贝前所属的工作簿名称...转移前：转移后：参考资料： [1] 如何使用Excel VBA将多个工作簿的全部工作表合并到一个工作簿中（https://zhuanlan.zhihu.com/p/76786888）

6.1K1 1

Excel应用实践14：合并多个工作簿中的数据—示例3

学习Excel技术，关注微信公众号： excelperfect 要合并工作簿的情形有许多种，但最终的目的只有一条，将繁锁的手工操作自动化，让程序快速帮助我们完成这些重复的工作。...本例中，要合并的工作簿放置在同一文件夹中，为方便描述，这些工作簿名称和其要合并的数据工作表如下（假设要合并的工作簿有3个）： “工作簿1.xlsm”中的工作表“完美Excel” “工作簿2.xlsm”中的工作表...要求： 1.将这些工作簿中的工作表合并到名为“合并.xlsm”工作簿的工作表“数据”中。...2.在“合并.xlsm”工作簿工作表“数据”的列F中，放置对应行数据来源工作簿工作表名，例如如果数据行2中的数据来自工作表“完美Excel”，则在该行列F单元格中输入“完美Excel”。...3.要合并的工作簿工作表，例如工作簿1.xlsm中的“完美Excel”数据发生变化后，在“合并.xlsm”工作表中运行代码后，会清除“数据”工作表中原先的数据并重新合并上述工作簿中的工作表数据。

1.6K4 0

Excel应用实践11：合并多个工作簿中的数据——示例2

在上一篇文章《Excel应用实践10：合并多个工作簿中的数据》中，我们使用代码快速合并超过50个Excel工作簿文件，然而，如果要合并的工作簿中工作表的名称不相同，但位于每个工作簿的第1个工作表；并且，...要在合并后的工作表的第1列中输入相对应的工作簿文件名，以便知道合并后的数据来自哪个工作簿文件。...GetBasename(e) End With End With End With '关闭要从中获取数据的工作簿文件...，将数据依次添加到新增加的工作表中，同时在工作表首列添加工作簿文件名。...有几句代码需要特别说明： 1.代码： ws.Cells(Rows.Count, 2).End(xlUp)(2) 注意到最后的括号和放置在其中的数字2，这表明在工作表第2列中最后一个数据单元格之后的空单元格

2.8K2 0

yhd-VBA从一个工作簿的某工作表中查找符合条件的数据插入到另一个工作簿的某工作表中

今天把学习的源文件共享了出来，供大家学习使用上次想到要学习这个结合网友也提出意见，做一个，如果有用，请下载或复制代码使用【问题】我们在工作中有时要在某个文件（工作簿）中查找一些数据，提取出来...想要做好了以后同样的工作就方便了【想法】在一个程序主控文件中设定：数据源文件（要在那里查找的工作簿）设定：目标文件（要保存起来的那个文件）输入你要查找的数据：如：含有：杨过，郭靖的数据。...要复制整行出来主控文件设定如图数据源文件有两个工作表查找到"郭靖"的数据保存到目标文件的【射雕英雄传】工作表查找到"杨过"的数据保存到目标文件的【第一个】工作表【代码】 Sub...从一个工作簿的某工作表中查找符合条件的数据插入到另一个工作簿的某工作表中() Dim outFile As String, inFile As String Dim outWb As...MsgBox ("一个也没找到") End If '==end=工作表内部

5.5K2 2

Excel VBA批量转换某个文件夹里的xls工作簿为xlsx

xcel VBA批量转换某个文件夹里的xls工作簿为xlsx ---- Sub 批量转换工作簿() Dim oPath As String '原始文件路径 Dim oFName...With Workbooks.Open(oPath & oFName) '判断工作簿是否含有VB工程 If .HasVBProject...Then '若含有VB工程，则另存为启用宏的工作簿 dFName = oFName & "m" .SaveAs...oFName & "x" .SaveAs dPath & dFName, xlOpenXMLWorkbook End If '关闭工作簿....Close False End With '查找下一个文件 oFName = Dir Loop '恢复打开文件的宏安全性设置

1.9K2 0

VBA实战技巧28：自动关闭指定时间没有进行操作的工作簿

有时候，我们打开了一个工作簿，但长时间没有使用，此时，你可能想让Excel自动将其关闭。也就是说，对于某个工作簿，如果用户在指定的时间内没有进行任何操作，那么Excel会保存并关闭该工作簿。...首先，在VBE中插入一个标准模块，在其中输入代码： Public RunWhen As Double Public Const NUM_MINUTES = 10 Public Sub SaveAndClose...() ThisWorkbook.CloseSaveChanges:=True End Sub 你可以修改NUM_MINUTES的值，设置让工作簿在没有操作的情况下保持开启的时间。...如果在指定的时间内都没有操作工作簿，那么该工作簿将自行保存并关闭。注：本文学习整理自www.cpearson.com，供有兴趣的朋友参考。

2.5K3 0

Excel实战技巧107：识别工作簿中所有图表的详细信息

本文主要讲解如何使用VBA识别图表的详细信息并将结果呈现给用户，所编写的程序需要报告图表的下列特征：图表所在的工作表图表对象的名称不同数据系列列表每个数据系列的公式每个项目的坐标轴公式任何可能应用于像气泡图等的...为了让程序正常工作，我们不想修改基本文件，因此我们将创建一个新工作簿来存储结果。...TargetWorkbook.Activate 接着，一旦记录了值，我们可以切换到新工作簿，根据命名区域规则将值设置在适当的位置，然后返回目标工作簿查看下一个数据系列和下一个图表。...一旦我们完成了那个图表，就可以移动到下一个图表，一旦该工作表遍历完成，就可以移动到下一工作表。注意，SeriesCollection.Formula不适用于新的Excel2016图表类型。...现在，我们已经从工作簿的图表中提取了详细信息，并将它们放入一个看起来像下面这样的新工作簿中：从这里开始，我们需要解开公式以计算出数据系列的组成部分是什么。

1.3K1 0

VBA专题10-6：使用VBA操控Excel界面之执行命令以及激活功能区选项卡的两种方法

创建新工作簿并将其保存为启用宏的工作簿。 3. 关闭该工作簿并在CustomUI Editor中打开。 4....选择这个选项使工作簿与Excel 2007及后续版本兼容。 5....，有一个VBA过程的名称赋给它，本例中的过程命名为Initialize，当打开工作簿时调用此过程。...使用对功能区的引用，可以接着通过myRibbon对象激活功能区选项卡（以及使功能区中的选项卡和控件无效）。 12. 保存，关闭，然后重新打开该工作簿。...要激活特定的内置功能区选项卡，例如“数据”选项卡，使用下面的代码： myRibbon.ActivateTabMso "TabData" 如果要在打开工作簿时激活“数据”选项卡，在Initialize过程中插入上面的语句

3.9K2 0

点击加载更多

扫码

添加站长进交流群

领取专属 10元无门槛券

手把手带您无忧上云