Public Sub TaxBenefitPasteG11() Dim FileToOpen As String Dim rng1 As Range Dim rng2 As Range Dim rng3 As Range Dim rng4 As Range Dim rng