VBA代碼列出Excel中的所有加載項
在Excel中，您可以添加或插入一些加載項以更好地處理數據。 眾所周知，我們可以轉到“選項”窗口查看所有加載項，但是有什么方法可以在工作表中列出所有加載項？ 現在，在本教程中，它提供了VBA代碼，用于列出Excel中的所有插件。
1。 按 Alt + F11鍵 鍵以啟用“ Microsoft Visual Basic應用程序”窗口。
2。 點擊 插頁 > 模塊，然后將以下代碼粘貼到空白腳本中。
VBA：列出所有加載項
Public Sub AllAddins()UpdatebyKutools20191031Dim xWSh As WorksheetDim xWB As WorkbookDim xAddin As AddInDim xCOMAddin As COMAddInDim xFA, xFCA As IntegerDim xI As IntegerDim xStr As StringOn Error Resume NextApplication.Displayalerts = FalsexStr = "Addins List"Set xWB = Application.ActiveWorkbookSet xWSh = xWB.Worksheets.Item(xStr)If Not xWSh Is Nothing ThenxWSh.DeleteEnd IfSet xWSh = xWB.Worksheets.AddxWSh.Name = xStrxWSh.Range("A1").Value = "Name"xWSh.Range("B1").Value = "FullName"xWSh.Range("C1").Value = "Installed"For xFA = 1 To Application.AddIns.CountSet xAddin = Application.AddIns(xFA)xI = xFA + 1Range("A" & xI).Value = xAddin.NameRange("B" & xI).Value = xAddin.FullNameRange("C" & xI).Value = xAddin.InstalledNext xFAxFA = (xFA + 2)xWSh.Range("A" & xFA).Value = "Description"xWSh.Range("B" & xFA).Value = "progID"xWSh.Range("C" & xFA).Value = "Connect"For xFCA = 1 To Application.COMAddIns.CountxI = xFCA + xFASet xCOMAddin = Application.COMAddIns(xFCA)Range("A" & xI).Value = xCOMAddin.DescriptionRange("B" & xI).Value = xCOMAddin.progIDRange("C" & xI).Value = xCOMAddin.ConnectNext xFCAApplication.Displayalerts = TrueEnd SubCopy3。 按 F5
要運行該代碼，請創建一個名為Addins List的工作表，其中包含所有加載項。
其他操作（文章）在Excel啟動時禁用加載項您可能已經在Microsoft Excel中安裝了一些加載項，但是現在您需要在Excel啟動時禁用指定的加載項。 如何解決這個問題呢？ 本文中的方法可以為您提供幫助。
將每個工作表導出并保存為Excel中單獨的新工作簿假設您要導出一個或多個工作表并將其另存為新工作簿，您將如何處理？ 通常，您可以復制每個工作表并粘貼到新工作簿中。 但是在這里，我們為您帶來一些方便的技巧來應對它：
插入另一個工作簿中的工作表有時您可能需要從其他工作簿中導入工作表。 如果將工作表的內容復制并粘貼到當前工作簿中，它將丟失某些格式設置樣式，例如行高等。本文介紹了一些便捷的方法，可從其他工作簿中快速插入工作表，而不會丟失數據和格式設置樣式。
更多文章
