Hallo ich habe ein SAP Script aufgezeichnet und dann in VBA Excel eingebunden. Läuft auch ohne Probleme durch.
Sub Vorgänge()
Dim sapGuiAuto, Application, connection, session As Object
Dim Stückliste As String
Dim Speichername As String
Dim Speicherort As String
Dim i As Integer
Dim lastrow As Integer
Set sapGuiAuto = GetObject("SAPGUI")
Set Application = sapGuiAuto.getscriptingEngine
Set connection = Application.Children(0)
Set session = connection.Children(0)
lastrow = ThisWorkbook.Sheets("PPS").Cells(Rows.Count, 1).End(xlUp).Row
session.findById("wnd[0]").resizeWorkingPane 342, 42, False
session.findById("wnd[0]/tbar[0]/okcd").Text = "/ncoois"
session.findById("wnd[0]").sendVKey 0
For i = 2 To lastrow
Stückliste = ThisWorkbook.Sheets("PPS").Range("A" & i).Value
Speichername = ThisWorkbook.Sheets("PPS").Range("b" & i).Value
Speicherort = ThisWorkbook.Sheets("PPS").Range("c" & i).Value
session.findById("wnd[0]").resizeWorkingPane 272, 40, False
session.findById("wnd[0]/tbar[0]/okcd").Text = "/ncoois"
usw. ....
Next i
Myend:
Set session = Nothing
connection.CloseSession ("ses[0]")
Set connection = Nothing
Set Application = Nothing
Set sapGuiAuto = Nothing
End Sub
Mein Problem: Ich möchte danach noch weitere VBA Makros anwenden, wie z.B. die aus SAP in Excel gespeicherten Daten weiter verarbeiten. Ich bekomme, immer Fehlermeldungen wenn ich die anderen Makros laufen lassen. Schließe ich die Datei mit den Makros und öffne sie neu. Laufen alle Makros ohne Probleme durch. Hat jemand eine Idee woran es liegen könnte? Vielen Dank