ich tüftel seit 2 tagen an einem problem:
im bereich a7 bis b40 soll nach der letzten zelle gesucht werden, die einen eintrag enthält. von dieser letzten zelle aus (entweder von spalte a oder b) soll ein offset in die spalte c (aber gleiche zeile) erfolgen.
ich kriegs einfach nicht hin!
danke schon mal im voraus
mirko
Habe dir einen Ansatz:
Range("a41").End(xlUp).offset(0,2)
Gruss Remo
AW: letzte zelle eines bereiches finden
25.09.2003 15:47:45
Panicman
Hallo Mirko,
versuchs mal mit der Formel:
=INDEX($C:$C;MAX(WENN(ISTZAHL(VERGLEICH({"".-10000000000};A:A;-1));VERGLEICH({"".-10000000000};A:A;-1))))
Gruß
Holger
AW: letzte zelle eines bereiches finden
25.09.2003 15:48:19
WernerB.
Hallo Mirko,
wie gefällt Dir das:
Option Explicit
Sub Mirko()
Dim zNr As Byte
Dim c As Range
Application.ScreenUpdating = False
For Each c In Range("A7:B40")
If c.Value <> "" Then
zNr = c.Row
End If
Next c
Range("C" & zNr).Select
Application.ScreenUpdating = True
End Sub
Viel Erfolg wünscht
WernerB.
P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).