2012年7月17日 星期二

[VBA] 從完整路徑擷取 檔名+副檔名



Function GetName(rFile) As String
   
    Dim nameArr As Variant
    nameArr = Split(rFile, "\")
    GetName = nameArr(UBound(nameArr))

End Function


使用說明 --------------------

輸入端:

rFile => 完整的檔案路徑 ( 字串型別 )

輸出端:

GetName => 處理後傳回的字串 ( 只取 檔名 + 副檔名 )


參考資料來源:

chijanzen 雜貨舖

沒有留言:

張貼留言