Microsoft Excel

Herbers Excel/VBA-Archiv

letzte Zelle mit eintrag | Herbers Excel-Forum


Betrifft: letzte Zelle mit eintrag von: Jens
Geschrieben am: 24.10.2008 12:17:14

Hallo,

ich habe ein problem....

in einer tabelle (spalte) werden immer mehr werte eingetragen.... von A16 bis A....

in zelle A7 soll nun automatisch der letzte, also unterste wert der in der entspr. spalte eingetragen ist übernommen werden....

mfg
Jens

  

Betrifft: AW: letzte Zelle mit eintrag von: heiko
Geschrieben am: 24.10.2008 12:32:12

Hallo Jens,


Dim letztezelle As Range
Set letztezelle = Cells(Rows.Count, Range("A1").Column).End(xlUp)
Range("A7")=letztezelle.Value

Range("A1") kennzeichnet dabei die spalte, in der du den letzten wert finden willst.
Ein hochzählen der spalten ließe sich z.b. so realisieren:

For s = 65 To 74 'ASCII für buchstaben
Set letztezelle = Cells(Rows.Count, Range(Chr(s) & "1").Column).End(xlUp)
...
Next s

Heiko


  

Betrifft: AW: letzte Zelle mit eintrag von: Jens
Geschrieben am: 24.10.2008 12:50:30

geht das evtl auch irgendwie mit ner Formel....?

mfg
Jens


  

Betrifft: AW: letzte Zelle mit eintrag von: David
Geschrieben am: 24.10.2008 16:26:25

Hallo Jens,

guckst du hier:

http://www.excelformeln.de/formeln.html?gruppe=9

Gruß
David


Beiträge aus den Excel-Beispielen zum Thema "letzte Zelle mit eintrag"