Como extrair a extensão do ficheiro da folha de cálculo?
Se tiver uma coluna com nomes de ficheiros que incluam as respetivas extensões e precisar de extrair apenas essas extensões para algum fim, fazê-lo manualmente, um a um, será demasiado cansativo. Hoje, apresento-lhe alguns truques simples para concluir esta tarefa com facilidade.
Extrair a extensão de ficheiro da folha de cálculo com fórmula
Extrair a extensão de ficheiro da folha de cálculo com uma Função Definida pelo Utilizador
Extrair a extensão de ficheiro da folha de cálculo com fórmula
Para extrair as extensões dos ficheiros das células, a seguinte fórmula pode ajudá-lo.
1. Introduza esta fórmula:
=REPLACE(RIGHT(A2,5),1,SEARCH(".",RIGHT(A2,5)),«») numa célula vazia junto aos seus dados. Veja a imagem:
2. Em seguida, arraste a alça de preenchimento até ao intervalo onde pretende aplicar esta fórmula e todas as extensões dos ficheiros serão extraídas das células. Veja a imagem:
Extrair a extensão de ficheiro da folha de cálculo com uma Função Definida pelo Utilizador
Outro método que também o pode ajudar a concluir esta tarefa é criar uma Função Definida pelo Utilizador.
1. Mantenha premidas as teclas ALT + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Clique em Inserir > Módulo e cole o código seguinte na Janela do Módulo.
Código VBA: Extrair extensões de ficheiro da folha de cálculo
Function FileExt(FileName As String) As String
'Update 20141111
On Error Resume Next
If InStrRev(FileName, ".") > 0 Then FileExt = Right(FileName, Len(FileName) - InStrRev(FileName, "."))
If Err <> 0 Then MsgBox Err.Description, vbCritical, "Kutools for Excel"
End Function
3. Depois de guardar e fechar este código, regresse à folha de cálculo e introduza a fórmula =FileExt(A2) numa célula vazia junto aos seus dados. Veja a imagem:
4. Em seguida, arraste a alça de preenchimento até ao intervalo onde pretende aplicar esta fórmula e todas as extensões dos ficheiros serão extraídas da coluna A. Veja a imagem:
Dica: Nas fórmulas acima, A2 indica a célula da qual pretende extrair a extensão.
Artigos relacionados:
Como obter o nome do ficheiro sem a extensão numa célula?
Como extrair rapidamente o nome do ficheiro a partir do caminho completo no Excel?
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