Formeln in Zelle
30.10.2018 15:54:35
Fred
Ich würde gerne in ein paar zellen Formeln per VBA eintragen lassen, aber irgendwie funktioniert das nicht richtig. Der Code wird zwar ausgeführt ohne Erros aber eingetragen werden die Formeln leider nicht. was mache ich falsch?
Sub Eintragen_SFM()
Dim Bereich As Range
Dim Zelle As Range
Dim wksData As Worksheet
'Verweis auf Worksheet mit Daten setzen
Set wksData = ThisWorkbook.Worksheets("SFM")
Set Bereich = wksData.Range("C6:C11")
Range("C6").FormulaLocal = "=LINKS(Arbeitssicherheit!F2;20)"
Range("C7").FormulaLocal = "=LINKS(Arbeitssicherheit!F3;20)"
Range("C7").FormulaLocal = "=LINKS(Arbeitssicherheit!F4;20)"
Range("C9").FormulaLocal = "=LINKS(Arbeitssicherheit!F5;20)"
Range("C10").FormulaLocal = "=LINKS(Arbeitssicherheit!F6;20)"
Range("C11").FormulaLocal = "=LINKS(Arbeitssicherheit!F7;20)"
End Sub