Link word form to excel

I am an IT personnel in a coaching institute. I designed a form on word long ago through which we'd enter the details of the ones coming to get admission. Afterwards, when the number of students in a batch well crossed the limit where we can easily keep track of them, i designed an excel database. Now the only problem left is to devise开发者_开发技巧 a way through which i can copy the contents of the form field and link that to the database. Hope i get something, an easier VBA thing would be fine as well

---

You could do this with vba with this kind of code (use it from your Excel db to load Word docs):

Sub DataFrom()

'Remember: this code requires a reference to the Word object model

Dim wdApp As New Word.Application
Dim wdDoc As Word.Document
Dim fName As String
Dim i As Long, Rw As Long

ChDir ActiveWorkbook.Path

With Application.FileDialog(msoFileDialogOpen)
  .AllowMultiSelect = False
  .Filters.Add "Word", "*.doc", 1
  .Show
  On Error GoTo Exits
  fName = .SelectedItems(1)
End With

Set wdDoc = wdApp.Documents.Open(fName)

Rw = Cells(Rows.Count, 1).End(xlUp).Row + 1
Cells(Rw, 1) = Cells(Rw - 1, 1) + 1
i = 1
For Each f In wdDoc.FormFields
  i = i + 1
  On Error Resume Next
  Cells(Rw, i) = f.Result
Next
Exits:
End Sub