Note: The other languages of the website are Google-translated. Back to English
Inloggen  \/ 
x
or
x
Registreer  \/ 
x

or

Een VBA-code om alle invoegtoepassingen in Excel weer te geven

In Excel kunt u enkele invoegtoepassingen toevoegen of invoegen om beter met gegevens om te gaan. Zoals we weten, kunnen we naar het venster Opties gaan om alle invoegtoepassingen te bekijken, maar is er een manier om alle invoegtoepassingen in een blad weer te geven? In deze zelfstudie biedt het nu een VBA-code voor het weergeven van alle invoegtoepassingen in Excel.

1. druk op Alt + F11 toetsen om het Microsoft Visual Basic for Applications-venster in te schakelen.

2. klikken Invoegen > Moduleen plak onderstaande code in het lege script.

VBA: maak een lijst van alle invoegtoepassingen

Public Sub AllAddins()
'UpdatebyKutools20191031
Dim xWSh As Worksheet
Dim xWB As Workbook
Dim xAddin As AddIn
Dim xCOMAddin As COMAddIn
Dim xFA, xFCA As Integer
Dim xI As Integer
Dim xStr As String
 
On Error Resume Next
Application.DisplayAlerts = False
xStr = "Addins List"
Set xWB = Application.ActiveWorkbook
Set xWSh = xWB.Worksheets.Item(xStr)
If Not xWSh Is Nothing Then
    xWSh.Delete
End If
Set xWSh = xWB.Worksheets.Add
xWSh.Name = xStr
xWSh.Range("A1").Value = "Name"
xWSh.Range("B1").Value = "FullName"
xWSh.Range("C1").Value = "Installed"
For xFA = 1 To Application.AddIns.Count
    Set xAddin = Application.AddIns(xFA)
    xI = xFA + 1
    Range("A" & xI).Value = xAddin.Name
    Range("B" & xI).Value = xAddin.FullName
    Range("C" & xI).Value = xAddin.Installed
Next xFA
xFA = (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.Count
    xI = xFCA + xFA
    Set xCOMAddin = Application.COMAddIns(xFCA)
    Range("A" & xI).Value = xCOMAddin.Description
    Range("B" & xI).Value = xCOMAddin.progID
    Range("C" & xI).Value = xCOMAddin.Connect
Next xFCA
Application.DisplayAlerts = True
End Sub

doc lijst alle toe te voegen in 1

3. druk op F5 sleutel om de code uit te voeren, is er een blad met de naam Addins List gemaakt met alle add-ins.
doc lijst alle toe te voegen in 2


Andere bewerkingen (artikelen)

Schakel invoegtoepassingen uit bij het opstarten van Excel
Mogelijk hebt u enkele invoegtoepassingen in uw Microsoft Excel geïnstalleerd, maar nu moet u een opgegeven invoegtoepassing uitschakelen bij het opstarten van Excel. Hoe los je dit probleem op? De methode in dit artikel kan u helpen.

Exporteer en bewaar elk werkblad als een aparte nieuwe werkmap in Excel
Stel dat u een of meerdere werkbladen wilt exporteren en opslaan als een nieuwe werkmap, hoe gaat u daarmee om? Normaal gesproken kunt u elk werkblad kopiëren en in een nieuwe werkmap plakken. Maar hier brengen we je enkele handige trucs om ermee om te gaan:

Voeg werkbladen in vanuit een andere werkmap
Soms moet u werkbladen uit andere werkmappen importeren. Als u de inhoud van de werkbladen kopieert en in de huidige werkmap plakt, verliest het enkele opmaakstijlen, zoals rijhoogte, enz. Dit artikel beschrijft enkele handige manieren om snel werkbladen uit andere werkmappen in te voegen met verlies van gegevens en opmaakstijlen.



  • Super Formula-balk (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken in gefilterd bereik...
  • Voeg cellen / rijen / kolommen samen en het bewaren van gegevens; Gespleten cellen inhoud; Combineer dubbele rijen en som / gemiddelde... Voorkom dubbele cellen; Vergelijk Ranges...
  • Selecteer Dupliceren of Uniek Rijen; Selecteer lege rijen (alle cellen zijn leeg); Super zoeken en fuzzy zoeken in veel werkboeken; Willekeurige selectie ...
  • Exacte kopie Meerdere cellen zonder de formuleverwijzing te wijzigen; Maak automatisch verwijzingen naar meerdere bladen; Plaats kogels, Selectievakjes en meer ...
  • Favoriete formules en snel invoegen, Bereiken, grafieken en afbeeldingen; Versleutel cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Extraheer tekst, Tekst toevoegen, Verwijderen op positie, Ruimte verwijderen; Paging-subtotalen maken en afdrukken; Converteren tussen celinhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerd sorteren per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Draaitabel groeperen op weeknummer, dag van de week en meer ... Toon ontgrendelde, vergrendelde cellen door verschillende kleuren; Markeer cellen met formule / naam...
kte tabblad 201905
  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert elke dag honderden muisklikken voor u!
officetab onderkant
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.