Vc não detalhou bem, mas...

A tua planilha tem um código de programação VBA

Clique no nome da planillha (macro) om o botáo direito, e escolha "Exibir Código".

O que vc vai ver é o código que faz a planilha se "autocolorir" quando vc selecionar alguma célula (não só com o mouse/rato, mas com o teclado também).

Se não quiser isso, pode apagar tudo o que estiver no código, ou simplesmente salvar como *.xlsx

Abs

gtsalikis, obrigado pelo interesse.
A questão é que eu quero por o código a funcionar e não consigo. Não percebo o porquê de não funcionar!!!!!

Bom dia!!

Eu não faço ideia do que tu queres, tente assim..

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
   
Target.Interior.ColorIndex = xlNone
   
    With ActiveCell
        .EntireRow.Interior.Color = RGB(217, 217, 217)
        .EntireColumn.Interior.Color = RGB(217, 217, 217)
        .Interior.Color = xlNone
    End With
End Sub

Att

Olá alexandrevba,

Obrigado pela dica. Funciona em parte, a questão é que quando volto a clicar fica tudo sublinhado, ou seja, o sublinhado do click anterior não desaparece!!!

Bom dia!!

Seria +- isso?

Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
Static xRow
Static xColumn
If xColumn <> "" Then
    With Columns(xColumn).Interior
        .ColorIndex = xlNone
    End With
    With Rows(xRow).Interior
        .ColorIndex = xlNone
    End With
End If
pRow = Selection.Row
pColumn = Selection.Column
xRow = pRow
xColumn = pColumn
    With Columns(pColumn).Interior
        .ColorIndex = 6
        .Pattern = xlSolid
    End With
    With Rows(pRow).Interior
        .ColorIndex = 6
        .Pattern = xlSolid
    End With
End Sub

Att

Brutal, vocês percebem muito disto.

Obrigado era mesmo isto que queria...

Abr

Bom dia!!

Se não foi exatamente isso, tente adaptar, creio que não será complicado modela para sua original forma.

fico feliz que resolveu seu problema, obrigado pelo retorno!!!

Att