用VBA自定义ArcMap，执行Clip时出现automation error

Question

我所做的Clip就是两个图层叠在一起，切出公共部分并存到一个新图层里，但是运行时总会提示错误，Run-time error '-2147467259(80004005)':
Automation error
Unspecified error代码如下：
    Dim pGP As IGeoProcessor
    Set pGP = New GeoProcessor
    
    Dim pGPResults As IGeoProcessorResult
    Set pGPResults = pGP.Execute("Clip_analysis", pParams, Nothing)  ‘出错代码    不知道是不是因为Arcmap缺少什么东西，诸位帮帮忙啊，小妹不胜感激~~~~~

Answer 1

补充一下，这个代码在别的电脑的Arcmap里是可以正常运行的