Microsoft Office Tutorials and References
In Depth Information
Kapitel 7 – Tipps und Tricks
Abbildung 7.21: Mit Filterwert im Bedingungsformat Spaltenbeschriftung formatieren
VBA-03: SAP-Daten auslesen
VBA SAP-Tabelle einlesen.xls
SAP stellt in fast allen Modulen zwar einen Transfer von Berichts-
daten nach Excel zur Verfügung, dazu muss aber der SAP-GUI akti-
viert und der Export manuell gestartet werden. Mithilfe von Funk-
tionsbausteinen (BAPIs) können SAP-Daten direkt nach Excel
transferiert werden. Der Funktionsbaustein BAPI_USER_GET_
DETAIL gibt zum Beispiel Informationen über den angemeldeten
»User« aus und RFC_READ_TABLE bietet die Möglichkeit, alle
Tabellen gemäß der Transaktion Se16 auszulesen. Um diese Funkti-
onsbausteine nutzen zu können, wird eine SAP-Verbindung per VBA
aufgebaut.
CD .......
Listing 7.1: VBA-Makro für SAP-Anmeldung
Sub SAP_Anmeldung()
Dim SAP_Function As Object, SAP_Connection As Object
Dim SAP_Verbindung As Boolean
SAP_Verbindung = False
Set SAP_Function = CreateObject("SAP.Functions")
Set SAP_Connection = SAP_Function.Connection
With SAP_Connection
.ApplicationServer = "xxx"
.SystemNumber = "1234"
.System = "xyz"
.Client = "abc"
.user = SAP_UserID
.Password = SAP_Passwort
If SAP_Connection.logon(0, True) <> True Then
SAP_Connection.LastError
SAP_Verbindung = False
Search JabSto ::




Custom Search