Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 17:19:09
Formel mit Index-Funktion
24.04.2024 16:19:42
SummeWenn / SummeWenns mit Bedingung wenn kleiner als dann
24.04.2024 14:48:50
"Eingabefeld" zwischen zwei Zeilen geht nicht weg.
24.04.2024 14:40:10
Zeilenumbrüche in Textbox zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
216to220
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
216to220
216to220
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Letzte 1 in Spalte finden

Letzte 1 in Spalte finden
16.02.2003 13:49:36
Didi
Hallo Forum,

ich brauche mal wieder Eure Hilfe!

In Zelle G10 und in jeder vierten Zelle also G14 steht eine 1
In Zelle G11 und in jeder vierten Zelle also G15 steht eine 2
In Zelle G12 und in jeder vierten Zelle also G16 steht eine 3
In Zelle G13 und in jeder vierten Zelle also G17 steht eine 4

In Zelle G18 wieder eine 1, G19 wieder eine 2 usw.

Jetzt möchte ich per Makro die letzten 1,2,3,4 in Spalte G finden und die Daten von Spalte F neben den letzten 1,2,3,4 in die Zellen C3,C4,C5,C6 kopieren!

Danke im Voraus
Gruss Didi






10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Letzte 1 in Spalte finden
16.02.2003 18:50:16
andre

hallo didi,
wenn 1234 immer da sind - reicht doch die letzte zelle feststellen und diese und die 3 zeilen darüber nehmen oder kann es sein, dass die letzte folge z.b. 123412 ist? was wäre da zu nehmen, nur 12 oder 3412?
gruss andre


Re: Letzte 1 in Spalte finden
16.02.2003 18:58:55
Willi

Salü Didi

Das folgende Makro geht davon aus, dass die Reihenfolge 12341234 genau eingehalten wird und auch keine Leerzeilen dazwischen vorkommen.
Gruss Willi

Sub EinsFinden()

Dim Spalte As Single, Zeile As Single, Zähler As Single

Spalte = 7
Zeile = 1

While Cells(Zeile + 4, Spalte).Value = 1
Zeile = Zeile + 4
Wend

For Zähler = 3 To 6
Cells(Zähler, 3) = Cells(Zeile, Spalte - 1)
Zeile = Zeile + 1
Next

End Sub

Anzeige
Re: Letzte 1 in Spalte finden
16.02.2003 19:22:58
andre

hallo allerseits,
didi ist immer noch gefragt, wie seine reihe aussieht - siehe meine fragen. ansonsten ist man wirklich meist schneller, wenn man von der letzten zeile ausgeht und nicht mit einer schleife über 65000 zeilen abrammelt :-( die arbeit! na zum glück macht das excel.
gruss andre

An Willi
16.02.2003 19:27:17
Didi

Hallo Willi,

Danke für Deine Mühe, aber irgendwas klappt noch nicht, wenn ich das Makro ausführe wird nichts in die Zellen C3,C4,C5,C6 kopiert!

Re: Letzte 1 in Spalte finden
16.02.2003 19:33:17
Didi

Das Makro soll nur die letzten 1,2,3,4, finden, wenn die nächste Reihe nur 1,2,3, sein sollte, muss die vorherige (vollständige Reihe) nach C3,C4,C5,C6 kopiert werden!

Anzeige
Re: Letzte 1 in Spalte finden
16.02.2003 19:46:14
WernerB.

Hallo Didi,

was hältst Du von diesem Makro:

Viel Erfolg wünscht
WernerB.

Re: An Willi
16.02.2003 21:16:36
Will

Falls deine Zahlenreihe erst in bei G10 beginnt, musst du 'Zeile =1' durch 'Zeile=10' ersetzen.

Re: Letzte 1 in Spalte finden
17.02.2003 19:35:00
WernerB.

Hallo Didi,

nachdem Du offenbar kein Interesse mehr an einer Lösung Deines Problems hast, so ist die nachstehende etwas verbesserte Makroversion eben für das Archiv geschrieben:

Viel Erfolg wünscht
WernerB.

An WernerB.
17.02.2003 23:11:44
Didi

Hallo WernerB.

Dein Makro fuktioniert super!

Jetzt bräuchte ich das gleiche nochmal für eine zweite Zahlenreich. Ich hab versucht Dein Makro auf eine neue Zahlenreihe 1,2,3 anzupasen, leider vergeblich!!

Diesmal befindet sich die Zahlenreiche 1,2,3 in Spalte G
die Daten die kopiert werden sollen in Spalte O neben 1,2,3 in G
Kopiert werden soll nach L3, L4, L5.

Vielen Dank nochmal
Gruß Didi


Anzeige
An Didi
18.02.2003 18:13:47
WernerB.

Hallo Didi,

vielen Dank für Dein Feedback; es freut mich, wenn ich Dir helfen konnte.

Wenn es in Deinem "Nachfolgeauftrag" (1-2-3) auch in Zelle G10 losgeht, dann sollte dieses Makro Deinen Wünschen entsprechen:

Viel Erfolg wünscht
WernerB.

300 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

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