Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1976to1980
1976to1980
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

In einem Bereich mit Namen letzte beschriebene Zelle finden

Forumthread: In einem Bereich mit Namen letzte beschriebene Zelle finden

In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 14:12:04
Heimwerker
Hallo Gemeinde.

Wie schaffe ich das in einem Bereich der einen Namen hat die letzte Beschriebenen Zelle zu finden und zu kopieren?

mit 


Dim x As Integer

 x = Cells(Rows.Count, 54).End(xlUp).Row                                     

 Range("BB" & x - 0 & ": BB" & x).Copy Sheets("Auswerten").Range("BB10")


funktioniert das ganze ja super, aber wenn ich die Zeile BB bzw. 54 mit einem Namen anspreche möchte zB. StromT20 dann geht da nix mehr.

Hat dafür jemand eine Lösung oder eine Idee wie das funktionieren könnet!

Danke & Grüße

Heimwerker

Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 14:20:14
Onur
"aber wenn ich die Zeile BB bzw. 54 mit einem Namen anspreche " - Wie genau machst du das denn?
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 14:21:39
daniel
HI

mit 
set rngLetzteZelle = .Find(Range("Bereichsname").Find(what:="?*", lookat:=xlwhole, lookin:=xlvalues, searchdirection:=xlprevious)

findest du die letzte beschriebene Zelle im Bereich (mindestens ein Zeichen)

Gruß Daniel
Anzeige
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 14:40:34
Matthias
Moin!
Wenn du wieder nur in einer bestimmten Spalte des Namensbereiches suchen willst, analog deinem Beispielcode, würde es auch so gehen.

Range("StromT20").Cells(Range("StromT20").Rows.Count, 1).End(xlUp).Row


Dabei aber aufpassen. Die Spalte bei Rows.Count ist nicht die 1 Spalte also Spalte A sondern die 1 Spalte in dem Namensbereich. Ist StromT21 bspw. ab Spalte E, dann würde bei Rows.Count,1 die 1 für die Spalte E stehen.

VG Matthias
Anzeige
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 15:19:41
Heimwerker
Hallo Matthias.

Vielen dank für die Antwort, das funktioniert.

Könntest Du mir noch verraten wie ich die Letzte beschriebene Zelle jetzt noch in eine andere Zelle mit eben falls einem Bereichsnamen kopieren kann.

Das wäre echt super :-)

Grüße

Heimwerker
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 16:24:05
daniel
ein hinweis noch:

wenn dein Zellbereich Range("StromT20") bis zur letzten Zelle beschrieben werden kann, dann wirst du so ein falsches Ergebnis bekommen.
das mit dem End(xlup) funktioniert nur, wenn die Absprungzelle leer ist.
Liegt die Absprungzelle ganz unten (Zeile 1,04 Millionen), dann ist das höchstwahrscheinlich auch gegeben.
aber wenn man das in einem kleineren Bereich anwendet, dann müsste man nochmal genauer schauen.
Gruß Daniel
Anzeige
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 17:54:11
Heimwerker
Hallo.

Ich hab das jetzt mal so gemacht: 

Dim m As Integer



m = Range("StromT20").Cells(Range("StromT20").Rows.Count, 1).End(xlUp).Row



    Range("StromT20").Rows(m).Select

    Selection.Copy

    Range("StromT21").Rows(17).Select

    ActiveSheet.Paste


Es gibt sicher eine einfachere Lösung oder Weg.
Wenn jemand einen anderen Vorschlag hat immer her damit.

Grüße

Heimwerker
Anzeige
AW: In einem Bereich mit Namen letzte beschriebene Zelle finden
27.05.2024 18:15:09
schauan
Hallöchen, 

...

    Range("StromT20").Rows(m).Copy Range("StromT21").Rows(17)

Forumthreads zu verwandten Themen

Zellen ausblenden mit Wert 0 in Zelle
Ulrich

Hallo zusammen,
wie kann ich einem Tabellenblatt alle Zeilen ausblenden, bei denen in der ersten Zelle eine 0 (null) steht? Geht sowas überhaupt?
Viele Grüße,
Ulrich
01.09.2008 11:08:49
Thread-ID: 1006360
6 Beiträge
Bestimmten Wert in einer Zelle finden
Olli

Hallo,
ich lauf gerade wieder mal mit einem Brett vorm Kopf rum und hoffe, mir kann einer hier helfen.
Ich habe in einer Zelle mehrere Werte stehen, die jeweils durch Semikolon getrennt sind (bis zu 15).
Wie kann ich per VBA eine Schleife erstellen, dass solange nach einem Wert gesu...
19.09.2008 08:54:00
Thread-ID: 1010897
5 Beiträge
Anzeige
Letzte Zelle & Mittelwert
Frank

Hallo,
ich möchte den Mittelwert von z.B. A2 bis A(XYZ) ermitteln.
Die Letzte Zelle kann ich aus der Variable Letzte_Vlinie auslesen.
Wie muß die Befehlszeile in einem Makro aussehen damit xyz durch den Inhalt der Variable ersetzt wird.
Gruß und danke
Frank
05.11.2008 09:22:11
Thread-ID: 1021766
5 Beiträge
Jede Zahlenwertänderung mit Blinken der Zelle
Steffi

anzeigen.
Ist sowas möglich? HAt jemand eine Idee?
Soll nur einmal blinken, also kein Dauerblinken.
LG
Steffi
07.11.2008 19:28:58
Thread-ID: 1022795
5 Beiträge
Zellen mit bestimmtem Wert leeren
P.Mackes

ich möchte innerhalb einer gewählten range alle Zellen, die einen bestimmten Wert enthalten einfach leeren, also nicht löschen, sondern quasi den effekt, wenn man in die zelle geht und entfernen drückt
hat da jemand ein handliches makro parat?
mfg, Peter
03.12.2008 08:52:34
Thread-ID: 1029679
8 Beiträge
Wert mit VBA suchen und Zelle aktivieren
Nico

Moin
Ich habe eine Abrechnungsdatei und folgendes Problem
In einem Tabellenblatt werden Informationen wie Firmenname und Co. eingetragen.
In der letzten Spalte dieses Blatte möchte ich gerne das Datum per VBA eintragen lassen, an dem ich die Rechnungsnummer über mein Abrechnungstabe...
16.02.2009 16:07:00
Thread-ID: 1051203
2 Beiträge
Wert aus einer bestimmten Zelle finden
Karsten

Hallo,
In Spalte A beginnt bei mir in A2 das Kalenderdatum:
Mo, 16.3.
Di, 17.3.
Mi, 18.3.
Do, 19.3.
Fr, 20.3.
usw.
Ich möchte mit einem Makrobefehl, das Datum finden, was ich in a1 eintippe. Also, wenn ich in A1 z.B.19.3. eintippe, sollte die aktive Zelle auf A5...
15.03.2009 09:32:14
Thread-ID: 1060339
5 Beiträge
Letzte Zelle mit konstantem Wert in Excel
Daniel

Hallo zusammen,
mit welchem VBA-Befehl komme ich an die letzte Zeile mit einem konstantem Wert (KEINE Formel!!) in einem Excel-Blatt? (Mit Cells(Rows.Count,1).End(xlUp).Row bekomme ich ja die letzte Zeile mit einer Formel zurückgeliefert)
Vielen Dank für eine Antwort!
04.05.2009 14:37:38
Thread-ID: 1072763
18 Beiträge
Anzahl Zellen mit gleichen Inhalt / welcher Wert?
StefanS

Hallo zusammen,
...und schon wieder ich - konnte im Archiv nichts finden!
Für Euch bestimmt suuuper einfach, für mich die Hölle.
Ich möchte gerne überprüfen, ob in der Spalte B:B Zellen mit gleichen Inhalt doppel oder mehrfach vorhanden sind und wenn ja, welchen Wert diese Zellen ha...
14.05.2009 14:06:36
Thread-ID: 1075153
5 Beiträge
Leere Zelle mit Wert?
André

Moin zusammen,
einen ungewöhnlichen Fehler habe ich in einer Excel-Datei (nicht von Excel selbst erzeugt). Eine Formel, die eigentlich nur ein paar Zahlen addieren soll, wirft als Ergebnis #WERT! aus. Schaut man sich die einzelnen Zellen, die addiert werden sollen, genauer an, fällt auf, da...
03.06.2009 16:53:40
Thread-ID: 1078925
8 Beiträge
Anzeige
Doppelte Werte, abhängig von aktiver Zelle, finden
aktiver

Hallo,
auch nach stundenlanger Suche konnte ich folgendes Problem bisher nicht lösen:
In meinem Tabellenblatt kommen verschiedene Zelleinträge mehrfach vor.
Nun soll, wenn sich der Cursor in einer Zelle befindet, deren Inhalt in der Tabelle nochmals (oder mehrmals) vorkommt, diese Z...
09.08.2009 13:52:48
Thread-ID: 1094515
12 Beiträge
Anzeige
Zellen mit Wert 0 löschen
Mario

Hallo zusammen,
zellen mit wert = 0 zu löschen sollte eigentlich kein Problem sein, aber ich weiß bei untenstehendem Code nicht, wo ich dies einfügen soll. Wenn ich nach IsEmpty(rngZelle) noch ein Or not IsNull(rngZelle) hinsetze, dann verschiebt mir das Makro auch die leeren Zellen....und...
10.08.2009 10:42:10
Thread-ID: 1094641
4 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige