Excel VBA激活窗口没有文件名,原因是xltm模板

时间:2018-01-03 17:09:26

标签: excel vba templates window activation

我想使用Excel模板XLTM。我想插入一些我从另一个Excel文件中复制的信息。 打开另一个文件并复制信息很简单,但是重新激活第一个Excel文档就是我遇到麻烦的地方。

如果我将模板存储为xlsm,我可以在宏中使用该文件名,它可以正常工作。但是我想使用XLTM,以便人们不会意外地覆盖模板。

因此,在返回文件时,它尚未保存,因此没有明确的文件名。 有没有办法重新激活基于我的xlmt文件的窗口?

只要我的模板是 Template.xlsm ,下面的宏工作正常。但我想使用一个实际的xltm文件作为模板。 这甚至可能吗?

Sub Update()
'
' Kampagnen Updaten
'
    Workbooks.Open Filename:= _
        "M:\Client\0001Jobs\2018\V11857Test\Special_campaigns.xlsx" _
        , UpdateLinks:=0
    Range("A3:A90").Select
    Selection.Copy
    Windows("Template.xlsm").Activate
    Sheets("Dropdown").Visible = True
    Sheets("Dropdown").Select
    Range("E2").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Range("E1").Select
    Sheets("Dropdown").Select
    ActiveWindow.SelectedSheets.Visible = False
    Sheets("Template").Select

    Windows("Special_campaigns.xlsx").Activate
    ActiveWindow.Close

End Sub

0 个答案:

没有答案