Excel-VBA-加載項-工作表

Question

我第一次創建了一個Excel宏“加載項”。 因此，現在我可以使用工作簿頂部的快速鏈接在多個工作簿中使用相同的宏。

我的問題是我的宏的第一個命令是在工作表“ Sheet1”中添加。 我的工作簿當前有2張紙。 “損耗2017”和“損耗2018”。

當我第一次添加“ Sheet1”時，什么也沒發生，因此我的工作簿其余部分都出錯了。 我第二次瀏覽它時說“ Sheet1”已經存在。 這是我打開的唯一工作簿。 我嘗試了很多工作表名稱。 它會不斷將工作表添加到未知位置，然后指出它們已經存在。 我的其余代碼與外接程序一起使用。

不使用外接程序功能時，我在工作表中添加的代碼有效。 這里是。

Dim ws As Worksheet
    With ThisWorkbook
        Set ws = .Sheets.Add(After:=.Sheets(.Sheets.Count))
        ws.Name = "Sheet1"
    End With

Answer 1

ThisWorkbook是運行代碼的工作簿-在本例中為您的加載項。

您可能需要在這里使用ActiveWorkbook