Você pode limpar uma célula específica usando o método SelectionChange () do VBA.
Private Sub Worksheet_SelectionChange(ByVal ActCell As Range)
Set TarCell = Sheets(1).[B3]
If ActCell.Address = TarCell.Address Then TarCell.Clear
End Sub
Para este exemplo, escreva algo em nossa célula de destino [B3] e selecione novamente a célula novamente.
A macro será executada em cada nova seleção feita por um usuário. Em seguida, ele verifica se a nova célula selecionada é sua célula de destino desejada TarCell . Se sim, limpe o texto padrão.