精华内容
下载资源
问答
  • 关闭工作簿是恢复Excel默认设置.rar,工作簿被关闭之前BeforeClose事件被激活。BeforeClose事件经常和Open事件配合使用,在Open事件中修改的Excel设置和用户界面,可以在BeforeClose事件中进行恢复,见本例“关闭工作...
  • I open several different workbooks (excel xlsx format) in COM, and mess with them. As the program progresses I wish to close one specific workbook but keep the rest open.How do I close ONE workbook? ...

    I open several different workbooks (excel xlsx format) in COM, and mess with them. As the program progresses I wish to close one specific workbook but keep the rest open.

    How do I close ONE workbook? (instead of the entire excel application)

    xl = Dispatch("Excel.Application")

    xl.Visible = False

    try:

    output = xl.Workbooks.Open(workbookName)

    output2 = xl.Workbooks.Open(workbook2Name)

    except com_error:

    print "you screwed up blahblahblah"

    exit()

    #work on some stuff

    #close output but keep output2 open

    解决方案

    The the Workbook COM object has a Close() method. Basically, it should be something like:

    xl = Dispatch('Excel.Application')

    wb = xl.Workbooks.Open('New Workbook.xlsx')

    # do some stuff

    wb.Close(True) # save the workbook

    The above was just a skeleton here's some code that works on my machine against Office 2010:

    from win32com.client import Dispatch

    xl = Dispatch('Excel.Application')

    wb = xl.Workbooks.Add()

    ws = wb.Worksheets.Add()

    cell = ws.Cells(1)

    cell.Value = 'Some text'

    wb.Close(True, r'C:\Path\to\folder\Test.xlsx')

    Of course, that creates a new xlsx file. But then I'm able to successfully open and modify the file in the same session as follows:

    wb = xl.Workbooks.Open(r'C:\Path\to\folder\Test.xlsx')

    ws = wb.Worksheets(1)

    cell = ws.Cells(2)

    cell.Value = 'Some more text'

    wb.Close(True)

    Don't know if any of that helps...

    展开全文
  • VBA关闭工作簿和退出Excel链接:...要用VBA来关闭工作簿,用Workbook.Close 方法即可,而要退出Excel,则用Application.Quit 方法。下面是一些代码示例: 关闭活动工作簿,如果工作簿...

    VBA关闭工作簿和退出Excel
    链接:http://www.excelpx.com/thread-233045-1-1.html

    兰色幻想VBA基础入门和高级开发全套80集视频教程,助你成为VBA开发高手。
    要用VBA来关闭工作簿,用Workbook.Close 方法即可,而要退出Excel,则用Application.Quit 方法。下面是一些代码示例:    关闭活动工作簿,如果工作簿有更改,提示是否保存:
        Sub CloseWorkbook()
        ActiveWorkbook.Close
        End Sub
        如果要避免出现提示,可添加“SaveChanges”参数,如直接保存并关闭工作簿:
        Sub ClostAndSaveWorkbook()
        ActiveWorkbook.Close Savechanges:=True
        End Sub
        将上述代码中的“True”改为“False”,则直接关闭工作簿而不保存。
        关闭所有打开的工作簿,并提示是否保存:
        Sub CloseAllWorkbooks()
        On Error Resume Next
        Workbooks.Close
        End Sub
        退出Excel,并提示对有更改的工作簿进行保存:
        Sub QuitExcel()
        Application.Quit
        End Sub
        保存活动工作簿并退出Excel:
        Sub SaveActiveWorkAndQuit()
        ActiveWorkbook.Save
        Application.Quit
        End Sub
        下面的代码在退出Excel时都不会提示是否保存工作簿。
        保存所有打开的工作簿并退出Excel:
        Sub SaveAllAndQuit()
        For Each wbk In Workbooks
        wbk.Save
        Next
        Application.Quit
        End Sub
        退出Excel,所有的改动都不保存:
        Sub QutiAndNoAlerts()
        Application.DisplayAlerts = False
        Application.Quit
        End Sub
    

      

    转载于:https://www.cnblogs.com/wenxiangchen/p/3271914.html

    展开全文
  • Workbooks 对象 Microsoft Excel 应用程序中当前打开的所有 Workbook 对象的集合。 说明 ...下例关闭所有打开的工作簿。 Workbooks.Close 使用 Add 方法可创建一个新空工作簿并将它添加到...

    Workbooks 对象

    Microsoft Excel 应用程序中当前打开的所有 Workbook 对象的集合。

    说明

    有关使用一个 Workbook 对象的详细信息,请参阅 Workbook 对象。

    示例

    使用 Workbooks 属性可返回 Workbooks 集合。下例关闭所有打开的工作簿。

    Workbooks.Close

    使用 Add 方法可创建一个新空工作簿并将它添加到集合。下例给 Microsoft Excel 添加一个新空工作簿。

    Workbooks.Add

    使用 Open 方法可打开一个文件。这样会为打开的文件创建一个新工作簿。下例将文件 Array.xls 打开为只读工作簿。

    Workbooks.Open FileName:="Array.xls", ReadOnly:=True
    Workbooks 对象成员

    Microsoft Excel 应用程序中当前打开的所有 Workbook 对象的集合。

    方法

     名称说明
     Add新建一个工作表。新工作表将成为活动工作表。
     CanCheckOut如果 Microsoft Excel 可以将指定的工作簿从服务器签出,则该值为 TrueBoolean 类型,可读写。
     CheckOut返回一个 String 对象,该对象表示一个将从服务器签出到本机进行编辑的指定工作簿。
     Close关闭对象。
     Open打开一个工作簿。
     OpenDatabase返回一个 Workbook 对象,该对象代表一个数据库。
     OpenText载入一个文本文件,并将其作为包含单个工作表的新工作簿进行分列处理,然后在此工作表中放入经过分列处理的文本文件数据。
     OpenXML打开一个 XML 数据文件。返回一个 Workbook 对象。

    属性

     名称说明
     Application如果不使用对象识别符,则该属性返回一个代表 Microsoft Excel 应用程序的 Application 对象。如果使用对象识别符,则该属性返回一个代表指定对象的创建程序的 Application 对象(可对一个 OLE 自动化对象使用该属性来返回该对象的应用程序)。只读。
     Count返回一个 Long 值,它代表集合中对象的数量。
     Creator返回一个 32 位整数,该整数指示创建对象的应用程序。只读 Long 类型。
     Item从集合中返回一个对象。
     Parent返回指定对象的父对象。只读。

     

    Workbook 对象

    代表一个 Microsoft Excel 工作簿.

    说明

    Workbook 对象是 Workbooks 集合的成员。Workbooks 集合包含 Microsoft Excel 中当前打开的所有 Workbook 对象。

    ThisWorkbook 属性

    ThisWorkbook 属性返回运行 Visual Basic 代码的工作簿。在大多数情况下,该工作簿与活动工作簿是同一个。但是,如果 Visual Basic 代码是加载宏的组成部分,ThisWorkbook 属性就不会返回活动工作簿。此时,活动工作簿是调用该加载宏的工作簿,而 ThisWorkbook 属性返回加载宏工作簿。

    如果用 Visual Basic 代码创建加载宏,那么对于那些编译到加载宏中的工作簿,在其中运行的语句应当用 ThisWorkbook 属性加以限定。

    示例

    使用 Workbooks(index)(其中index 是工作簿名称或索引号)可返回一个 Workbook 对象。下例激活工作簿一。

    Workbooks(1).Activate

    编号指示创建或打开工作簿的顺序。Workbooks(1) 是创建的第一个工作簿,而 Workbooks(Workbooks.Count)Workbooks 是最后一个。激活某工作簿并不更改其索引号。所有工作簿均包括在索引计数中,即便是隐藏工作簿也是如此。

    Name 属性返回工作簿名称。您不能通过使用此属性来设置该名称;如果您需要更改该名称,请使用 SaveAs 方法,将该工作簿保存为其他名称。下例激活名为“Cogs.xls”的工作簿(该工作簿必须已经在 Microsoft Excel 中打开)中的 Sheet1。

    Workbooks("Cogs.xls").Worksheets("Sheet1").Activate

    ActiveWorkbook 属性返回当前处于活动状态的工作簿。下例设置活动工作簿作者的名称。

    ActiveWorkbook.Author = "Jean Selva"

     

    展开全文
  • Excel多个工作簿合成为一个工作表

    万次阅读 2020-08-21 14:02:20
    Excel多个工作簿合成为一个工作表 目录 前言 第一步:多张工作簿合并成一个“汇总工作簿”,操作如下: 第二步:把多张sheet表合并成一张sheet工作表,操作如下: 总结 前言 在工作中,我们会遇到这种情况,...

     

    Excel多个工作簿合成为一个工作表

    目录


    前言

     在工作中,我们会遇到这种情况,收集到各组中工作人员的信息,没人一张表,会产生大量的工作簿,汇总时一张一张复制粘贴费时费力,所以我们需要把多个Excel工作簿的内容汇总到一张Excel工作表中。这样可以方便快捷的进行数据整理。

    针对这种情况,我们一般可以分成两步去操作:

    1、首先,多个工作簿汇合并成一个“汇总工作簿”;形成一个工作簿,多张工作表的形式;

    2、其次,将我们的“汇总工作簿”中的多张sheet表合并成一个工作表。

     

    第一步:多张工作簿合并成一个“汇总工作簿”,操作如下:

    1、新建一个Excel工作簿,用于存放合并后的数据,将其命名为合并后的名字,例如:汇总工作簿;

    2、打开工作簿,在任意一个空白sheet表上右击,选择【查看代码】;

     

     

     

    3、点击【查看代码】,在打开的VBA编辑窗口中粘贴以下代码:

    Sub 工作薄合并()
    Dim FileOpen
    Dim X As Integer
    Application.ScreenUpdating = False
    FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(.xlsx),.xlsx", MultiSelect:=True, Title:="合并工作薄")
    X = 1
    While X <= UBound(FileOpen)
    Workbooks.Open Filename:=FileOpen(X)
    Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
    X = X + 1
    Wend
    ExitHandler:
    Application.ScreenUpdating = True
    Exit Sub
    errhadler:
    MsgBox Err.Description
    End Sub
    

     4、保存并关闭VBA编辑窗口;

    5、在Excel中,找到【宏】,选择【工作簿合并】,点击【执行】;

    6、打开窗口,选择需要合并的工作簿即可(可以单选、可以多选);

     7、等待运行结束,就完成了第一步,工作簿的合并。

    8、打开名为“汇总工作簿”的Excel文件,就可以看到多个其他工作簿以多个sheet表的形式合并到了这一个工作簿中。

    第二步:把多张sheet表合并成一张sheet工作表,操作如下:

    1、在“汇总工作簿”中,新建一个sheet页;

    2、在新建的sheet标签上单击右键,选择【查看代码】;

    3、在打开的VBA编辑窗口中粘贴以下代码:

    Sub 合并当前工作簿下的所有工作表()
    Application.ScreenUpdating = False
    For j = 1 To Sheets.Count
    If Sheets(j).Name <> ActiveSheet.Name Then
    X = Range("A65536").End(xlUp).Row + 1
    Sheets(j).UsedRange.Copy Cells(X, 1)
    End If
    Next
    Range("B1").Select
    Application.ScreenUpdating = True
    MsgBox "当前工作簿下的全部工作表已经合并完毕!", vbInformation, "提示"
    End Sub
    
    

     4、保存并关闭VBA编辑器;

    5、在Excel中,找到【宏】,选择【合并当前工作簿下的所有工作表】,点击【执行】

    6、等待运行结束,就完成了多张sheet表合并成一张sheet表的工作。

    总结

    合并工作簿的方法有很多,选择合适的即可,此方法分享仅作为本人学习笔记存在, 希望对其他人有所启发,有所帮助。

    展开全文
  • tkinter简单实现打开/关闭excel工作簿

    千次阅读 2020-04-14 20:59:52
    command=oc.open_excel) b.pack(side=tk.TOP) b1=tk.Button(window,text='关闭工作簿',width=10,height=2,command=oc.close_excel) b1.pack(side=tk.TOP) window.mainloop() 原来button的command后面不仅可以放函数...
  • ExcelVBA从关闭工作簿中取值多种实现方法(代码).doc
  • 在openpyxl对Excel读写操作过程中,发现内存没有马上释放,如果得多次读取大文件,内存爪机,后续代码就无法运行。 尝试:各种wb.save()或者with open等途径无法解决。...del wb,ws #wb为打开的工作表 g...
  • Excel想要编辑或者删除宏,都要先取消隐藏这个PERSONAL的工作簿 今天取消隐藏之后,顺手就关掉了,然后就发现自己保存的宏不见了 解决: 找出文件PERSONAL.XLSB并重新打开即可 解决过程: 在网上找了一番,大概...
  • 在工作中,时常要遇到将许多个工作簿中的数据合并到一个工作表中,一个一个的复制粘贴吧,几个表或者十几个表还行,再多了恐怕就太费时了,如果再多点比如有几十上百个表要合并,而且又催得急可能就不是加加班的...
  • 工作表工作簿规范与限制 http://office.microsoft.com/zh-cn/excel-help/HP010073849.aspx 功能 最大限制 打开的工作簿个数 受可用内存和系统资源的限制 工作表大小 1,048,576 行乘以 16,...
  • Excel获取不同工作簿内相同名称的工作表
  • 关闭工作簿中取值有多种方法现将网上收集的整理向大家共享 HYPERLINK 方法1使用公式 HYPERLINK 方法2使用GetObject函数 HYPERLINK 方法3隐藏Application对象 HYPERLINK 方法4使用ExecuteExcel4Macro方法 ...
  • 各种数据需要导入Excel?多个Excel要合并?目前,Python处理Excel文件有很多库,openpyxl算是其中功能和性能做的比较好的一个。接下来我将为大家介绍各种Excel操作。 新建一个Excel文件 >>> from openpyxl...
  • excel链接隐藏工作表Hiding worksheets can be a simple way to protect data in Excel, or just a way reduce the clutter of a some tabs. Here are a couple very easy ways to hide and unhide worksheets and ...
  • 取消宏则关闭工作簿

    2007-11-10 08:40:19
    excel中打开文件如果用户取消宏则关闭工作簿
  • EXCEL 工作簿工作表加密解密方法。
  • 工作中经常会遇到这样的情况,上级部门在收集了下级部门的Excel工作薄后,需要将信息汇总到一个工作表中,通过复制粘贴的话,这个过程枯燥乏味,如果出错就得不偿失了。Microsoft Excel版本太低,没有那么多的功能来...
  • 本代码源自网络,不知作者是谁。我在分析完代码后,添加了注释,分享给大家,希望对大家有用。直接复制就可以运行了。 '#####################################################################...'一个Excel文件...
  • 1、打开电脑桌面上的Excel2016。 2、打开软件以后,点击界面左上角的设置图标。 3、在当前界面点击位于界面左边的【选项】。 4、点击当前界面左边的【信任中心】设置。 5、进入信任中心选项界面以后,...
  • Excel中如何引用其他的工作表或者工作簿
  • 我相信大多数人都会遇到在编辑excel时还没保存,就小心关闭了,大家都会很着急,今天小编给大家介绍excel文档未保存关闭恢复的方法。在Excel2010中用户可以手动恢复未保存的工作簿,其方法主要有以下三种:方法一...
  • Excel的使用过程中,经常需要引用其他工作簿的数据,而用户往往希望能在打开工作簿或看似打开工作簿的情况下取得其他工作簿中的数据,有以下几种方法可以实现。 1、使用公式 如果需要引用的数据不是太多,...
  • 最近项目中,根据用户要求,需要批量导出Excel(系统里每天产生很多单子,以前都...可是写好之后运行时才发现,导出第一个Excel后,页面就没有反应了,貌似是输出流已关闭,可是不关闭时测试后还是不行。 就开始换个思
  • Excel共享工作簿

    2012-03-07 09:48:10
    Excel中,我们可以设置工作簿的共享来加快数据的录入速度,而且在工作过程中还可以随时查看各自所做的改动。当多人一起在共享工作簿上工作时,Excel会自动保持信息不断更新。在一个共享工作簿中,各个用户可以输入...
  • 2. 关闭全部的工作簿 2.1(这种方法关闭主界面) 找出全部关闭按钮: 点击>自定义访问工具栏(小三角) >其他命令 调出excel选项对话框 将常用命令改为全部命令 找到并单击>...
  • 我有一个excel文件,该excel文件有多个工作表(sheet),因为Linux上使用openoffice转换 失败,所以在本地增加一个功能,就是在本地通过excel软件打开,再另存为html格式, 最后会生成一个html文件和一个files文件夹...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 33,177
精华内容 13,270
关键字:

关闭工作簿不关闭excel