BDF Aktualisierung bei Betätigung der Tastatur
23.12.2016 09:42:52
Jens
ich habe eine benutzerdefinierte Funktion diese zeigt #Wert! an, sobald ich z.b eine Zeile per Vba einfüge
Wenn ich aber in irgendeine Zelle einen Wert oder Buchstaben per Tastatur schreibe, dann wird die Funktion ausgeführt und es erfolgt die richtige Darstellung bzw. die richtige Ausgabe der Funktion.
Die Funktion sieht so aus.
Function Kette2(Vorgabe As Range, Ketten As Range)
Dim Zelle As Range
Dim T As String
Application.Volatile
For Each Zelle In Vorgabe
T = Zelle.Value
Select Case T
Case "leer"
Kette2 = Kette2 & " "
Case ""
Kette2 = Kette2 & ""
Case Else
If T Like "[A-Z]" Or T Like "[A-Z][A-Z]" Then
Kette2 = Kette2 & Ketten.Worksheet.Cells(Ketten.Row, T).Text
Else
Kette2 = Kette2 & T
End If
End Select
Next
End Function