Automation object call from excel macro on windows 2008 r2 terminal server fails with run time error 429

mrfishel

New Member
Joined
Oct 23, 2018
Messages
7
Since this is my first question on Mr. Excel, I thought I would make it a doozie lol.

I am trying to convert a macro written for 32-bit Excel that feeds data into the IBM AS400 mainframe. I have read articles like the one found here which state that the issue I am having is "....a permanent restriction as IBM Personal Communications only provides 32-bit Automation objects", but I refuse to give up. There has to be some way to connect to the AS400 using 64-bit Excel and pass data through a macro without resorting to using 32-bit office. Please, somebody, show me the way. Thanks!!
 

Some videos you may like

Excel Facts

Back into an answer in Excel
Use Data, What-If Analysis, Goal Seek to find the correct input cell value to reach a desired result

shg

MrExcel MVP
Joined
May 7, 2008
Messages
21,746
Office Version
2010
Platform
Windows
Install Excel as 32-bit?
 

mrfishel

New Member
Joined
Oct 23, 2018
Messages
7
shg, that is what I am trying to not have to do. There must be some other bit of VBA that will get me around the issue that I am having.

Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public autECLSession As Object
Public autECLPS As Object
Public autECLOIA As Object
Sub claimsNettingAuto()


'-----------------------------------------------------------------
'
'-----------------------------------------------------------------
Dim autECLPS As Object
Dim autECLConnList As Object
Dim FieldElement As Object


'-----------------------------------------------------------------
'Set up connection to AS400
'-----------------------------------------------------------------
Set autECLSession = CreateObject("pcomm.auteclsession") *********** this is where my code is erroring out
Set autECLPS = CreateObject("Pcomm.auteclps")
Set autECLOIA = CreateObject("Pcomm.autecloia")
Set autECLConnList = CreateObject("Pcomm.auteclconnlist")
 

shg

MrExcel MVP
Joined
May 7, 2008
Messages
21,746
Office Version
2010
Platform
Windows
Not sure why you would disbelieve IBM's stated limitation and suggested workaround.
 

Watch MrExcel Video

Forum statistics

Threads
1,095,385
Messages
5,444,150
Members
405,269
Latest member
Kjtakke

This Week's Hot Topics

Top