Letzte Zelle markieren und einfügen

Forumthread: Letzte Zelle markieren und einfügen

26.03.2021 14:00:20

Paul

Hallo,
ich hab ein Problem bei dem ich einfach nicht weiterkomme und eure Hilfe brauche. Ich möchte aus einer dynamischen Tabelle im Arbeitsblatt "Stammdaten" den letzten Wert der in der Spalte G steht kopieren und in das Arbeitsblatt "Antrag" in Zelle B28 einfügen.
Vielen Dank im Voraus!

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Letzte Zelle markieren und einfügen

26.03.2021 14:27:48

UweD

AW: Letzte Zelle markieren und einfügen

26.03.2021 14:27:48

UweD

Hallo
so?

Sub Wert()
Dim LR As Integer, Sp As Integer
Sp = 7 'Spalte G
With Sheets("Stammdaten")
LR = .Cells(.Rows.Count, Sp).End(xlUp).Row 'letzte Zeile der Spalte
Sheets("Antrag").Range("B28") = .Cells(LR, Sp)
End With
End Sub

Letzte Zelle markieren und einfügen

Forumthread: Letzte Zelle markieren und einfügen

1 Beitrag zum Forumthread Beitrag zu diesem Forumthread

VBA Beispiele zu diesem und ähnlichen Themen

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread