Modificar para abrir otro libro y pegar selección

En un libro PRINCIPAL, tengo un botón que ejecuta el siguiente procedimiento:
Private Sub CommandButton1_Click()
'Selección de Celdas J506:T506
Range("J506:T506").Select
'Copia de la selección
Selection.Copy
'Activación de la hoja ANUAL
Sheets("ANUAL").Select
'Búsqueda de la primera fila libre
fila = 4
Do While ActiveSheet.Cells(fila, 1).Value <> Empty
fila = fila + 1
Loop
'Activación de la celda libre y pegado de los datos
ActiveSheet.Cells(fila, 1).Select
Selection.PasteSpecial Paste:=xPasteValues, Operation:=x1None, SkipBlanks_:=False, Transpose:=False
End Sub
Quisiera modificar el mismo para que al hacer click, me abra el libro RESUMEN y se active la hoja ANUAL y busque la primera fila libre para pegar la selección