Code:
With ActiveCell
.EntireRow.Copy
.Offset(1).EntireRow.Insert
Rows(.Row + 1).ClearContents
End With
In de macro wordt een nieuwe regel ingevoegd met de opmaak van de bovenstaande regel en gooit dan de celinhoud leeg.
Jammer genoeg gooit hij ook de formules uit de regel die in cellen E t/m K staan en in cellen BT t/m BW.
Kan de ClearContents aangepast worden dat de formules blijven staan?
bij voorbaat mijn dankBekijk bijlage TEST EST.xlsm
Laatst bewerkt: