Try the following on a _copy_ of your document. AFAIK it unlinks all fields
in a document, regardless of whether they are in the body of the document or
elsewhere. Please report back on your results.

Sub FieldsUnlinkAllStory()
'   All Story Field Unlinker
'   Written by Charles Kyle Kenyon
'   repaired with help from Jezebel 10 December 2004
   Dim oStory As Range
   On Error Resume Next
   For Each oStory In ActiveDocument.StoryRanges
       Do
           oStory.Fields.Unlink
           Set oStory = oStory.Next
       Loop Until oStory Is Nothing
   Next
End Sub

Not sure what you're getting at with the 'float' issue. As I understand it,
currently your document has some 250  { LINK .... } fields, each connected
to a graphic. You need to replace these fields with the same graphic
embedded. The fact that the graphic is floating is largely irrelevant (it
just means you're working with the Shapes collection rather than
InlineShapes).

This is doable by macro, but it's tricky to say the least. Roughly: iterate
the Shapes collection. For each one, store the size and position properties;
find the corresponding LINK field to get the filename; delete the field and
insert the graphic from file (ie, add it to the Shapes collection) and set
the size and position properties.

On balance, I think you're probably better doing it manually. It'll take a
day or so, but writing a macro that does this effectively will likely take
most of a day and you would still need to edit the document to fix the ones
that go wrong. At least by doing it manually you know the task is finite
(even if infinitely tedious). Find a teenager who needs to earn some pocket
money.

If you don't have any other fields in the document, you can Ctrl+A,
Ctrl+Shift+F9. This command will unlink all fields, however.