title: VBA Word error: Requested Member of the Collection Does Not Exist
body: <p>I'm currently trying to write a script using VBA to generate a word document that has sections taken from a defined recordset in access.</p>
  <p>However, I don't quite know how to input a field into the word vba and later reference it to data in access. Currently, I have the code below,</p>
  <p>I managed to insert the field into the word automation, however, I get the error that the member does not exist at the rslet function.</p>
  <pre><code>Private Sub Command1_Click()
  Dim objWord As Word.Application 
  Dim doc As Word.Document 
  Set objWord = CreateObject(&quot;Word.Application&quot;) 
  Dim db As Database 
  Set db = CurrentDb 
  Dim strsql As String 
  strsql = &quot;SELECT Function from Function&quot; 
  Dim rslet As DAO.RecordSet 
  Set rslet = db.OpenRecordset(strsql)
  
  With objWord .Visible = True 
  Set doc = .Documents.Add 
  doc.SaveAs CurrentProject.Path &amp; &quot;\TestDoc1.docx&quot; 
  End With
  
  With objWord 
      .Selection.TypeText Text:=&quot;1.0 Introduction&quot;
      .Selection.TypeParagraph 
      .Selection.TypeText Text:=&quot;1.3 Functions&quot; 
      .Selection.Fields.Add Range:=Selection.Range,
      Type:=wdFieldEmpty, 
      Text:=&quot;F&quot;, PreserveFormatting = FALSE 
      .Selection.TypeParagraph 
   With doc.FormFields(&quot;F&quot;).Result = rslet!Function 
     End With
   End With
  
  doc.Save 
  doc.Activate
  End Sub
  </code></pre>