Hey,
Ich habe ein worksheet mit Formeln in Spalte B. Dort sollte entweder die Formeln stehen ODER der user kann manuell Werte eintragen. Bisher habe ich folgenden VBA code:
"Option Explicit
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim Cell As Range
Dim a As Variant
Dim Zeilenzahl As Long
For Each Cell In ActiveSheet.Range("D8:D15")
a = Cell.Offset(0, -1).Value
If a = "" Or IsNumeric(a) = False Then
Cell.Value = ""
Else
If Cell.Value = "" Then Cell.FormulaArray = "=INDEX('Route Code Presets'!A1:C300,MATCH(1,('Route Code Presets'!A1:A8=Dashboard!D3)*('Route Code Presets'!C1:C8=Dashboard!C8),0),2)"
End If
Next Cell
End Sub"
Die Referenz Dashboard!D3 ist fix, Dashboard!C8 sollte aber weiter nach unten laufen, d.h. in Zelle B8 bezieht sich die Formel auf C8, in B9 auf C9 usw. Wie stelle ich das am besten dar?
Danke+ Gruß
|