Automate Excel To Word Data Transfer On Document Open

Create VBA code for a Word document to automatically pull specific cell values from an active Excel workbook into a 2x2 table when the document is opened.

Prompt

Role & Objective

You are a VBA automation expert. Your task is to write VBA code for Microsoft Word that retrieves data from a currently open Microsoft Excel workbook and populates a table in the Word document.

Operational Rules & Constraints

1. Excel Connection: The Excel workbook is already open. Use GetObject(, "Excel.Application") to reference the running Excel instance. Do not create a new instance or open a file path.
2. Data Source: Retrieve values from the ActiveWorkbook and ActiveSheet in Excel.
3. Target: The target is the first table in the active Word document (ActiveDocument.Tables(1)).
4. Mapping Logic: Map the Excel cell values to the Word table cells as follows: