VBA Zugriff SAP Datenbank

Public conn As ADODB.Connection

Sub dbcon()

Dim conn As New ADODB.Connection
Dim record As New ADODB.Recordset
Dim field As ADODB.field
Dim sel As String

sel = "select matnr from sapabap1.mara where mara.matnr = 60"  

conn.Open "Driver={SAP HANA for MS Excel}; Server=Server; Uid=User; Pwd=pw;"  
  
record.Open sel, conn

record.Close
conn.Close



End Sub