Sub MaMacro()
Dim wbk As Workbook
Dim Ws As Worksheet
For Each wbk In Application.Workbooks
For Each Ws In Worksheets
Range("D51").Value = 0.42
Range("D52").Value = 1.67
Range("D53").Value = 2.08
Range("D54").Value = 2.5
Range("D55").Value = 4.17
Range("D56").Value = 4.58
Range("D58").Value = 0.91
Range("D59").Value = 1.82
Range("D60").Value = 2.27
Range("D61").Value = 3.18
Range("D62").Value = 2.27
Range("D63").Value = 4.55
Next Ws
Next wbk
End Sub