Hallo liebe Leute!
ich schon wieder ^^
Es hat zwar theoretisch immernoch was mit meinem SAP-Problem zu tun, aber nichts mehr mit SAP ^^
Ich hab bis hier hin alles soweit fertig - jetzt will ich nur noch die aus einer SAP-Tabelle ausgelesenen Daten in Excel strukturiert wiedergeben.
Ich bin schon soweit, dass ich was ausgeben kann, allerdings sieht das ein wenig.....naja, sagen wir chaotisch aus ^^
hier mal ein Codefetzen:
---------------------------------------------------------------------------
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 Step 2
Cont = objTable.Cell(i, 1)
' PROBLEEEEEEM
If Entry "0" Then
Sheets(2).Range("B7:B25") = Cont
ElseIf Entry "10" Then
Sheets(3).Range("B7:B45") = Cont
ElseIf Entry "20" Then
Sheets(4).Range("B7:B65") = Cont
'PROBLEM-ENDE
End If
Next i
If 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 "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 "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
---------------------------------------------------------------------------
Problem Nummero 1:
(gekennzeichnet im Source durch den Kommentar "PROBLEM")
Ich will, dass die Daten, die ich ausgebe, nur in jeder zweiten Zeile erscheinen - und dass in jeder Zeile natürlich ein anderer Eintrag erscheint - so wie ichs jetzt da stehen hab wird nämlich jede Zeile in der angegebenen Range ausgefüllt und es steht in jeder das gleiche.....
Problem Nummero 2:
Das zweite Problem ist, die Daten kommen aus SAP nicht sehr strukturiert rüber - heißt: ich lese eine SAP-Tabelle aus - diese hat mehrere Zeilen für die Einträge, aber keine Spalten, obwohl dies nötig wäre - nun muss ich sehen, wie ich diese ausgegebene Zeichenkette in 4 Einzelstrings unterteilt kriege.
Das ganze sieht etwa so aus:
EAN13 - ganz viele Leerzeichen - Packungsbezeichnung - ganz viele Leerzeichen - Anzahl - ein Leerzeichen - Bezeichnung
Also:
Frage 1: Wie klappt das mit dem zweizeilig und den richtigen Einträgen?
Frage 2: Wie kann ich das gescheit splitten?
Vielleicht hab ich ja mit den falschen Stichworten gesucht, aber irgendwie hab ich zu den Themen nichts hilfreiches gefunden -.-
Kennt sich jemand damit aus? Dann HIIIIIIIIIIIER!!!! :-)
LG
Marie |