Как извлечь расширение файла из листа?

Если у вас есть столбец с именами файлов, включая их расширения, и вы хотите получить только расширения файлов из ячеек для какой-то цели. Извлекать их по одному вручную будет слишком утомительно, сегодня я покажу вам несколько простых способов сделать это.

Извлечение расширения файла из листа с помощью формулы

Извлечение расширения файла из листа с помощью пользовательской функции

Извлечение расширения файла из листа с помощью формулы

Чтобы извлечь расширения файлов из ячеек, следующая формула может помочь.

1. Введите эту формулу:

=REPLACE(RIGHT(A2,5),1,SEARCH(".",RIGHT(A2,5)),"") в пустую ячейку рядом с вашими данными. См. скриншот:

2. Затем перетащите маркер заполнения на диапазон, который вы хотите охватить этой формулой, и все расширения файлов будут извлечены из ячеек, см. скриншот:

Извлечение расширения файла из листа с помощью пользовательской функции

Другой способ также может помочь вам выполнить эту задачу — создание пользовательской функции.

1. Удерживайте клавиши ALT + F11, и откроется окно Microsoft Visual Basic for Applications.

2. Нажмите Вставка > Модуль и вставьте следующий код в окно Модуля.

Код VBA: Извлечение расширений файлов из листа

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. Затем сохраните и закройте этот код, вернитесь на лист и введите эту формулу =FileExt(A2) в пустую ячейку рядом с вашими данными, см. скриншот:

4. Затем перетащите маркер заполнения на диапазон, который вы хотите охватить этой формулой, и все расширения файлов будут извлечены из столбца A, см. скриншот:

Совет: В приведенных выше формулах A2 указывает на ячейку, из которой вы хотите извлечь расширение.

Связанные статьи:

Как вернуть имя файла без расширения в ячейку?

Как быстро извлечь имя файла из полного пути в Excel?