Office: Kommunikation von SAP und VBA (solved)

Helfe beim Thema Kommunikation von SAP und VBA (solved) in Microsoft Excel Hilfe um das Problem gemeinsam zu lösen; So und nochmal aktualisiert - die Lösung findet ihr unten beim Eintrag vom 23.11.06 Hier mein alter Post - aber mittlerweile hat sich daraus... Dieses Thema im Forum "Microsoft Excel Hilfe" wurde erstellt von lil, 13. November 2006.

  1. LIL
    lil Erfahrener User

    Kommunikation von SAP und VBA (solved)


    So und nochmal aktualisiert - die Lösung findet ihr unten beim Eintrag vom 23.11.06




    Hier mein alter Post - aber mittlerweile hat sich daraus was anderes ergeben (s.u.)...


    Hallo liebe Leute!

    Ich sitze gerade daran eine Programmierung fortzuführen, die sich auf die Kommunikation zwischen Excel und SAP bezieht.

    Thema ist es, sich über Excel in SAP einzuloggen, dann einen bestimmten Suchwert einzugeben durch den dann mehrere Daten zurückgegeben werden, die in Excel in bestimmte Platzhalter ausgegeben werden sollen.

    Das mit dem Einloggen etc. wurde schon gemacht.
    Was jetzt "nur" noch fehlt ist das Suchen nach dem bestimmten Wert und das auslesen und ausgeben der Daten.

    Weiß jemand von euch wie das ganze gestaltet werden kann? :-|
    Ich persönlich bin nämlich ein absoluter VB(A)-Noob, also ein blutiger Anfänger (keine Ahnung von nichts....) und was das Zusammenspiel von SAP und Excel angeht - davon hab ich auch nicht die leisteste Ahnung.... :cry:

    Ich würde mich über schnelle Antworten freuen, da ich einen ziemlich knappen Zeitplan habe *seufz* :-?


    LG
    eure
    Marie


    So, das war der urpsrüngliche Post..... hier mein aktuelles Problem:
    Mir wurde jetzt mal gesagt, dass ich nicht direkt auf eine Tabelle zugreife, sondern auf einen Funktionsbaustein der die Tabelle ausliest. Allerdings kommen mit der Programmierung die vorliegt keine Daten in Excel an -.-
    Ich hab die Sachen schonmal versucht mit diversen Debug.Prints auszugeben und nichts.....
    Hier mal der Code:


    Code:
    Private Sub SAPBAPIControl1_GotFocus()
    Public objBAPIControl, objConnection, objDisplay As Object
    Dim login As Boolean
End Sub



Private Sub cmdOK_Click()
  
    If login = False Then
    Set objBAPIControl = CreateObject("SAP.Functions")
    Set objConnection = objBAPIControl.Connection
        objConnection.System = "****"
        objConnection.HostName = "****"
        objConnection.SystemNumber = "****"
        objConnection.client = "****"
        objConnection.user = ""
        objConnection.password = ""
        objConnection.Language = "DE"
    
    If objConnection.Logon(0, False) Then
        login = True
        MsgBox "Verbunden"
    End If

    Dim oParam1 As Object
    Dim oParam2 As Object
    Dim oParam3 As Object
    Dim oParam4 As Object
    Dim oParam5 As Object
    Dim oParam6 As Object
    Dim oParam7 As Object
    Dim strInput As String
    Dim objDisplay As Object

    strInput = txtTableName
        
    Set objDisplay = objBAPIControl.Add("ZL_LESEN_DISPLAY_STUECK")

     'Set objTable = objDisplay.Tables("ZL_LESEN_DISPLAY_STUECK")
     Set oParam1 = objDisplay.exports("I_MATNR")
     Set oParam2 = objDisplay.exports("I_WERKS")
     Set oParam3 = objDisplay.exports("I_STLTY")
     Set oParam4 = objDisplay.exports("RC")
     Set oParam5 = objDisplay.exports("E_MAT_BEZ")
     Set oParam6 = objDisplay.exports("E_EANNR")
     Set oParam7 = objDisplay.exports("E_DIS_BEZ")

     result = objDisplay.Call
     If result = True Then
          Set I_MATNR = objDisplay.Tables("I_MATNR")
          Set I_WERKS = objDisplay.Tables("I_WERKS")
          Set I_STLTY = objDisplay.Tables("I_STLTY")
     Else
          MsgBox "Ungültige Materialnummer"
     End If
     Else
          login = False
          objConnection.Logoff
          Set objConnection = Nothing
          Set objBAPIControl = Nothing
     End If
End Sub
    Wenn ihr da irgendwie weiterwisst.....HILFE!!!

    LG
    Marie
     
    lil, 13. November 2006
    #1
  2. LIL
    lil Erfahrener User
    Hilfe!? :-| :cry:
     
    lil, 17. November 2006
    #2
  3. freaky
    freaky Erfahrener User
    Hi,

    also mit SAP kenne ich mich auch nicht aus.

    Aber den Zugriff hast Du ja - steht in den Variablen etwas drin, wenn Du mit "F8" mal den Code durchlaufen lässt - also in den oParamxx? Oder dort mal etwas in eienr Varaiblen ausgeben - und dann nochmal nachsehen...

    Wenn da nichts drin steht brauchst Du mehr einen Faschmann für SAP...

    Wenn Du aber ene Lösung findest poste es bitte hier. Das interessiert mich auch.
     
    freaky, 17. November 2006
    #3
  4. LIL
    lil Erfahrener User

    Kommunikation von SAP und VBA (solved)

    Guten Morgen!

    ja das mit dem "mit SAP kenne ich mich auch nicht aus" ist auch mein Problem ^^ :-/

    Und das hab ich auch schon probiert das ganze - die Varbialen enthalten gar nichts -.-

    Ich bin der Lösung auch leider noch kein Stückchen näher gekommen...aber wenn dann werd ich sie hier posten - ich versuche zumindest dran zu denken.

    Aber so lange: wenn sich hier jemand mit so einem Problem oder etwas ähnlichem auskennt - nochmal: HILFE!!!!???? *wink*

    LG
    lil
     
    lil, 20. November 2006
    #4
  5. LIL
    lil Erfahrener User
    Also mir eröffnet sich das ganze momentan immer weiter.

    Ich hab festgestellt, welche Daten ich nun genau zur Abfrage benötige - und nun muss ich sehen wie ich diese 3 Suchparameter an den SAP-Funktionsbaustein übermittle.

    Momentan sieht das ganze noch so aus:

    Code:
        Set objDisplay = objBAPIControl.Add("ZL_LESEN_DISPLAY_STUECK")
    

   
    
    Set oParam1 = objDisplay.exports("I_MATNR")
    Set oParam2 = objDisplay.exports("I_WERKS")
    Set oParam3 = objDisplay.exports("I_STLTY")
    Set oParam4 = objDisplay.imports("RC")
    Set oParam5 = objDisplay.imports("E_MAT_BEZ")
    Set oParam6 = objDisplay.imports("E_EANNR")
    Set oParam7 = objDisplay.imports("E_DIS_BEZ")
    Set objTable = objDisplay.Tables("TABENTRY")
    Set objCol = objTable.Columns("ENTRY")
    
    Set oParam1.Value = txtTableName
    Set oParam2.Value = "3030"
    Set oParam3.Value = "5"
    wobei oParam2 und oParam3 noch Fehlermeldungen von sich geben weil ich ihnen einen ganz normalen String zugewiesen habe - allerdings sind sie als Objekt deklariert und wollen daher auch ein Objekt (wobei ich dann nicht weiß warum die Textfeldeingabe akzeptiert wird).
    Mit der Kombination dieser 3 Parameter wird dann eine Suche gestartet und mehrere Daten sowie eine Tabelle ausgegeben - all das muss dann noch ausgelesen werden.
    Aber ich wäre bis hierhin erstmal schonmal froh, wenn jemand wüsste wie ich die Parameter an den Funktionsbaustein übergeben kann - denn so funktionierts momentan nicht....denn ich bleib immer an den beiden Objekten dort hängen....
    Weiß da jemand was?

    LG
    Marie
     
    lil, 20. November 2006
    #5
  6. LIL
    lil Erfahrener User
    OMFG

    Oh Mann........ da probiert man sich n Wolf und woran lags? An den Testdaten, die ich zum Eingeben bekommen habe -.-

    Also so funktionierts jetzt (mit viel Hilfe von diesem Tutorial: http://www.sdn.sap.com/irj/sdn/weblogs?blog=/pub/wlg/2309):

    Code:
    
'Deklarationszwang
Option Explicit

'*********************************************************************************
'Deklaration der benötigten Variablen
'*********************************************************************************

Dim objBAPIControl As Object
Dim objConnection As Object
Dim objDisplay As Object
Dim login As Boolean
Dim objTable As Table

'Parameter
Dim oParam1 As Object
Dim oParam2 As Object
Dim oParam3 As Object
Dim oParam4 As Object
Dim oParam5 As Object
Dim oParam6 As Object
Dim oParam7 As Object


'*********************************************************************************


'Cancel-Button
Private Sub cmdCancel_Click()
    MatNrQuery.Hide
End Sub


'Okay-Button
Private Sub cmdOK_Click()

If login = False Then

    '********************************************************
    ' Verbindungsaufbau
    '********************************************************
    
    Set objBAPIControl = CreateObject("SAP.Functions")
    Set objConnection = objBAPIControl.Connection
        objConnection.System = "***"
        objConnection.HostName = "***"
        objConnection.SystemNumber = "***"
        objConnection.client = "***"
        objConnection.User = ""
        objConnection.Password = ""
        objConnection.Language = "DE"
    If objConnection.Logon(0, False) Then
        login = True
        MsgBox "Verbunden"
    End If

    '********************************************************
    
    '********************************************************
    ' Auslesen der Daten über den Baustein
    ' ZL_LESEN_DISPLAY_STUECK (aus der Tabelle TABENTRY)
    '********************************************************
    
    Set objDisplay = objBAPIControl.Add("ZL_LESEN_DISPLAY_STUECK")
    

    '***************************
    ' EXPORTS
    '***************************
    
    'Materialnummer
    Set oParam1 = objDisplay.exports("I_MATNR")
    'Werksnummer
    Set oParam2 = objDisplay.exports("I_WERKS")
    'Stücklistennummer
    Set oParam3 = objDisplay.exports("I_STLTY")
    
    '***************************
    
    '***************************
    ' IMPORTS
    '***************************
    
    'Returncode (muss 0 sein, sonst Fehler!)
    Set oParam4 = objDisplay.imports("RC")
    'Materialbezeichnung (Display)
    Set oParam5 = objDisplay.imports("E_MAT_BEZ")
    'EAN-Nummer (Display)
    Set oParam6 = objDisplay.imports("E_EANNR")
    'Display-Bezeichnung
    Set oParam7 = objDisplay.imports("E_DIS_BEZ")
    
    '***************************
    
    'Tabelle
    Set objTable = objDisplay.Tables("TABENTRY")
    'Set objCol = objTable.Columns("ENTRY")
    
    'Wertzuweisung
    oParam1.Value = txtMatNr
    oParam2.Value = "3030"
    oParam3.Value = "5"
    
    'Aufruf
    objDisplay.Call
    
    '********************************************************
    
    
    
    '********************************************************
    ' Ausgabe der Daten
    '********************************************************
    
    Entry = objTable.RowCount
    
    If oParam4 <> "0" Then
        MsgBox ("Ein Fehler ist aufgetreten. Der Returncode muss NULL sein (RC = " & oParam4 & "). Bitte überprüfen Sie Ihre Eingabe!")
    Else
        Dim i
        For i = 1 To Entry
            Cont = objTable.Cell(i, 1)
            If Entry <= "10" And Entry <> "0" Then
                Worksheets(2).Cells(7 + i, 1) = Cont
            ElseIf Entry <= "20" And Entry > "10" Then
                Worksheets(3).Cells(7 + i, 1) = Cont
            ElseIf Entry <= "30" And Entry > "20" Then
                Worksheets(4).Cells(7 + i, 1) = Cont
            End If
            'ActiveSheet.Cells(8 + i, 1) = objTable.Cell(i, 1)
        Next i
        If Entry <= "10" And Entry <> "0" Then
                MsgBox ("Die Daten wurden in ""Etikett A5"" eingetragen")
        ElseIf Entry <= "20" And Entry > "10" Then
                MsgBox ("Die Daten wurden in ""Etikett A4 Variante A - 20"" eingetragen")
        ElseIf Entry <= "30" And Entry > "20" Then
                MsgBox ("Die Daten wurden in ""Etikett A4 Variante B - 30"" eingetragen")
        Else
                MsgBox ("Fehler! Entweder sind 0 oder mehr als 30 Einträge vorhanden. Es wurden keine Daten eingetragen.")
        End If
    End If
     
Else
    login = False
    objConnection.Logoff
    Set objConnection = Nothing
    Set objBAPIControl = Nothing
End If

End Sub
    Allerdings gibts da noch das Problem, dass die Daten, so wie ich sie hier ausgebe, immer nur einer bestimmten Zeile zugeordnet sind - ich möchte sie aber einer bestimmten ZELLE zuordnen (z.B. B7).

    Frage 1: Weiß jemand wie das realisierbar ist?


    Des weiteren gibts das Problem, dass die Daten aus SAP nicht gerade gut strukturiert rüberkommen - theoretisch sind jeweils 4 verschiedene Informationen in einer Zeile, also sollten es logischerweise auch vier verschiedene Spalten sein - aber nein, es ist alles in einer Spalte....und nur durch diverse Leerzeichen voneinander getrennt...

    Bespiel:

    13stelligeEAN (ganze viele Leerzeichen) Packungsbezeichnung (ganze viele Leerzeichen) Anzahl (ein Leerzeichen) Bez.

    Und so wird das ganze nachher in Excel auch ausgegeben - allerdings brauche ich diese vier Infos separat.....

    Frage 2: Wie kann ich das ganze einigermaßen gescheit auseinanderschnipseln, so dass es auch noch variabel bleibt?


    Weiß da vlt jemand was?


    LG
    eure
    Marie
     
    lil, 22. November 2006
    #6
  7. LIL
    lil Erfahrener User
    Hallo Leute

    ich hab zumindest das mit dem Splitten schonmal lösen können:

    Code:
    Cont = objTable.Cell(i, 1)
Cont = Replace(Cont, " EA", "")
EAN = Left(Cont, "15")
EAN = LTrim(EAN)
Num = Right(Cont, "10")
Num = LTrim(Num)
Name = Mid(Cont, "15", "50")
Name = LTrim(Name)
    Ist zwar vlt nicht die schönste Methode aber es geht :-)

    Wenn mir jetzt noch jemand helfen könnte bezüglich der letzten beiden Probleme, die mich beschäftigen, dann wär ich der glücklichste Mensch auf Erden ^^
    Nochmal:

    Problem 1: Es sollen nur in jeder zweiten Zeile in einem bestimmten Bereich (z.B. von B7:B25) die Daten ausgegeben werden....momentan wirds noch in jeder Zeile ausgegeben (Code weiter unten)

    Problem 2: Es soll in jeder Zeile dann natürlich auch ein anderer Eintrag stehen, also die Einträge der ausgelesenen Tabelle sollen auch so wieder ausgegeben werden....momentan läufts aber so, dass in jeder Zeile des angegebenen Bereichs einmal die Schleife durchlaufen wird und am Ende steht in allen das gleiche....
    bis jetzt ist es so geregelt:



    Code:
     For i = 1 To Entry
........
            If Entry <= "10" And Entry <> "0" Then
                Sheets(2).Range("B7:B25") = Num
                Sheets(2).Range("D7:D25") = Name
                Sheets(2).Range("H7:H25") = Num
                Sheets(2).Range("J7:J25") = EAN
            ElseIf Entry <= "20" And Entry > "10" Then
                Sheets(3).Range("B7:B45") = Num
                Sheets(3).Range("D7:D45") = Name
                Sheets(3).Range("I7:I45") = Num
                Sheets(3).Range("K7:K45") = EAN
            ElseIf Entry <= "30" And Entry > "20" Then
                Sheets(4).Range("B7:B65") = Num
                Sheets(4).Range("D7:D65") = Name
                Sheets(4).Range("I7:I65") = Num
                Sheets(4).Range("K7:K65") = EAN
            End If
Next i

    Also schreit, wenn ihr von sowas Ahnung habt!! Bitte!

    LG
    Marie
     
    lil, 23. November 2006
    #7
  8. LIL
    lil Erfahrener User

    Kommunikation von SAP und VBA (solved)

    Und aus zwei wurde eins

    Soooooooooooooooooo, Problem mit schleife is wesch ^^

    einfach

    Code:
    Sheets(2).Range("B7:B25") = EAN
    durch

    Code:
    sheets(2).cells(i+6,2) = EAN
    ersetzen und anpassen und gut is....


    Fehlt nur noch das mit dem Zweizeiler :-) also HÜÜÜÜÜLLLLLLLLLFÄÄÄÄÄÄÄÄÄÄ!!! ^^
     
    lil, 23. November 2006
    #8
  9. LIL
    lil Erfahrener User
    fertisch

    *lol* - ich fass es nicht ich habe fertig ^^

    also für freaky und alle anderen, die es interessiert:

    Code:
    'Deklarationszwang
Option Explicit

'*********************************************************************************
'Deklaration der benötigten Variablen
'*********************************************************************************

Dim objBAPIControl As Object
Dim objConnection As Object
Dim objDisplay As Object
Dim login As Boolean
Dim objTable As Table

'Parameter
Dim oParam1 As Object
Dim oParam2 As Object
Dim oParam3 As Object
Dim oParam4 As Object
Dim oParam5 As Object
Dim oParam6 As Object
Dim oParam7 As Object

'Zur Ausgabe
Dim i As Integer
Dim n As Integer
Dim strTeilstring()
Dim Cont As String
Dim Entry As String
Dim EAN As String
Dim Name As String
Dim Num As String

'*********************************************************************************


'Cancel-Button
Private Sub cmdCancel_Click()
    MatNrQuery.Hide
End Sub


'Okay-Button
Private Sub cmdOK_Click()

If login = False Then

    '********************************************************
    ' Verbindungsaufbau
    '********************************************************
    
    Set objBAPIControl = CreateObject("SAP.Functions")
    Set objConnection = objBAPIControl.Connection
        objConnection.System = "***"
        objConnection.HostName = "****"
        objConnection.SystemNumber = "****"
        objConnection.client = "***"
        objConnection.User = ""
        objConnection.Password = ""
        objConnection.Language = "DE"
    If objConnection.Logon(0, False) Then
        login = True
        MsgBox "Verbunden"
    End If

    '********************************************************
    
    '********************************************************
    ' Auslesen der Daten über den Baustein
    ' ZL_LESEN_DISPLAY_STUECK (aus der Tabelle TABENTRY)
    '********************************************************
    
    Set objDisplay = objBAPIControl.Add("ZL_LESEN_DISPLAY_STUECK")
    

    '***************************
    ' EXPORTS
    '***************************
    
    'Materialnummer
    Set oParam1 = objDisplay.exports("I_MATNR")
    'Werksnummer
    Set oParam2 = objDisplay.exports("I_WERKS")
    'Stücklistennummer
    Set oParam3 = objDisplay.exports("I_STLTY")
    
    '***************************
    
    '***************************
    ' IMPORTS
    '***************************
    
    'Returncode (muss 0 sein, sonst Fehler!)
    Set oParam4 = objDisplay.imports("RC")
    'Materialbezeichnung (Display)
    Set oParam5 = objDisplay.imports("E_MAT_BEZ")
    'EAN-Nummer (Display)
    Set oParam6 = objDisplay.imports("E_EANNR")
    'Display-Bezeichnung
    Set oParam7 = objDisplay.imports("E_DIS_BEZ")
    
    '***************************
    
    'Tabelle
    Set objTable = objDisplay.Tables("TABENTRY")
    
    'Wertzuweisung
    oParam1.Value = txtMatNr
    oParam2.Value = "3030"
    oParam3.Value = "5"
    
    'Aufruf
    objDisplay.Call
    
    '********************************************************
    
    
    '********************************************************
    ' Ausgabe der Daten
    '********************************************************

    'Anzahl der Einträge (Zeilen der SAP-Tabelle)
    Entry = objTable.RowCount
    
    If oParam4 <> "0" Then
        MsgBox ("Ein Fehler ist aufgetreten. Der Returncode muss NULL sein (RC = " & oParam4 & "). Bitte überprüfen Sie Ihre Eingabe!")
    Else
        'Schleifendurchlauf von Eintrag 1 bis n
        For i = 1 To Entry
            'Tabelle zeilenweise auslesen
            Cont = objTable.Cell(i, 1)
            'Letzten 3 Zeichen entfernen - werden nicht benötigt
            Cont = Replace(Cont, " EA", "")
            'EAN Nummer ausschneiden und Leerzeichen davor und danach entfernen
            EAN = Left(Cont, "15")
            EAN = LTrim(EAN)
            'Anzahl ausschneiden und Leerzeichen....
            Num = Right(Cont, "10")
            Num = LTrim(Num)
            'Packungsbezeichnung ausschneiden und Leerzeichen....
            Name = Mid(Cont, "15", "50")
            Name = LTrim(Name)
    
            'Wenn weniger als oder genau 10 und mehr als 0 Einträge vorhanden sind -> Ausgabe in A5
            If Entry <= "10" And Entry <> "0" Then
                Sheets(2).Cells(i * 2 + 5, 2) = Num
                Sheets(2).Cells(i * 2 + 5, 4) = Name
                Sheets(2).Cells(i * 2 + 5, 8) = Num
                Sheets(2).Cells(i * 2 + 5, 10) = EAN
            'Wenn weniger als oder genau 20 und mehr als 10 Einträge vorhanden sind -> Ausgabe A4 -A
            ElseIf Entry <= "20" And Entry > "10" Then
                Sheets(3).Cells(i * 2 + 5, 2) = Num
                Sheets(3).Cells(i * 2 + 5, 4) = Name
                Sheets(3).Cells(i * 2 + 5, 9) = Num
                Sheets(3).Cells(i * 2 + 5, 11) = EAN
            'Wenn weniger als oder genau 30 und mehr als 20 Einträge vorhanden sind -> Ausgabe A4 -B
            ElseIf Entry <= "30" And Entry > "20" Then
                Sheets(4).Cells(i * 2 + 5, 2) = Num
                Sheets(4).Cells(i * 2 + 5, 4) = Name
                Sheets(4).Cells(i * 2 + 5, 9) = Num
                Sheets(4).Cells(i * 2 + 5, 11) = EAN
            End If
        Next i
        
        
        
        If Entry <= "10" And Entry <> "0" Then
                Sheets(2).Range("D1") = oParam5
                Sheets(2).Range("D2") = oParam7
                Sheets(2).Range("J2") = oParam1
                Sheets(2).Range("F27") = oParam6
                MsgBox ("Die Daten wurden in ""Etikett A5"" eingetragen")
        ElseIf Entry <= "20" And Entry > "10" Then
                Sheets(3).Range("D1") = oParam5
                Sheets(3).Range("D2") = oParam7
                Sheets(3).Range("J2") = oParam1
                Sheets(3).Range("F47") = oParam6
                MsgBox ("Die Daten wurden in ""Etikett A4 Variante A - 20"" eingetragen")
        ElseIf Entry <= "30" And Entry > "20" Then
                Sheets(4).Range("D1") = oParam5
                Sheets(4).Range("D2") = oParam7
                Sheets(4).Range("K2") = oParam1
                Sheets(4).Range("F67") = oParam6
                MsgBox ("Die Daten wurden in ""Etikett A4 Variante B - 30"" eingetragen")
        Else
                MsgBox ("Fehler! Entweder sind 0 oder mehr als 30 Einträge vorhanden. Es wurden keine Daten eingetragen.")
        End If
    End If
     
    '********************************************************
    
Else
    login = False
    objConnection.Logoff
    Set objConnection = Nothing
    Set objBAPIControl = Nothing
End If

End Sub

    Länger als ich gedacht hätte ^^

    so

    LG
    de lil


    PS:
    Das genutzt BAPI Tutorial: https://www.sdn.sap.com/irj/sdn/weblogs?blog=/pub/wlg/2309
    Hilfe im SAP-Wiki zu RFC: http://sapwiki.iwoars.net/
     
    lil, 23. November 2006
    #9
  10. freaky
    freaky Erfahrener User
    Hi,

    Vielen Dank für die Info - und die Mühe, die du Dir gemacht hast.

    Eigentlich sieht es doch gar nicht so schwierig aus - aber wenn es nicht funktioniert... ;-)
     
    freaky, 26. November 2006
    #10
  11. LIL
    lil Erfahrener User
    *gg*

    Hi freaky!

    Ja, das funktionieren lag ja eher weniger an meinem Code als an den Testdaten, die ich bekommen hatte - das hat mich dann erst doch ein wenig zu Verzweiflung gebracht ^^
    Und für nen absoluten VBA-Noob, der das noch nie wirklich gesehn hat, glaub, für den (also für mich^^) ist das echt verdammt schwer ^^
    Aber es klappt ja :-) *freu*

    Wünsche noch einen schönen Tag und eine angenehme Woche ^^

    LG
    lil aka Marie
     
    lil, 27. November 2006
    #11
Thema:

Kommunikation von SAP und VBA (solved)

Die Seite wird geladen...

  1. Kommunikation von SAP und VBA (solved) - Similar Threads - Kommunikation SAP VBA

  2. Werte aus einer Anderen Mappe mit bedingung einfügen

    in Microsoft Excel Hilfe
    Werte aus einer Anderen Mappe mit bedingung einfügen: Hallo, Ich habe folgendes Problem, Ich habe zwei Mappen, die eine wird von SAP mit Preisen gefüttert und die Andere ist eine Materialliste die zur besseren übersicht in Unserer Abteilung dient....

  3. Kommunikation und Lob

    in Microsoft Teams Tutorials
    Kommunikation und Lob: https://eus-streaming-video-rt-microsoft-com.akamaized.net/5023a8dc-505b-4e98-9fe9-cce0af03d981/c3afa36e-c4bf-4bce-a74b-71bccb00_3400.mp4 Probieren Sie es aus!...

  4. Fördern Sie die Kommunikation zwischen Führungskräften und Mitarbeitern.

    in Microsoft Teams Tutorials
    Fördern Sie die Kommunikation zwischen Führungskräften und Mitarbeitern.: Fördern Sie die Kommunikation zwischen Führungskräften und Mitarbeitern. Microsoft Teams Mehr... Weniger In großen...

  5. Kommunikation in Krisensituationen

    in Microsoft Teams Tutorials
    Kommunikation in Krisensituationen: Kommunikation in Krisensituationen Microsoft Teams Mehr... Weniger Wenn ein kritisches Ereignis eintritt oder in...

  6. Nachverfolgen der Kommunikation mit Kunden in Business Contact Manager

    in Microsoft Outlook Tutorials
    Nachverfolgen der Kommunikation mit Kunden in Business Contact Manager: Nachverfolgen der Kommunikation mit Kunden in Business Contact Manager Outlook 2013 Outlook 2010 Office 2010 Mehr... Weniger...

  7. SAP GUI Scripting

    in Microsoft Excel Hilfe
    SAP GUI Scripting: Servus zusammen, ich möchte über VBA ein SAP GUI Script steuern, welches ein spezifisches Layout anhand des Namens auf eine Transaktion anwendet. Dazu möchte ich während die Layoutwahl geöffnet...

  8. Excel-Daten an das SAP übertragen (mit VBA)

    in Microsoft Excel Hilfe
    Excel-Daten an das SAP übertragen (mit VBA): Hallo zusammen, ich habe folgendes Problem. Ziel ist, in einem Excel-File einen Bereich zu markieren und dann die Werte automatisch ins SAP zu übertragen. Die Speicherung der einzelnen Werte in...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Akzeptieren Weitere Informationen...
    Information ausblenden