Hi,

I was wondering if you could help me out modify a code that currently paste
values to change the font color to automatic or black and to add multiple
ranges (new ranges are E8:E17, E24:E33,E40:E49 and E56:E81)

The current code is below and works Great! Thanks to everyone that
helped/will help me out!!

Sub PVPrImpct()

With Range("b48:b74").Offset(, Worksheets( _
"Summary by month MTD").Range("A4") - 1)
.Value = .Value
End With
End Sub

Thanks again!