Como exibir apenas os últimos 4 dígitos do número de identificação fiscal (NIF) no Excel?
Para proteger a privacidade do número de segurança social, muitos utilizadores do Excel optam por exibir apenas os últimos 4 dígitos do NIF. Este artigo mostra-lhe como ocultar todos os dígitos do NIF, exceto os últimos quatro, no Excel.
Mostrar apenas os últimos 4 dígitos do NIF com fórmula
Mostrar apenas os últimos 4 dígitos do NIF com código VBA
Eliminar todos os dígitos do NIF exceto os últimos 4 dígitos com Kutools para Excel
Mostrar apenas os últimos 4 dígitos do NIF com fórmula
A fórmula seguinte permite-lhe exibir apenas os últimos 4 dígitos do NIF no Excel. Siga estes passos:
1. Selecione uma célula vazia, introduza a fórmula =RIGHT(A2,4) na Barra de Fórmulas e, em seguida, prima a tecla Enter. Veja a imagem:
Nota: Na fórmula, A2 é a célula que contém o número de segurança social.
2. Mantenha selecionada a primeira célula com o resultado e arraste a alça de preenchimento para baixo para obter todos os resultados, tal como ilustrado na imagem seguinte.
Elimine facilmente todos os dígitos do NIF exceto os últimos 4 dígitos no Excel:
Com a utilidade Remover caracteres de uma posição do Kutools para Excel, pode eliminar todos os dígitos do NIF exceto os últimos 4, conforme mostrado na imagem seguinte.
Descarregue e experimente já! (teste gratuito de 30 dias)
Mostrar apenas os últimos 4 dígitos do NIF com código VBA
O seguinte código VBA permite mostrar automaticamente apenas os últimos 4 dígitos ao introduzir o número de segurança social. Siga estes passos:
1. Na folha de cálculo onde pretende mostrar apenas os últimos 4 dígitos do número de segurança social, clique com o botão direito do rato no separador da folha e selecione Ver Código no menu de contexto. Veja a imagem:
2. Na janela Microsoft Visual Basic para Aplicações, copie o seguinte código VBA para a janela de código.
Código VBA: Mostrar apenas os últimos 4 dígitos do número de segurança social no Excel
Private Sub Worksheet_Change(ByVal Target As Range)
Dim I As Long
Dim xVal As String
On Error Resume Next
If Intersect(Target, Range("A:A")) Is Nothing Then Exit Sub
Application.EnableEvents = False
For I = 1 To Target.Count
If Len(Target(I).Text) >= 4 Then
Target(I).Value = Right(Target(I).Value, 4)
End If
Next
Application.EnableEvents = True
End SubNota: No código, A:A é a coluna onde introduzirá o número de segurança social. Ajuste-a conforme necessário.
3. Prima as teclas Alt + Q para fechar a janela do Microsoft Visual Basic para Aplicações.
A partir de agora, ao introduzir um número de segurança social nas células da coluna A, todos os dígitos serão automaticamente ocultados, exceto os últimos quatro.
Eliminar todos os dígitos do NIF exceto os últimos 4 dígitos com Kutools para Excel
Pode remover todos os dígitos do número de segurança social, exceto os últimos 4, com a utilidade Remover caracteres de uma posição do Kutools para Excel. Proceda da seguinte forma.
1. Selecione todas as células que contêm números de segurança social e, em seguida, clique em Kutools > Texto > Remover caracteres de uma posição.
2. Na caixa de diálogo Remover caracteres de uma posição, selecione a opção Da esquerda na secção Posição, indique quantos caracteres pretende remover da esquerda na caixa Números (nesta situação, introduzi o número 7) e, em seguida, clique no botão OK. Veja a imagem:
Em seguida, todos os números são removidos das células selecionadas, exceto os últimos quatro dígitos.
Se pretender experimentar gratuitamente esta utilidade durante 30 dias, clique para a transferir e, em seguida, siga os passos indicados acima.
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos