UDF - inkl. Übergabe der aktuellen Position
10.09.2008 11:06:00
Peter
Ich möchte selbst eine Funktion basteln, scheitere jedoch schon bei Grundlegendem.
In meiner Tabelle habe ich einen Spaltenbereich mit "Identifier" benannt. Dieser kann sich in Spalte O, P, Q etc.. befinden.
Nun möchte ich in der gleichen Tabelle mittels Funktion den Bezug zur entsprechenden Spalte ausfindig machen.
Beispiel
Annahme: Bereich "Identifier" befindet sich in Spalte P
Ich gebe in Zelle C3 die selbstgebastelte Funktion ein: Ident("Identifier")
Als sollte mir die Funktion P3 ausgeben
Dies möchte ich erreichen, indem ich die Spaltennummer des benannten Bereiches abfrage und mittels aktueller Zeilennummer den gewünschten Bezug errechne.
Kann mir jemand weiterhelfen?
Danke, Peter
Public Function Ident(BenBereich As Range) As String
Dim lngSpalte As Long
lngSpalte = Row(BenBereich)
ZEILENNUMMER aus der ABFRAGEFUNKTION stammt
Ident = Spalte und Zeilennummer im Format Spaltenbuchstabe&Zeilennummer
End Function