Trouble with copy-append in Excel macro

[superB314]

Hi - hopefully this is the right place to ask this. I'm working on coding a macro in Excel that will access IBM Personal Communications, cycle through 15-20 different screens, copy-append each screen, and then paste them all in Excel. I originally coded the macro in PCOM (version 13.0 if that's relevant), and when I run the macro through PCOM the copy-append functionality works just fine. When I transferred the code to VBA in Excel so I could run the macro from Excel and have Excel access PCOM, the copy-append functionality is not working. The macro is running through all the screens as it should, but when it goes to paste the screens in Excel, there's nothing copied to the clipboard. So I'm wondering if there's a piece of code I'm missing that's preventing the screens from copying. The bottom third of the code essentially gets repeated for each different screen I need to access. Is there anything obvious I'm missing? Thanks in advance!

Dim Auteclconnlist
Dim auteclpsobj
Dim autecloia
Dim Auteclps
Dim session
Dim trailers
Dim rolltrailers
Dim maj
Dim nftrailers
Dim rollnftrailers
Dim xcl
Dim autELCMacro



Set Auteclconnlist = CreateObject("pcomm.auteclconnlist")
Set auteclpsobj = CreateObject("pcomm.auteclps")
Set autecloia = CreateObject("pcomm.autecloia")
Set Auteclps = CreateObject("pcomm.auteclps")
Auteclconnlist.Refresh
session = UCase("A")
auteclpsobj.SetConnectionByName (session)
autecloia.SetConnectionByName (session)
Auteclps.SetConnectionByName (session)
auteclmacro = "[edit-copyappend]"
autecloia.WaitForInputReady


autecloia.WaitForInputReady
Auteclps.SendKeys "dmsk1164"
autecloia.WaitForInputReady
Auteclps.SendKeys "[enter]"

Auteclps.WaitForAttrib 2, 1, "00", "3c", 3, 10000


Auteclps.WaitForCursor 2, 2, 10000


autecloia.WaitForAppAvailable
autecloia.WaitForInputReady
autecloia.WaitForInputReady

auteclmacro = "[edit-copyappend]"