vc pode redefinir o comando colar para colar somente valores.

É um código VBA, faça o seguinte:

Pressione Alt + F11

para abrir o VBE

Dê 2 cliques em "EstaPasta_de_Trabalho" e cole este código:

Private Sub Workbook_Activate()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
End Sub

Private Sub Workbook_Deactivate()
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
End Sub

Private Sub Workbook_Open()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
End Sub

Depois, crie um módulo e cole este código:

Sub Somente_Valores()
On Error GoTo NOCOPY
Selection.PasteSpecial _
    Paste:=xlPasteValues, _
    Operation:=xlNone, _
    SkipBlanks:=False, _
    Transpose:=False
Application.CutCopyMode = False
Exit Sub
NOCOPY:
MsgBox "Não foi possível usar o comando colar.", vbCritical, "Erro Fatal 171"
End Sub

vc pode redefinir o comando colar para colar somente valores.

É um código VBA, faça o seguinte:

Pressione Alt + F11

para abrir o VBE

Dê 2 cliques em "EstaPasta_de_Trabalho" e cole este código:

Private Sub Workbook_Activate()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
End Sub

Private Sub Workbook_Deactivate()
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
End Sub

Private Sub Workbook_Open()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
End Sub

Depois, crie um módulo e cole este código:

Sub Somente_Valores()
On Error GoTo NOCOPY
Selection.PasteSpecial _
    Paste:=xlPasteValues, _
    Operation:=xlNone, _
    SkipBlanks:=False, _
    Transpose:=False
Application.CutCopyMode = False
Exit Sub
NOCOPY:
MsgBox "Não foi possível usar o comando colar.", vbCritical, "Erro Fatal 171"
End Sub

Rapaz, funcionou muito bem pro comando copiar e colar e dá uma mensagem de erro ao tentar recortar e colar..
Até aí beleza, mas eu notei que ainda dá pro cara pegar uma célula com uma formatação e arrastar ela pro lugar de uma outra. Nesse caso a formatação é arrastada junto..

Nao dá pra subestimar a criatividade de quem tá disposto a fazer cagada estragar tudo! Rsrsrsrs...

Nesse caso, em EstaPasta_de_Trabalho, tente assim:

Private Sub Workbook_Activate()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
'bloqueia o arrastar do mouse
Application.CellDragAndDrop = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
'desbloqueia o arrastar do mouse
Application.CellDragAndDrop = True
End Sub

Private Sub Workbook_Deactivate()
'Restaura o Ctrl + v ao original
Application.OnKey "^v"
'desbloqueia o arrastar do mouse
Application.CellDragAndDrop = True
End Sub

Private Sub Workbook_Open()
'Atribui nova função ao Ctrl + v
Application.OnKey "^v", "Somente_Valores"
'bloqueia o arrastar do mouse
Application.CellDragAndDrop = False
End Sub

Ah, sim, amigo, esqueci de dizer...

Ainda não é 100% funcional.

as pessoas ainda podem clicar com o botão direito do mouse e escolher "colar";

podem usar o menu e clicar no botão colar;

podem abrir a planilha sem habilitar as macros...

vc pode contornar estas coisas também, mas, não sei se seria 100% garantido.

Tbm tenho uma planilha baseada em formatações condicionais, quando comecei com as formulas pensei que daria para pegar os valores a parti dessas cores da formatação condicional, tive varios problemas.

tbm peno com isso de area fixa na formatação condicional "apesar de que minha planilha somente eu uso", meu caso pq é uma planilha escalável

enquanto não conseguimos tal façanha no bloqueio da formatação podemos tentar desenvolver uma macro que reaplique a formatação tipo essa

Sub Reset_Format()
Dim x As Integer
Range("A7:R5000").FormatConditions.Delete
For x = 1 To ActiveSheet.Cells.FormatConditions.Count
With ActiveSheet.Cells.FormatConditions(x)
If .AppliesTo.Cells.Address = "$F$6" Then
.ModifyAppliesToRange Range("$F$6:$F$5000")
ElseIf .AppliesTo.Cells.Address = "$A$6:$R$6" Then
.ModifyAppliesToRange Range("$A$6:$R$5000")
End If
End With
Next
End Sub

bem não funcionaria para todos os caso mas já seria alguma coisa
no caso dessa macro imagina que a formatação vai de F6 até R5000
ela limpa a formatação de F7 até o final e estica a formatação condicional novamente que está em F6 até R5000 o mesmo de Aplica-se a ou algo assim.

alguem com experiência em macro poderia ajuda na adaptação

eu uso um modo de planilha auxiliar principal a parti de macro crio uma nova depois uma macro salva de volta, muito complicado

Ah, sim, amigo, esqueci de dizer...

Ainda não é 100% funcional.

as pessoas ainda podem clicar com o botão direito do mouse e escolher "colar";

podem usar o menu e clicar no botão colar;

podem abrir a planilha sem habilitar as macros...

vc pode contornar estas coisas também, mas, não sei se seria 100% garantido.

Pois é, amigo.. Você me ajudou bastante com as ideias, mas o fato de eles poderem não habilitar as macros (até pq o office faz o maior terrorismo que macros podem ser perigosas) já me faz pensar em não utilizá-las.

Talvez a melhor solução seja eu manter um arquivo com o template da formatação e entrar na planilha periodicamente, tipo 1x ao mês, pra consertar copiando e colando a formatação do template.