Excel - Copiar de hoja a hoja

Quiero copiar informacion de una hoja a otra hoja pero no me funciona la linea de codigo
lo que intento es esto:

Sheets("SalGrpLibro").Cells(1, 5).value = Sheets("Formato Permanentes").Cells(2, 2).value

pero me da error de la propieda Range...
y solo me funciona asi pero son muchas lineas de codigo

Sheets("SalGrpLibro").Select
Cells(1, 5).Select
Selection.Copy
Sheets("Formato Permanentes").Select
Cells(2, 2).Select
selection.pastespecial

Haver:

Lo que hay en la primera linea de código no corresponde con lo que hace el listado de la parte inferior.

Trata invirtiendo lo que hay a cada lado del "=" así:

Sheets("Formato Permanentes").Cells(2, 2).value = Sheets("SalGrpLibro").Cells(1, 5).value

Ensayé esta linea de código y me funcionó sin problema.

Por otro lado se puede acortar el código de la parte inferior evitando las parejas inoficiosas Select - Selection así:

Sheets("SalGrpLibro").Select
Cells(1, 5).Copy
Sheets("Formato Permanentes").Select
Cells(2, 2).pastespecial

Espero que estas observaciones sean útiles.

Saludos desde Bucaramanga, Colombia.