VisualBasic Hilfe bei einem Programm mit Tabellen

[Logi24]

Hallo
ich soll meinem Vater ein kleines Programm schreiben, bin auch dran, hab da aber ein kleines problem

und zwar hab ich zwei Tabellen vorliegen, in der einen stehen Kundeneinzahlungen und in der anderen will mein Vater es so haben, dass da nur die Zeile von dem Kunden angezeigt wird, den er haben möchte.


Also die Zeile ist bei der Einzahlung so aufgebaut: (ich machs jetzt nur für die 2. Zeile)
"A2:BF2"

das soll dann in die Tabelle ("1") so eingefügt werden:

die ersten 20 Daten in Spalte A
die nächsten 20 in Spalte B
und den Rest in Spalte E


Ich hab schon mit Makros aufzeichnen versucht und dann den Code editiert, naja das wurd nix. Der meckert immer beim wechseln der Tabellen

Sub Kunde()
Dim a As Single, b As Single, summe As Single, wert As Single, zahla As Single
wert = InputBox("Welche Zeile soll ausgewählt werden?")
zahla = 0
For a = 1 To 58
Sheets("Leerung 2008").Select
Cells(1 + a, wert) = zahla
Worksheets("1").Select
zahla = Cells(1 + a, wert).Value
Next a


End Sub

war nur ein schneller neuer test, weil meine anderen Versuche auch gescheitert sind. das ist auch noch nicht zuende

Um Hilfe würd ich mich super freuen

 

[Heretic Novalis]

würde das nicht mit sverweis gehen?
hört sich jedenfalls nach einem klassischen fall dafür an (werte nach festzulegenden kriterien aus einer matrix suchen und anzeigen)