Delete all data connections in Word document

[Pida]

Hey girls and guys!
I have a word file which has many graphs and tables from excel, which are connected to the word document. I am looking for a word macro that would delete all these data connections.
Does anybody know how to solve that in Word 2010?
Thanks, Petr

[macropod]

You could use Ctrl-A, Ctrl-Shift-F9 to convert all fields to their results. If you have embedded Objects (e.g. Excel) with cells linked to external workbooks, those would have to be break those links separately.

[Pida]

Thanks, that works fine, but it kills all data connections, including tables numbering, table of contents, cross references... I just need to unlink "external" connections - only the ones from Excel, which are input (source) of data in the tables in my Word file. Do you think it's possible to kill only Excel connections?
The macro so far looks like:

Please Login or Register  to view this content.

[macropod]

Your macro would do the same as Ctrl-A, Ctrl-Shift-F9. Try:

Please Login or Register  to view this content.

[Pida]

It keeps numbering of tables and the table of contents, that's great, but it also disconnects cross-references... would you please have any solution for that? Thank you

[macropod]

You could try replacing:
If Not .LinkFormat Is Nothing Then .Unlink
with:
If Not .OLEFormat Is Nothing Then .Unlink
otherwise:
If (.Type = wdFieldDatabase) Or _
(.Type = wdFieldImport) Or _
(.Type = wdFieldInclude) Or _
(.Type = wdFieldIncludePicture) Or _
(.Type = wdFieldIncludeText) Or _
(.Type = wdFieldLink) Then .Unlink

[Pida]

Absolutely great thanks for your time Macropod!