要解决这个问题，我们可以按以下步骤操作：

1. 打开一个新的Word文档并启用宏功能。
2. 在VB编辑器中创建一个新的模块，用于写入宏代码。
3. 在宏代码中编写程序，以从所需的Excel工作表中读取数据并将其放入Word文档中。下面是一个示例代码：

Sub DataFromExcel() Dim xlApp As Object Dim xlWB As Object Dim xlSheet As Object Dim wdDoc As Document Set wdDoc = ActiveDocument Set xlApp = CreateObject("Excel.Application") Set xlWB = xlApp.Workbooks.Open("Path\To\Your\Excel\File.xlsx") Set xlSheet = xlWB.Sheets("Sheet1") wdDoc.Content.InsertAfter xlSheet.Range("A1").Value xlWB.Close xlApp.Quit Set xlSheet = Nothing Set xlWB = Nothing Set xlApp = Nothing End Sub

4. 通过设计一个自适应的宏，来动态地根据需要从不同的Excel工作表中提取数据。
5. 将Word文档保存，并在需要时运行该宏即可。

希望这个解决方法能够帮助你编写一个可以从各种Excel工作表中提取数据的带宏的Word报告。