von der Zeile, in der der letzte Wert der Spalte X vorkommt, soll der Wert der Spalte Y ausgelesen werden.
Gruß,
Frank
folgenden Code in ein Modul:
Gruß
Peter
Die Zelle in der die Formel zur Anwendung kommen soll "O3"
Der Spaltenbereich in der die Zeile des letzten Eintrages ermittelt werden soll ist (E5:E bis Ende).
Der Spaltenbereich mit den jeweils auszulesenden Werten (O5:O bis Ende)
Gruß,
Frank
wenn Du das Ergebnis in immer der gleichen Zelle haben willst wäre folgenden Code in das Modul der entsprechenden Tabelle
Gruß
Peter
Cells(3, 15) = Cells(letzte, 5).Offset(0, 10)
Gruß,
Frank
wenn ich die Formel jetzt in VB in das Modul des entsprechenden Worksheet eingetragen habe, was muss ich dann in der Zelle für einen Befehl eingeben, um die Formel zu benutzen ?
Gruß,
Frank
Cells(3 , 15) ist die Zelle(Reihe 3, Spalte 15) also Zelle O3.
Cells(letzte, 5) ist die letzte Zelle in Spalte E und Offset (0, 10) bedeutet in der gleichen Zeile 10 Spalten weiter.
Hoffentlich isses nicht zu verwirrend.
Gruß
Peter
keinen Befehl, der Code wird immer bei einer Änderung einer beliebigen Zelle des Blattes ausgeführt.
Gruß
Peter
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Application.EnableEvents = False
Dim letzte As Integer
If [e65536] = "" Then
letzte = [e65536].End(xlUp).Row
Else
letzte = 65536
End If
Cells(3, 15) = Cells(letzte, 5).Offset(0, 10)
Application.EnableEvents = True
End Sub
Ich habe in dem Sheet keinen weiteren Eintrag in O3 gemacht, bekomme aber keinerlei automatischen Eintrag bzw. Ergebnis dort.
Mein Sheet heisst "fh", muss ich das im VB Code zusätzlich angeben, auch wenn ich ja den Code bereits in die VB-Code-Tabelle des fh-Sheets eingefügt habe ?
Hier habe ich mal eine Beispiel Excel2000 Arbeitsmappe eingestellt :
http://threesixo.com/user/hfpz.net/support/office/excel/20021012_Parallelwert_auslesen
Gruß,
Frank