Hallo zusammen,
mit Excel schaffe ich es ja inzwischen bestimmte Felder aus der MM03 auzulesen, aber ich brauche es eigentlich in MS Access. Da funktioniert der Code aber nicht.
Ich möchte also eine Matnummer übergeben und dann die Matbezeichung, Warengruppe usw. auslesen.
Der Code in Excel sieht so aus, das läuft nicht in Access.
Sub Daten_aus_MM03()
Dim Matnummer As String
Dim Wrg As String, MatBez1 As String, MatBez2 As String
Dim test1, test2, test3
Set SapGuiAuto = GetObject("SAPGUI") 'Get the SAP GUI Scripting object
Set SAPApp = SapGuiAuto.GetScriptingEngine 'Get the currently running SAP GUI
Set SAPCon = SAPApp.Children(0) 'Get the first system that is currently connected
Set Session = SAPCon.Children(0) 'Get the first session (window) on that connection
Der Code bricht bei dem letzen Set Session ab. Mit der Fehlermeldung
Laufzeitfehler '440'
Die Eigenschaft ist schreibgeschütz
Wie geschrieben in Excel läuft es durch? Muss ich in Access irgendwas einstellen?
Danke und Gruss
Michel
