ich möchte alle im Menü Daten Verbindungen stehenden "Verbindungen*" löschen.
Ich hatte das unten stehende Marco gefunden und umgeändert.
Leider bekomme ich eine Fehlermeldung "Typen" unverträglich, Laufzeitfehler 13.
Wo liegt mein Problem ?
Gruß Dieter
Sub Verbindungen_löschen()
Dim n As Name
For Each n In ThisWorkbook.Connections
If n.Name Like "*Verbindung*" Then n.Delete
Next
End Sub