Also ich habe eine Excel Tabelle in der Namen und Stunden stehen.
Diese bin ich mit Hilfe eines Makros durchlaufen und habe mir ein Objekt erzeugt indem ich jeweils den Namen mit der dazugehörigen Stundenzahl eingespeichert habe:
Der code dazu:
Public Sub CSVtoArray()
Dim members As Object
Set members = CreateObject("Scripting.Dictionary")
Dim row As Long
Dim maxRow As Long
Dim sheet As Worksheet
Set sheet = ActiveWorkbook.Worksheets(1)
maxRow = sheet.Cells(sheet.Rows.Count, "A").End(xlUp).row
Dim curName As String
Dim curHour As String
curName = sheet.Cells(row, 1)
curHour = sheet.Cells(row, 7)
If Not members.Exists(curName) Then
Call members.Add(curName, curHour)
Else
members.Item(curName) = Val(members.Item(curName)) + Val(curHour)
End If
End Sub
Das funktioniert soweit auch ganz ordentlich. Nun habe ich eine zweite Excel Tabelle in der die Selben Namen stehen aber andere Informationen wie z.B. eine Adresse.
Ich möchte jetzt also für jedes Memberpaar in meinem Array überprüfen ob der Name auch in der anderen Excel Tabelle enthalten ist und wenn ja möchte ich den Array Eintrag z.B. um die Stadt erweitern.
Die Spalte in der die Stadt steht ist immer gleich.
Ich stehe total auf dem Schlauch und hoffe mir kann jemand weiterhelfen.
Liebe Grüße