none
如何实现同时关闭其他多个excel 窗口? RRS feed

 > 

答案

  • Question
    登录进行投票
    0
    登录进行投票

    可以用VBA来完成。例如下面的代码，其中“sx1.xlsm”指定为不希望关闭的工作簿名称。

     

    Sub 关闭多个工作簿()
    Dim wkb As Workbook
    For Each wkb In Workbooks
        If wkb.Name <> "sx1.xlsm" Then
            wkb.Close True
        End If
    Next wkb
End Sub

     

    不前进只有被淘汰
    2010年4月8日 2:33
    |
    版主

全部回复

  • Question
    登录进行投票
    0
    登录进行投票

    好像只能一个一个关吧/

    ERP系统论坛http://www.cio6.com
    2010年4月7日 2:44
    |
  • Question
    登录进行投票
    0
    登录进行投票
    你用我们的插件 Office Tab 就可以实现关闭多个 excel 文件.
    2010年4月7日 6:42
    |
  • Question
    登录进行投票
    0
    登录进行投票

    可以用VBA来完成。例如下面的代码，其中“sx1.xlsm”指定为不希望关闭的工作簿名称。

     

    Sub 关闭多个工作簿()
    Dim wkb As Workbook
    For Each wkb In Workbooks
        If wkb.Name <> "sx1.xlsm" Then
            wkb.Close True
        End If
    Next wkb
End Sub

     

    不前进只有被淘汰
    2010年4月8日 2:33
    |
    版主