I have code below to copy and paste values. I then have one Macro combining several macro like the one below to range value the ranges on all sheets (+- 25 sheets)
It takes +-5 mins to rn and would lioke to know if the code can be amended to speed up the process
It takes +-5 mins to rn and would lioke to know if the code can be amended to speed up the process
Code:
Sub Range_ValPRofits_BRAut()
Dim arr As Variant
Dim n As Variant
Set arr = Range("NP1_BrAu, NP2_BRAUT, NP3_AUT, NP4_AUT, NP5_AUT")
With Sheets("Br1")
For Each n In arr
If .Cells(5, n.Column).Value <> "Finalised" Then
n.Offset(1).Value = n.Value
End If
Next n
End With
Application.CutCopyMode = False
Range("a1").Select
End Sub