The simple answer is yes. By opening the document with your code you make it the active document, which you then close in the next line and try to activate in the next, and this fails because the document is no longer open. Microsoft Office 2010 is released as a successor to Microsoft Office 2007. Office 2010 version was better than Office 2007. It has an improved user interface which included a backstage view.

See solution in other versions of Excel: • • • • • How to open the VBA environment You can access the VBA environment in Excel 2010 by opening the Microsoft Visual Basic for Applications window. First, be sure that the Developer tab is visible in the toolbar in Excel. The Developer tab is the toolbar that has the buttons to open the VBA editor and create Form/ActiveX Controls like buttons, checkboxes, etc. To display the Developer tab, click on File in the menu bar and select Options from the drop down menu. When the Excel Options window appears, click on the Customize Ribbon option on the left. Click on the Developer checkbox under the list of Main Tabs on the right.

Then click on the OK button. Select the Developer tab from the toolbar at the top of the screen. Then click on the Visual Basic option in the Code group. Now the Microsoft Visual Basic editor should appear and you can view your VBA code.

Rx7 izotope for mac free download. Code: Sub PreserveMailMergeFormFieldsNewDoc() Dim fFieldText() As String Dim iCount As Integer Dim fField As FormField Dim sWindowMain, sWindowMerge As String On Error GoTo ErrHandler ' Store Main merge document window name. SWindowMain = ActiveWindow.Caption ' Because the document contains form fields, ' it should be protected, so unprotect document. If ActiveDocument.ProtectionType wdNoProtection Then ActiveDocument.Unprotect End If ' Loop through all text form fields ' in the main mail merge document. For Each aField In ActiveDocument.FormFields ' If the form field is a text form field.

If aField.Type = wdFieldFormTextInput Then ' Redim array to hold contents of text field. ReDim Preserve fFieldText(2, iCount + 1) ' Place content and name of field into array. FFieldText(0, iCount) = aField.Result fFieldText(1, iCount) = aField.Name fFieldText(2, iCount) = aField.TextInput.Default ' Select the form field. AField.Select ' Replace it with placeholder text. Selection.TypeText ' ' Increment icount iCount = iCount + 1 End If Next aField ' Perform mail merge to new document. ActiveDocument.MailMerge.Destination = wdSendToNewDocument ActiveDocument.MailMerge.Execute ' Find and Replace placeholders with form fields.