嘿，我完全懂你的痛点——手动在Word里做150个下拉选项简直是噩梦！下面给你几个实用的方法，直接复用Excel里现成的下拉和VLOOKUP功能，不用再来回切换文件：

方法一：嵌入Excel对象（最省心，直接保留交互） #

这个方法能让你在Word里直接操作Excel的下拉列表，VLOOKUP结果自动更新，而且不用跳回原Excel文件：

• 先在Excel里选中包含下拉列表和VLOOKUP结果的单元格区域（比如你选港口的单元格+显示地址的单元格），按Ctrl+C复制。
• 切换到Word文档，找到要放置的位置，右键点击，在粘贴选项里选「嵌入」（就是那个带Excel图标的选项）。
• 现在你看到的是一个嵌入的Excel小表格，双击它就能直接在Word里操作下拉列表，选完港口后地址会自动出来！
• 要锁定位置的话，右键点击这个嵌入对象，选「设置对象格式」，在「布局」选项卡下选择「嵌入型」（或者你需要的环绕方式），这样它就会固定在当前位置，不会随便乱跑。

方法二：链接Excel对象（同步原Excel文件的更新） #

如果你希望Word里的下拉列表能跟着原Excel文件的数据源同步更新，就用这个方法：

• 同样选中Excel里的目标区域复制。
• 在Word里右键，选粘贴选项里的「链接与保留源格式」（带链条图标的那个）。
• 现在点击下拉列表就能直接在Word里选择港口，VLOOKUP结果自动更新；而且如果原Excel里的港口列表或地址改了，Word里的链接对象会自动同步变化。
• 锁定位置的操作和方法一一样，右键设置对象格式调整布局就行。

方法三：用Word控件关联Excel数据（更贴合Word原生体验） #

如果不想看到Excel的嵌入框，想让控件更像Word原生内容，可以试试这个（需要一点点VBA操作，代码直接抄就行）：

1. 先给Excel数据源命名：选中Excel里的港口列表区域，在顶部的「名称框」里输入一个名字（比如PortList），回车确认。
2. 调出Word的开发工具：点击「文件」→「选项」→「自定义功能区」，勾选「开发工具」，这样顶部就会出现这个选项卡。
3. 插入下拉控件：点击「开发工具」→「控件」组里的「下拉列表内容控件」，把它放到Word里合适的位置。
4. 导入Excel的港口选项：选中这个下拉控件，点击「开发工具」→「属性」，在弹出的窗口里点击「添加」→「从其他数据源获取」，找到你的Excel文件，选择刚才命名的PortList区域，导入所有港口选项。
5. 添加地址显示控件并写宏：再插入一个「文本内容控件」（用来显示地址），然后点击「开发工具」→「宏」，新建一个宏，命名为UpdatePortAddress，粘贴下面的代码（记得把路径和工作表名改成你自己的）：

Sub UpdatePortAddress()
    Dim portName As String
    Dim xlApp As Object
    Dim xlWB As Object
    Dim ws As Object
    
    ' 获取下拉控件选中的港口名称（这里假设下拉控件的标题是"PortDropdown"，可以在控件属性里设置）
    portName = ActiveDocument.SelectContentControlsByTitle("PortDropdown")(1).Range.Text
    
    ' 打开Excel文件
    Set xlApp = CreateObject("Excel.Application")
    Set xlWB = xlApp.Workbooks.Open("C:\你的文件路径\港口列表.xlsx") ' 替换成你的Excel文件路径
    Set ws = xlWB.Sheets("Sheet1") ' 替换成你的工作表名称
    
    ' 用VLOOKUP获取地址并写入文本控件（假设港口在A列，地址在B列）
    ActiveDocument.SelectContentControlsByTitle("PortAddress")(1).Range.Text = xlApp.WorksheetFunction.VLookup(portName, ws.Range("A:B"), 2, False)
    
    ' 关闭Excel，清理对象
    xlWB.Close SaveChanges:=False
    xlApp.Quit
    Set xlApp = Nothing
End Sub

6. 关联宏和下拉控件：回到下拉控件的属性窗口，在「退出时运行宏」的下拉菜单里选择UpdatePortAddress，这样你选完港口后，地址就会自动显示在文本控件里了。

小提醒 #

之前你粘贴后点击会跳回Excel，是因为选了普通的「粘贴链接」，而不是上面说的「嵌入」或「链接与保留源格式」，换个粘贴选项就解决啦！

备注：内容来源于stack exchange，提问作者John DP