|
Hallo Leute,
ich habe in Spalte B eine durchgehend gefüllte Spalte mit Werten. In Spalte A habe ich eine Formel, welche auf die Spalte B als Grundlage zugreift (Verketten).
Sub Formeln()
Dim lngLetzeZeile As Long
With Worksheets("3.2| MCSI statement") '--Blattname anpassen
lngLetzeZeile = .Range("B:B").Find(What:="*", After:=Range("A1"), LookIn:=xlFormulas, _
SearchDirection:=xlPrevious).Row
'Formeln in U2:W
.Range("A9:A" & lngLetzeZeile).FillDown
End With
End Sub
Die Formel steht in A9 und soll bis zur letzte n ausgefüllten Zeile von B herunterkopiert werden. Der Code funktioniert bereits bei einer anderen Formel, jedoch kommt steht die Formel in einer SPalte nach B. Könntet ihr mir freundlicherweise weiterhelfen? :-)
Vielen Dank im voraus und betse Grüße
|