问题描述

配置好PADS打开PCB文件导出带坐标BOM时,有时候会出现“ActiveX Automation: server could not be found.”的问题,导致无法成功导出BOM的表格文件,错误提示截图如下:

PADS使用WPS导出坐标文件 PCB导出BOM提示ActiveX Automation: server could not be found失败解决办法-编程之家

解决办法

导致上述问题的原因是在我们配置导出带坐标的BOM的脚本时,默认使用的是微软的Excel工具,而电脑上安装的却是WPS,所以就会出现上述所示的错误。

 

知道原因之后,相应的就有如下两种解决方法:

1.下载office办公软件并安装,安装成功之后就可以用PADS成功导出BOM文件了。

2.想继续使用WPS软件,不想去安装office办公软件,这个时候就需要修改我们配置生成的脚本文件了,用PADS打开PCB文件,然后按照下面截图操作:PADS使用WPS导出坐标文件 PCB导出BOM提示ActiveX Automation: server could not be found失败解决办法-编程之家

 

弹出如下提示框:PADS使用WPS导出坐标文件 PCB导出BOM提示ActiveX Automation: server could not be found失败解决办法-编程之家

 

选择我们之前配置生成的“Assembly Option Part Report”文件(根据你配置生成时设置的文件名来定,不一定都是这个),然后点击右侧的“Edit”,就会弹出该配置文件的源码,在源码中,我们可以找到如下截图的地方:

PADS使用WPS导出坐标文件 PCB导出BOM提示ActiveX Automation: server could not be found失败解决办法-编程之家

将上面红圈圈中的地方进行修改,将原来的:

Sub ExportToExcel

FillClipboard

Dim xl As Object

On Error Resume Next

Set xl = GetObject(,”Excel.Application”)

On Error GoTo ExcelError ‘ Enable error trapping.

If xl Is Nothing Then

Set xl = CreateObject(“Excel.Application”)

End If

修改为:

Sub ExportToExcel

FillClipboard

Dim xl As Object

On Error Resume Next

Set xl = GetObject(,”Ket.Application”)

On Error GoTo ExcelError ‘ Enable error trapping.

If xl Is Nothing Then

Set xl = CreateObject(“Ket.Application”)

End If

 

也就是将源码文件中的“Excel.Application”修改为“Ket.Application”,然后保存。之后,就可以成功生成BOM文件了。