hi!
Also sieht ja schon ganz gut aus.
Erstmal zu ersten:
Hab mal etwas rumprobiert
Sheets("Auswertungen").Select
lngZ = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1
ActiveSheet.Range("C2").Value = Traegername
Das mit dem "C2" ist natürlich Quatsch. Nur wie bekomm ich jetzt die Verknüpfung zur zweiten Zeile? Weil irgendwie muss ich ja mitteilen das der diesen Traegernamen auch in die markierte freie Spalte setzten soll.
mfg