• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

koppeling verwijderen met behoud van formules

Status
Niet open voor verdere reacties.
S

Symphysodon

Gebruiker
Lid geworden
14 dec 2012
Berichten
468
Weet iemand hoe ik koppelingen naar andere werkbladen kan verwijderen met behoud van formules?
Ik dacht dat het met asap mogelijk was maar daar kan ik het niet meer vinden. Er is wel een optie maar die verwijdert de koppeling en vervangt de formule door het resultaat.

Met
Code: 
Sub M_snb()
    For Each it In ThisWorkbook.LinkSources
         ThisWorkbook.BreakLink it, 1
    Next
End Sub

krijg ik een foutmelding: 429: ActiveX-onderdeel kan geen object maken.

Mocht het nodig zijn dan maak ik een voorbeeldbestand.
 
Laatst bewerkt door een moderator:
Een representatief voorbeeldbestand kan nooit kwaad ;)
 
Heb je al in het tabblad Gegevens -> Koppelingen bewerken geprobeerd?
 
Koppeling bewerken is koppeling verbreken waarbij de gegevens geconverteerd worden naar bestaande waarden. Ik wil juist dat de formules behouden blijven.

Zoeken en vervangen werkt niet (of niet meer). Met het zoeken naar de koppeling (voor tenminste het eerste gedeelte) en het vervangen door een spatie krijg je een foutmelding.
 
In de bijlage twee voorbeeld bestanden
 

Bijlagen

  • uitvoerbestand verwijderen koppelingen.xlsm
    16,8 KB · Weergaven: 37
  • Bronbestand koppelingen verwijderen.xlsm
    14,2 KB · Weergaven: 31
Na zoeken en vervangen van
Code: 
H:\Excel\VBA\vragen aan forum\[Bronbestand koppelingen verwijderen.xlsm]
door een spatie werkt alles prima bij mij..
 
Vreemd: ik krijg een foutmelding: Er is een probleem met deze formule. ...


Dit is wat ik gedaan heb:

Ctrl+H

Zoeken naar: '[Bronbestand koppelingen verwijderen.xlsm]
Vervangen door:
 
met zoeken en vervangen is het toch gelukt:

zoeken naar: '[Bronbestand koppelingen verwijderen.xlsm]c'!

vervang door: c!

Het blijft alleen bewerkelijk door de vele tabbladen die ik vaak heb.
 
Jij haalt ook het eerste '-teken weg. Die moet je laten staan bij zoeken en vervangen...

Als je op "opties" klikt kun je ook aangeven dat je in de werkmap alles wilt zoeken en vervangen, en niet alleen binnen het tabblad.
 
Laatst bewerkt:
Het gaat niet zozeer over het zoeken in tabbladen, maar over het aantal bronbestanden. In het voorbeeld is het er maar 1 maar het kunnen er heel veel zijn.
 
Aha. Misschien nog een optie om te zoeken en vervangen met als parameter:
Code: 
H:\*.xlsm]
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan