Hi incubi,
Welcome to the Excelforum!

Please try the below code for your button click event

    Range("A7:Q8000").Select
    Selection.FillDown
    Range("A6").Select
Before running the automation please ensure the below changes are done
1. In cell A7 put =$A$5
2. In cell P7 put =IF(K7=0,"",O7/K7)
3. In cell Q7 put =IF(L7=0,"",O7/L7)
This is to ensure that all the formulas in Row 7 are accurate.