VBA代码 文件名后缀处理2025年3月18日 14:29
Function RealFileName(fname) '纯文件名
'去掉后缀后的文件名
RealFileName = Left(fname, InStrRev(fname, ".") - 1)
End Function
Function FileType(Filename) '获得文件后缀
FileType = Mid(Filename, InStrRev(Filename, ".") + 1)
End Function
全部回复（0）