无法使用VB脚本添加两次相同的对象

Question

我正在尝试使用VB脚本在Excel中添加对象，但是在插入第一个对象后，它会给出1004错误，说明文件仍处于打开状态。我正在使用的VB脚本发布在下面。请建议我如何调试它。

    Sub Macro2()
    '
    ' Deepak Macro
    '

    '

        Range("H2").Select
        ActiveSheet.OLEObjects.Add(Filename:="C:\localhost.localdomain.csv", Link:=False, DisplayAsIcon _
            :=True, IconFileName:= _
            "C:\Program Files (x86)\Internet Explorer\iexplore.exe", IconIndex:=13, _
            IconLabel:="C:\localhost.localdomain.csv").Select

        Range("H3").Select
        ActiveSheet.OLEObjects.Add(Filename:="C:\localhost.localdomain.csv", Link:=False, DisplayAsIcon _
            :=True, IconFileName:= _
            "C:\Program Files (x86)\Internet Explorer\iexplore.exe", IconIndex:=13, _
            IconLabel:="C:\localhost.localdomain.csv").Select

    End Sub