leider habe ich in der SuFu nichts gefunden.
Ich mache erst seit ca. 7 Tagen VBA und hoffe Ihr könnte mir helfen. Ich lasse Werte aus einer Tabelle in die andere Schreiben. Jedoch möchte ich gerne das die Werte nicht bei B2 anfangen, sondern zb bei B19.
Mein Code sieht derzeit so aus!
If str1 = "Haus" And str2 = "Auto" Then _
Sheets("Auto").Cells(Rows.Count, "B").End(xlUp).Offset(1, 0) = strAuto
Sheets("Haus").Cells(Rows.Count, "C").End(xlUp).Offset(1, 0) = strHaus
...... usw
elseif ... usw
Der Befehl Exd(xlUp) sucht ja von oben die Tabelle nach der nächsten freien Zelle richtig? Wie auch immer, ich bekomme es nicht ohne Eure Hilfe gelöst :)
VG