Hallo Experten!
Ich hab die Aufgabe ein VBA-Coding zu optimieren und keine Ahnung wo was ich da machen kann. Ich habe ein Array indem Texte zu einem Schlüssel stehen. Diese sollen den Schlüssel, welcher schon im Excel steht ersetzen.
Der Code ist wie folgt:
For l_index = 2 To l_result.Cells.Rows.Count
For Each doc In documents.Rows
If doc("OBJID") = l_result.Cells(l_index, l_textindex).Value Then
l_text = l_text + doc("DATA")
End If
Next
l_range.Cells(l_index - 1, 1).Value = l_text
l_text = ""
Next
Ich muß dazu noch gestehen, ich hab den Code ursprüngliche nicht geschrieben und verstehe auch nicht ganz alles.
Es gibt vielleicht noch folgende wichtige Definitionen:
Set documents = theFunc.Tables("ET_DOCUMENTS")
Set docid = theFunc.Tables("IT_DOCID")
Hier wird soweit ich es verstehe eine Tabelle mit Daten aus einem SAP-System übergeben bzw. andersherum. Vorher wurden die Schlüssen an das SAP System übergeben um dazu die Texte zu finden.
Kann mir jemand helfen den Code besser zu verstehen und mir sagen ob es hier Möglichkeiten der Optimierung gibt?
Aus meiner Sicht muß ich das Array immer für jeden Wert durchsuchen. Aus meiner Sicht gibt das im Schnitt das halbe Array. Also je mehr Einträge desto inperformanter....
Gruß,
Peter