Olá Lucas!
Não sei se já conseguiu resolver o seu problema, mas a solução prática para você só consigo enxergar através de VBA.

Eu fiz a duplicação das linhas aplicando o seguinte código no seu arquivo deixando apenas uma linha de referencia:

Sub Adicionar_Linha()

Application.ScreenUpdating = False

Dim i As Integer
Dim n As Integer

n = InputBox("Digite quantidade de linhas para acrescentar:")
n = n + 3

For i = 4 To n
Range("A" & i).Activate
ActiveCell.Rows("1:1").EntireRow.Select
Selection.Copy
ActiveCell.Offset(1, 0).Rows("1:1").EntireRow.Select
ActiveSheet.Paste
Next i

Dim shp As Object
Dim lin As Integer

i = 1
lin = 5

For Each shp In ActiveSheet.Shapes
shp.Select
If shp.Name <> "Spinner 1" And shp.Name <> "Drop Down 12" And shp.Name <> "Spinner 13" And shp.Name <> "Spinner 285" _
Or shp.Name <> "Button 329" Then

If i = 1 Then
Selection.LinkedCell = "$B$" & lin
i = 0
Else
Selection.LinkedCell = "$C$" & lin
lin = lin + 1
i = 1
End If

End If
Next shp

Application.ScreenUpdating = True

End Sub

Posteriormente eu publico o arquivo com a macro, que por limitações do ambiente que estou agora não consigo publicar arquivo xlsm.

Mas segue arquivo xlsx com 100 linhas já ajustadas caso te seja útil!
ABraços!