Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1276to1280
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

bei Filter letzte zelle ermitteln

bei Filter letzte zelle ermitteln
Frank
Hallo Excel Profis,
bräuchte mal eure Hilfe. Hab ein Filter in Tabelle1 und möchte nun mit einem Makro die letzten beiden Zellen ermitteln z.B. F40:G40 (Zellen änder sich ständig bei Filter funktion) in Tabelle2 kopieren. In Tabelle2 soll aber auch die letzte Zelle ermittelt werden so das alle kopierten Werte unter einander geschrieben werden.
Vielen Dank schon mal im voraus und ein schönes WE
Gruß Frank
https://www.herber.de/bbs/user/81761.xls

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: bei Filter letzte zelle ermitteln
08.09.2012 09:52:01
Hajo_Zi
Hallo Frank,
warum nicht nur den sichtbaren Bereich kopieren?

AW: bei Filter letzte zelle ermitteln
08.09.2012 10:05:18
Frank
Hallo, das habe ich mit
ActiveSheet.Range("W6:AT" & ActiveSheet.UsedRange.Rows.Count).SpecialCells(xlCellTypeVisible).Copy
hinbekommen. Das Problem ist, er kopiert mir alle 6 zeilen in neues Blatt ich möchte aber nur zb W6:W7 und das geht nicht.

AW: frage
08.09.2012 10:09:01
hary
Hallo
in deiner Bsp.Tabelle sind es zwei Zellen. jetzt schreibst Du:
 zb W6:W7 

das sind zwei Zeilen.
gruss hary

Anzeige
AW: bei Filter letzte zelle ermitteln
08.09.2012 10:05:32
hary
hallo Frank
Teste mal.

Sub rueber()
Dim a As Long
Dim filterzeile As Long
With Worksheets("Tabelle2")
a = .Cells(.Rows.Count, 1).End(xlUp).Row + 1
filterzeile = ActiveCell.SpecialCells(xlLastCell).Row
.Cells(a, 1).Resize(, 2).Value = Cells(filterzeile, 6).Resize(, 2).Value
End With
End Sub

gruss hary

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige