verbindingen verwijderen

[alfa911]

Goedemiddag,

Ik heb in een excel file twee verbindingen staan die ik niet kan verwijderen.
Deze verbindingen zijn te vinden bij gegevens--> verbindingen----> verwijderen

Als je deze verbindingen aanklik en op verwijder druk gebeurt er niets.
Wie weet hier een oplossing voor??

Alvast bedankt.

 

[HSV]

En als je deze code eenmalig draait?

Sub deleteConnections()
Dim cn As Object
For Each cn In ThisWorkbook.Connections
    cn.Delete
Next
End Sub

 

[alfa911]

Bedankt voor uw reactie, ik heb deze code in This Workbook gezet, maar twee verbindingen blijven erin staan. Ze verwijzen naar een niet meer bestaande file.

 

[Cobbe]

Je moet die code in een module zetten en runnen.
Je kan ze ook laten staan in ThisWorkbook maar je dient ze in elk geval te runnen, via F8 of F5

 

[alfa911]

Ok, dank je, de procedure laten runnen met F5 of F8 snap ik helaas niets van.

 

[Cobbe]

Ga met de cursor op 'Sub DeleteConnections() staan.
Druk dan de toets F5 --> zo wordt de code helemaal uitgevoerd en zouden uw connecties moeten verdwenen zijn.

 

[alfa911]

Getest, maar er gebeurt niets

 

[Cobbe]

Post dat bestand (nadat je de gevoelige gegevens hebt vervangen) eens.

 

[alfa911]

Hallo, ben 1 van de verbinding kwijt, de andere nog niet. Komt vast goed.

Bedankt.