VBA macro working stopped if i open another excel sheet with copy paste cpde

Question

Macro stop to work if i open another excel please help

Sub CopyValues()

Dim RowNo As Long
RowNo = Sheets(2).Cells(Rows.Count, 4).End(xlUp).Row + 1

    Sheets(2)