Copiar una celda combianada en excel en varios libros

Tengo que hacer el mismo cambio en una misma hoja de un elevado grupo de archivos en excel.

El cambio es en una celda dónde pone un texto de varias líneas cambiarlo por otro texto que tengo en otra hoja.

Y lo quiero hacer en un listado de ficheros que tengo en mi equipo.

La hoja donde tengo el texto a incluir se llama Cambio texto

Los libros donde cambiarlo llevan diferentes nombres pero están todas en la misma carpeta, y en todos el lugar del cambio es el mismo: Hoja "Descripción actuación" y la celda (combinada B6:M6).

El libro está proteguido pero eso no me complica la vida.

Paso el código que tengo y que me da error en la parte de pegar.

Me detiene y me señala la línea de pegado, que es esta Range("B6:M6") .PasteSpecial xlPasteValues

Muchas gracias.

Paso el código que tengo

Sub cambiartexto()
Worksheets("hoja1").Range("A8:L8").Copy
Application.ScreenUpdating = False
ruta = ThisWorkbook.Path
ChDir ruta
archi = Dir("*.xls*")
Do While archi <> ""

If InStr(1, archi, "Cambio texto") = 0 Then
Workbooks.Open archi
ActiveWorkbook.Unprotect Password:="contraseña"
Sheets("Descripción actuación").Visible = True
If Err.Number = 0 Then
Sheets("Descripción actuación").Select
Range("B6:M6") .PasteSpecial xlPasteValues
Sheets("Descripción actuación").Visible = False
ActiveWorkbook.Protect Password:="contraseña"
End If
Err.Number = 0
End If
Loop
End Sub