Hej
Jeg roder lidt med Microsoft Excel Visual Basic
og ønsker at kunne indsætte en formel i en celle.
Jeg har følgende kode:
Sub BeregnPlacering()
AntalBorde = 6
RowA = 5
RowB = 15
ColData = "F"
ColFormel = "I"
For i = 0 To (AntalBorde - 1)
' Nord - Syd
TestCelle = ColData + Trim(Str(RowA + i))
StartCelle = ColData + Trim(Str(RowA))
SlutCelle = ColData + Trim(Str(RowA + AntalBorde - 1))
Formel = "=PLADS(" + TestCelle + ";" + StartCelle + ":" + SlutCelle + ")"
TilCelle = ColFormel + Trim(Str(RowA))
Range(TilCelle).Formula = Formel
' Øst - Vest
Next i
End Sub
Jeg får fejl i linien
Range(TilCelle).Formula = Formel
Er der en der kan hjælpe?
På forhånd tak