Печать страницы - VBA Макросы. Как извлечь расширение из полного имени файла?

Название: VBA Макросы. Как извлечь расширение из полного имени файла?
Отправлено: Посетитель от 29 декабря 2020, 03:07

Как извлечь расширение из полного имени файла?

Название: Re: VBA Макросы. Как извлечь расширение из полного имени файла?
Отправлено: Администратор от 29 декабря 2020, 07:05

Sub Макрос()

Dim FN_Файл As String, Расш As String

FN_Файл = "C:\Users\User\Desktop\Папка\Имя файла.xlsb"
Расш = Mid(FN_Файл, InStrRev(FN_Файл, ".") + 1)

End Sub

Название: Re: VBA Макросы. Как извлечь расширение из полного имени файла?
Отправлено: Посетитель от 29 декабря 2020, 07:30

спасибо

Форум по VBA и MS Office

VBA, Excel => VBA, макросы в Excel => Тема начата: Посетитель от 29 декабря 2020, 03:07