Word cannot save to the Latex or BibTex formats. The following macro will export the bibliography data from Word in it's native xml format. You could then use another macro to convert that to the bip format, but I don't have enough details on that format to do the job.
Code:
Sub SourcesExport()
Dim oSrc As Source, StrSrc As String
With ActiveDocument
.Range.Text = vbNullString
For Each oSrc In Application.Bibliography.Sources
StrSrc = StrSrc & vbCr & oSrc.XML
Next
.Range.InsertAfter StrSrc
.Paragraphs.First.Range.Delete
End With
End Sub
An example of what the output from the above will look like is:
Quote:
<b:Source xmlns:b="http://schemas.openxmlformats.org/officeDocument/2006/bibliography"><b:Tag>The95</b:Tag><b:SourceType>Book</b:SourceType><b:Guid>{A9F88CD0-3296-4707-8F5D-12EAE6681D82}</b:Guid><b:LCID>0</b:LCID><b:Title>The Concise Oxford Dictionary</b:Title><b:Year>1995</b:Year><b:City>Oxford</b:City><b:Publisher>Clarendon Press</b:Publisher><b:RefOrder>1</b:RefOrder><b:Edition>Ninth</b:Edition></b:Source>
|