title: Insert a lot of fields into a word document
body: <p>I have the following code:</p>
  
  <pre><code>Application.ScreenUpdating = false
  Set rng = Application.Selection.Range
  
  For i = 0 To 25000
      ActiveDocument.Fields.Add rng, WdFieldType.wdFieldExpression, "1+2", False
  Next i
  
  Application.ScreenUpdating = true
  </code></pre>
  
  <p>Is there a way to further increase its performance?</p>
  
  <p>(Noticed that if I would hide the application <code>Application.Visible = false</code> its faster but I don't really want do that)</p>
  
  <p>(The amount is an edge case, but I would still like to make it plausible and currently, it's taking around 30 minutes to complete, which no user will wait)</p>