ich habe aktuell eine Userform mit der eine Tabelle nach und nach mit dem Inhalt gefüllt wird.
Dies habe ich so umgesetzt:
Dim lrow1 As Integer
Dim lrow2 As Integer
lrow1 = Sheets("DB").Cells(Sheets("DB").Rows.Count, 25).End(xlUp).Row + 1
With Sheets("DB")
.Cells(lrow1, 1) = ComboBox1
.Cells(lrow1, 2) = TextBox1
.Cells(lrow1, 3) = TextBox2
.Cells(lrow1, 4) = TextBox3
.Cells(lrow1, 5) = TextBox4
.Cells(lrow1, 6) = TextBox5
.Cells(lrow1, 7) = TextBox6
Nun zu meinen Fragen:
1. Aktuell füllt er die Tabelle ab oben Links, also A1 nacheinander. Wie kann es erreichen, dass er die Tabelle beispielsweise ab F8 untereinander füllt?
2. Er legt die Daten nach und nach an. Wenn ich mittendrin einen Eintrag aus der automatisch erstellten Liste lösche, füllt er die Liste nach dem letzten Eintrag weiter.
Wie kann ich es erreichen, dass er auch gelöschte Zellen mit Inhalt füllt und erst dann die Daten weiter untereinander in die Tabelle schreibt?
Vielen Dank schon einmal für eure Zeit und eure Unterstützung. :)