Verknüpfung von Werten innerhalb einer Range
15.05.2008 12:50:49
Werten
Folgendes steht in einem Arbeitsblatt:
BSP:
a1 steht 2001
a2 steht 3004
a3 steht 4002
Ich möchte nun eine Funktion die mir folgendes Ergebnis liefert:
"2001"oder"3004"oder"4002" Die " Hochkommata sind dabei entscheidend!
Hintergrund ist: Ich möchte eine Reihe von Werten haben die ich in eine Accesabfrage schreiben kann.
So sieht mein Ansatz aus:
Public Function ODERSTRING(VERGBER As Range) As String
Dim C As Range
Dim estr As String
Dim estrv As String
For Each C In VERGBER
estrv = C.Value
estr = estr & " & "" oder ""& " & estrv
Next C
ODERSTRING = estr
End Function
Das scheint mein altes STRING Problem zu sein!
Wäre schön wenn jemand helfen könnte!
Vielen Dank im Vorraus
Lothar