Clever-Excel-Forum

Normale Version: letzter Wert
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Leute,

ich benötige ein wenig Hilfe, stehe im Moment auf dem Schlauch.

Mit

WorksheetFunction.Max(Range("D:D")) 

bekomme ich aus der Spalte D den höchsten Wert angezeigt, das sagt "Max" aus.

jetzt benötige ich aber den "letzten Wert" aus aus der Spalte, wie lautet der?

Im Voraus vielen Dank

Peter
Hi,

Code:
=VERWEIS(2;1/($D$1:$D$200<>"");$D$1:$D$200)
Hallo Günter,

das klappt nur wenn die Zeilen nacheinader befüllt werden. in meinem Beispiel wurde die "211" als letztes eingegeben ...

Tabelle1

DEFGHI
111
22
3211
43
Formeln der Tabelle
ZelleFormel
I1=VERWEIS(2;1/($D$1:$D$200<>"");$D$1:$D$200)

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8



Gruß
Marcus
(29.11.2019, 16:17)marose67 schrieb: [ -> ]Hallo Günter,

das klappt nur wenn die Zeilen nacheinader befüllt werden. in meinem Beispiel wurde die "211" als letztes eingegeben ...

Gruß
Marcus

Hallo, ich glaube es geht um den Wert der am Ende der Liste steht, nicht der der als letztes eingegeben wurde...
Hi Marcus,

deinen Einwand verstehe ich jetzt gerade nicht. Es wird mit der Formel immer der letzte Eintrag der Spalte gefunden.

Arbeitsblatt mit dem Namen 'Tabelle1'
DE
15xx
217
3211
46
5
6a
7
82
9
10xx

ZelleFormel
E1=VERWEIS(2;1/($D$1:$D$200<>"");$D$1:$D$200)
Verwendete Systemkomponenten: [Windows (32-bit) NT 10.00] MS Excel 2016
Diese Tabelle wurde mit Tab2Html (v2.6.0) erstellt. ©Gerd alias Bamberg
Hallo Günter,
velleicht habe ich die Fage ja falsch verstanden. Mein letzter Eintrag wurde zwischen den vorherigen Einträgen gemacht.

sorry
Marcus
Hallo Leute,

ich füge mal meine Beispieltabelle bei.

Also, wenn ich die Userform starte, möchte ich, dass das Feld "letzter Bestand" gefüllt wird mit dem letzten Wert aus der Tabelle, Spalte "E".

Ich hoffe es wird jetzt klarer.

MfG

Peter
Hallo,

versuche es mal so:

Code:
Private Sub UserForm_Initialize()
   
   Text_Laufende_Nummer = ""                                          'Laufende Nummer
   Text_Alter_Bestand = Cells(Range("E" & Rows.Count).End(xlUp).Row, 5)                                          'Alter Bestand
   Text_Zugang = ""                                                   'Zugang
   Text_Abgang = ""                                                   'Abgang
   Text_Neuer_Bestand = ""                                            'Neuer Bestand
   
End Sub
Hallo Klaus-Dieter,

es funktioniert.

Vielen Dank für deine Unterstützung.

Peter