Planti Excel 2003 con 2007?

Estimado Dante, gracias por la ayuda anterior, me falta esta segunda parte para poder hacer funcionar al 100% esta plantilla en excel 2007, agradezco la ayuda. El problema de la macro se presenta al regresar a la cotización (marcado con negrita más abajo)

' Confirmar estado cotiz.
Range("Y2") = 2 '2 = con archivo txt mail
'1 = sin archivo txt mail
Range("H3") = "Archivo modificado"
' Abrir y desproteger archivo original txt mail
' Abrir sólo si no está abierto
If wkbArchivo_Txt_Mail Is Nothing Then
Set wkbArchivo_Txt_Mail = Application.Workbooks.Open(FileName:=NombreArchivo_Txt_Mail)
ActiveSheet.Unprotect
End If
'Regresar a cotización para activarla
Windows(NombreArchivo_Cotiz).Activate
Sheets("cotiz").Select
' Marcar y copiar
Application.Goto Reference:="R6C1"
Range("A6:K80").Select
Range("K6").Activate
Selection.Copy
Application.Goto Reference:="R6C1"
' Acvivar archivo txt mail y pegar texto
Windows(NombreArchivo_Txt_Mail_Activate).Activate
Application.Goto Reference:="R6C1"
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.Goto Reference:="R6C1"
' Proteger y guardar archivo texto mail
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
ActiveWorkbook.Sabe