im nachfolgenden VBA-Code werden in zwei
Bereichen (B11:C22 und B29:C40) leere Zellen gesucht
und markiert.
Jetzt möchte ich dass, die darüber liegende Formeln in
die Markierte Zellen kopiert werden.
Sub ZeileFüllen()
Dim Ber1 As Range
Dim Ber2 As Range
Dim Bereiche As Range
Worksheets("Ergebnisse").Activate
Set Ber1 = Range("B11:C22")
Set Ber2 = Range("B29:C40")
Set Bereiche = Union(Ber1, Ber2)
Bereiche.SpecialCells(xlCellTypeBlanks).Select
End Sub
kann mir jemand helfen?
Vielen Dank.
Grüße