Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 11:49:37
Array verwenden
25.04.2024 10:38:52
Bedingte Formatierung per VBA / MaxPoint
25.04.2024 10:30:04
Suche mit MINWENNS und Rückgabe mehrerer Werte
25.04.2024 09:47:49
Daten aus mehreren Dateien untereinander importieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1760to1764
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1760to1764
1760to1764
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Die letzte beschriebene Spalte finden

Die letzte beschriebene Spalte finden
23.05.2020 22:51:13
Peter
Hallo zusammen,
ich möchte in meiner Sub eine For-Schleife bis zur letzten beschriebenen Spalte laufen lassen.
Dabei nutze ich folgenden Befehl:
For y = 5 To x= xlWkSht2.Cells(2, Columns.Count).End(xlToRight).Column
Leider gibt mir x immer eine 0 aus, obwohl Felder beschrieben sind.
Gehe ich hier falsch vor?
Danke und schönen Abend

8
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Die letzte beschriebene Spalte finden
23.05.2020 23:25:52
onur
Ist das dein Ernst?
Eine For Next Schleife besteht aus einem Anfang mit einem festen Endwert: 
For y = 1 to 100
Dann kommt, was in der Schleife abgearbeitet werden soll und am Ende der Next-Befehl: 
For y = 1 to 100
'TU IRGENDWAS
Next y

AW: Die letzte beschriebene Spalte finden
24.05.2020 00:32:10
Peter
Hallo Onur,
verstehe deine Antwort nicht....
Ich hatte ja nicht gefragt wie man eine Schleife macht,das ist mir schon klar.
Ich will, dass meine Schleife eine Liste von Einträgen abarbeitet solange, wie keine Leeren Zellen in dieser sind.
Deswegen will ich, dass diese bis zum Wert
x= xlWkSht2.Cells(2, Columns.Count).End(xlToRight).Column
die Schleife ausführt.
Leider wird mir dieser Wert immer als 0 ausgegeben.
Obwohl die Felder im angesprochenen Arbeitsblatt nicht leer sind.
Ich habe NICHT gefragt wir man eine For Schleife macht.
Anzeige
AW: Die letzte beschriebene Spalte finden
24.05.2020 00:35:10
onur
"Ich hatte ja nicht gefragt wie man eine Schleife macht,das ist mir schon klar." ?
Wieso schreibst du dann: 
For y = 5 To x= xlWkSht2.Cells(2, Columns.Count).End(xlToRight).Column

statt: 
x= xlWkSht2.Cells(2, Columns.Count).End(xlToRight).Column
For y = 5 To x

...und müsste es nicht "End(xlToLeft)" lauten? o.T
24.05.2020 01:22:31
Martin
AW: Die letzte beschriebene Spalte finden
24.05.2020 07:19:54
Barbara
Hi Peter
Probier mal "xlToLeft" statt "xlToRight".
Denn
xlWkSht2.Cells(2, Columns.Count)
bedeutet:
Vom Tabellenblatt "xlWkSht2" die Zelle in Zeile 2 und Spalte "Columns.Count", also die letzte Spalte.
Von dort aus kommst Du mit ".End(xlToRight)" nicht mehr weiter nach rechts, da Du ja mit "Columns.Count" schon am rechten Rand des Excel-Universum stehst.
".End(xlToLeft)" ist dasselbe wie händisch Strg + die Taste "Pfeil nach links" drücken. Das ist dann die letzte nichtleere Zelle in dieser Zeile.
Mit ".Column" bekommst Du dann die Spaltennummer dieser Zelle. Diese Nummer brauchst Du für Deine Schleife.
Daher: 
For y = 5 To xlWkSht2.Cells(2, Columns.Count).End(xlToLeft).Column
Wenn Du "x=" verwenden willst, dann so: 
x= xlWkSht2.Cells(2, Columns.Count).End(xlToLeft).Column
For y = 5 To x
Damit hast Du erst die Spaltennummer bestimmt, und diese dann in die Schleifensteuerung eingesetzt.
Alles Klar?
LGB
Anzeige
AW: Die letzte beschriebene Spalte finden
24.05.2020 12:06:36
Peter
Hallo Barbara,
leider hat auch das nicht geklappt....
Vielen Dank trotzdem, v.a. für die Erklärung :)
Peter
AW: Die letzte beschriebene Spalte finden
24.05.2020 08:32:46
Hajo_Zi
ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Column

AW: Die letzte beschriebene Spalte finden
24.05.2020 12:04:46
Peter
Hallo Hajo,
danke für deine Antwort.
Hat gut geklappt.
VG

304 Forumthreads zu ähnlichen Themen

Letzter Wert einer Spalte (Matrixformel)
{mskro}

Hallo Excelaner,
ich benötige mal wieder eine Hilfestellung.
Es soll der Wert in einer Spalte angezeigt werde, der in der untersten Zeile steht.
Mittels der Recherche habe ich nun folgende MatrixFormel erstellt:
=INDEX(Z1:Z5000;MAX(WENN(Z1:Z5000"";ZEILE(1:5000)));1)
Nur wird...
28.08.2008 09:59:21
Thread-ID: 1005303
9 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
VBA - Summe unter letzter Zeile bilden
mgr

hallihallo!
ich hab jetzt schon ziemlich lang rumgesucht, komm aber leider nicht zum durchbruch. dabei - so unterstelle ich - hab ich ein problem, das schon viele gehabt haben müssten und das wahrscheinlich auch nicht unlösbar ist.
ich habe eine tabelle mit einer variablen anzahl von ze...
07.11.2008 13:39:07
Thread-ID: 1022657
3 Beiträge
Anzeige
Letzte Zeile mit bestimmten Wert finden
Harald

Hallo und schönen Abend
Ich suche in einer Spalte die Zeile mit dem letzten Vorkommen eines bestimmten Wertes. Im Netz habe ich folgenden Code gefunden.
Sub suchen() Set Ws1 = Sheets("Dummy") Call Find_Last("9999999999.999") End Sub
Sub Find_Last(FindString As String) Dim Rng A...
07.12.2008 19:37:02
Thread-ID: 1030899
3 Beiträge
Letzte Leere Zelle in Spalte C
Wacker

Ich habe eine Spalte "C" in der Zahlen fortlaufend erfasst werden.
Bin bereits hier bei Zelle C4500.
Ich müsste jetzt Wissen wie kann ich die Letzte Zelle in der Spalte "C" finden, in der noch keine Zahl Eingetragen ist.
Und dann benötige ich noch für diverse Berechnungen, die Forme...
07.12.2008 22:23:00
Thread-ID: 1030940
9 Beiträge
VBA letzte Zeile Ermitteln
Gerhard

Hallo!
Habe ein kleines Problem. Lasse über VBA die letztz Zeile ermitteln.
intPosAktionNummerEnde = Range("K65536").End(xlUp).Offset(0, 0).Row
Das funktioniert immer nur jetzt habe ich in den Zellen eine Formel stehen, die soll aber nicht gezählt werden nur wenn eine Zahl drinnen s...
14.01.2009 17:52:00
Thread-ID: 1039758
5 Beiträge
Letzte Zelle finden
Gerhard

Hallo!
Hab eine Beispieldatei von meinen Problem gemacht. Wie bringe ich das hin dass die leere Formel ignoriert wird?
https://www.herber.de/bbs/user/58405.xls
Bitte um Hilfe
Gerhrd
14.01.2009 21:49:00
Thread-ID: 1039825
6 Beiträge
letzte Zeile ermitteln - nebenstehende Spalten mar
Erwin

Hallo Spezialisten,
ich habe eine Tabelle, in der immer in Spalte F unterschiedlich viele Zeilen gefüllt sind.
Spalte G + H sind leer und müssen durch Bearbeiter abgearbeitet werden.
Ich möchte nun Spalte G + H mit einer Farbe (.ColorIndex = 36) "verschönern", damit die User genau w...
02.03.2009 10:03:42
Thread-ID: 1055434
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
8
2
4
2
9
2
8
4
5
6
6
5
17
6
1
3
3
4
6
2
2
17
2
11
16