Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1020to1024
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

Wert der letzten Zeile in Bereich SVerweis

Wert der letzten Zeile in Bereich SVerweis
28.10.2008 20:45:00
Elmar
Hallo,
vielleicht kann mir jemand helfen, wie ich in VBA dieser Formel ==ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],Haupttabelle!R1C1:R65000C7,2,FALSE)"== beibringe, die 65000 durch die letzte belegte Zeile in einer Tabelle zu ersetzen. Die Abfrage mache ich mit ***iRow = Cells(Rows.Count, 31).End(xlUp).Row***, wie bringe ich nun "iRow" in meine Formel?
Danke vorab
Elmar

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

Betreff
Datum
Anwender
Anzeige
AW: Wert der letzten Zeile in Bereich SVerweis
28.10.2008 20:51:00
Hajo_Zi
Hallo Elamar
"=VLOOKUP(RC[-2],Haupttabelle!R1C1:R" & Irow & "C7,2,FALSE)"

AW: Wert der letzten Zeile in Bereich SVerweis
28.10.2008 21:13:52
Elmar
Hallo Hajo,
da bringt er mir dann =SVERWEIS(A2;Haupttabelle!$A$1:$G$1;2;FALSCH). In dem Tabellenblatt sind aber über 22000 Datensätze (Vielleicht mache ich auch was falsch mit dem Auslesen, denn das ist ja ein anderes Tabellenblatt. Hier mein Code: iRow = Worksheets("Haupttabelle").Cells(Rows.Count, 31).End(xlUp).Row
Danke
Elmar
AW: Wert der letzten Zeile in Bereich SVerweis
28.10.2008 21:16:00
Hajo_Zi
Hallo Elmar,
die Letzte Zelle ibn Saplte A lese ich so aus.
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
Gruß Hajo
Anzeige
AW: Wert der letzten Zeile in Bereich SVerweis
28.10.2008 21:21:00
Elmar
Hallo Hajo,
jetzt klappt´s prächtig..... Vielen Dank!!!
Elmar

319 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige