The error is Run-time error '5825': Object has been deleted
Private Sub Document_New() Dim zipCity As String zipCity = ActiveDocument.Variables("Kunde_adr1") Dim lenVar As Integer lenVar = Len(zipCity) Dim city As String city = Mid(zipCity, 9, lenVar) ActiveDocument.Bookmarks("bimCity").Range.Text = city End Sub
Gain unlimited access to on-demand training courses with an Experts Exchange subscription.Get Access
When asked, what has been your best career decision?
Deciding to stick with EE.
Being involved with EE helped me to grow personally and professionally.