eine letzte Spalte kann so gefunden werden:
Cells(ActiveCell.Row, Columns.Count).End(xlToLeft).Offset(0, 1).Select
Jetzt habe ich versucht:
Dim var as integer
var= Cells(ActiveCell.Row, Columns.Count).End(xlToLeft).Offset(0, 1)
Var.Select
Var.Paste
Wie kann ich in die gefundene letzte Spalte nun einen Wert einfügen, den ich bereits in der Zwischenablage habe?
Vielen Dank!