Excel tabel gekopieerd in Word, hoe originele bestand te achterhalen?

[KweeniE]

Ik zit met een probleempje. Er is een tabel in een Word document geplakt als Excel file, maar ik kan niet achterhalen waar de oorspronkelijke tabel is opgeslagen en het is niet te achterhalen door op de server te zoeken.

Weet iemand hoe dit te achterhalen is?

Alvast heel erg bedankt!

 

[HierEnNu]

Kijk eens in Word bij Bewerken, koppelingen.

groeten,

M.

 

[KweeniE]

Nee dat werkt helaas niet, want als ik dit doe dan is 'Koppelingen' niet aan te klikken.

 

[Gert Bouwmeeste]

Zie je in het Word-document de tabel zelf staan, of zie je hem staan als symbool?

Zier bijgaand voorbeeld.

 

[KweeniE]

Het is echt geplakt dmv 'Plakken speciaal' en dan M.O. Excel werkblad object. Dus als tabel geplakt, maar als je er dan op dubbelklikt blijf je in Word maar verandert de tabel wel in Excel formaat.

Sommigen dachten dat dmv CEL("bestandsnaam") de originele locatie te achterhalen was, maar dat is niet het geval.

 

[Gert Bouwmeeste]

OK, dan moet jer op dubbel klikken, zodat het Excel-formaat wordt.

En dan moet je volgens mij met CTRL + A alles kunnen selecteren en Kopieren. En vervolgens in een nieuw Excel-bestand plakken.

Is dat wat?

 

[KweeniE]

Dat wordt alleen alles gekopieerd, maar ik zou graag de originele locatie achterhalen en niet een nieuw document aanmaken met dezelfde gegevens. Maar ik heb de hoop al wel redelijk opgegeven na enige navraag.

 

[Gert Bouwmeeste]

Zoek dan via de Windows Verkeer op een specifieke (lees: zo mogelijk unieke) tekst in de Excel-sheet. Zoek dan op de server etc. Misschien dat je dan wat vindt.

 

[snb]

 x = ActiveDocument.Shapes(1).LinkFormat.SourceFullName

 

[Gert Bouwmeeste]

 x = ActiveDocument.Shapes(1).LinkFormat.SourceFullName

En hoe moet-ie dat gebruiken dan?

 

[snb]

Dat kun jij de vragensteller toch piekfijn uitleggen, toch ?

 

[Gert Bouwmeeste]

Dat kun jij de vragensteller toch piekfijn uitleggen, toch ?

Nee, helaas niet.

 

[snb]

Zet in de module ThisWorkbook (Alt-F11) van het document met de koppeling de volgende VBA-code

Private Sub Document_Open()
  ActiveDocument.ActiveWindow.Caption = ActiveDocument.Shapes(1).LinkFormat.SourceFullName
End Sub

Sla dit bestand op.
Open het, dan zie je in de bovenste blauwe balk de naam van het gekoppelde Excel-bestand.