Hello

I have a macro code to copy the hompage sheet then paste it to other visible worksheets except the hompage. However it only works on the active worksheet only. This is my code, appreciate if you guys can help me out

Sub Copy_Paste_Template()

Dim wsHP As Worksheet, ws As Worksheet
Dim hpRng As range, wsRng As range

    Application.ScreenUpdating = False
    Set wsHP = Worksheets("Home Page")
    Set hpRng = wsHP.range("B19:AN32")
    hpRng.Copy
        
    For Each ws In ThisWorkbook.Worksheets
        If ws.Name <> wsHP.Name Then
            Set wsRng = range("B1")
            wsRng.PasteSpecial xlPasteAll
        
        End If
        
    Next ws
    
    Application.ScreenUpdating = False
    

End Sub
Thank you