VBA宏存于独立宏工作簿时如何让代码操作选中的目标文件而非宏本身

你编写的代码仅获取了目标文件的存储路径，没有执行打开目标文件的操作，同时未明确指定操作的工作簿对象。VBA 中直接调用Range方法时，默认指向代码所在的宏工作簿的当前活动工作表，因此只会选中宏文件自身的单元格。

Sub EEBalanceSummary()
    On Error Resume Next
    Dim FilePath As Variant
    Dim targetWb As Workbook
    
    ' 获取用户选择的文件路径，可按需调整支持的文件格式
    FilePath = Application.GetOpenFilename(FileFilter:="Excel文件 (*.xls;*.xlsx;*.xlsm), *.xls;*.xlsx;*.xlsm", Title:="选择要处理的Excel文件")
    
    ' 判断用户是否点击了取消，直接退出程序避免报错
    If FilePath = False Then Exit Sub
    
    ' 打开选中的目标文件并绑定到对象变量
    Set targetWb = Workbooks.Open(FilePath)
    
    ' 明确指定操作目标文件的B6单元格，此处默认操作目标文件的第一个工作表，可按需修改为指定工作表名称，例如Sheets("汇总表")
    targetWb.Sheets(1).Range("B6").Select
    
    ' 后续所有对目标文件的操作都可以通过targetWb对象调用，避免和宏工作簿混淆
    ' --- 下面补充你的其他业务操作逻辑 ---
    
End Sub

• 把FilePath的类型调整为Variant，适配用户点击「取消」时返回的布尔值False，增加取消选择的判断逻辑，避免无效操作报错
• 新增targetWb工作簿对象变量，绑定打开的目标文件，所有针对目标文件的操作都通过该对象调用，彻底避免和宏工作簿的操作范围混淆
• 调用Range时明确指定所属的工作簿、工作表，消除VBA默认范围的歧义

内容的提问来源于stack exchange，提问作者Zain Lakdawala