＜分類：値抜き取り＞ ＜使用例：ファイルパス名からフォルダパス名を取出す＞＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String s = "C:\Users\aaa\Desktop\test.xls" s2 = 共通_ファイルパスからフォルダパス名取出し(s) MsgBox ("フォルダ…

＜分類：値取得＞ ＜使用例：ファイルパスから２階層上のフォルダ名を取出す＞＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String Dim n As String 'フルパス '例 １階層上のフォルダ名はDesktop '例 2階層上のフォルダ名はaaa '例 3階層上の…

＜分類：値取得＞ ＜使用例：ファイルパスから１階層上のフォルダ名を取出す＞＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String Dim n As String 'フルパス '例 １階層上のフォルダ名はDesktop '例 2階層上のフォルダ名はaaa '例 3階層上の…

＜分類：値取得＞ ＜使用例：ファイルパスから下層フォルダを先頭に番号(インデックス)で取出し＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String Dim n As String 'フルパス '例 １階層上のフォルダ名はDesktop '例 2階層上のフォルダ名…

＜分類：値取得＞ ＜使用例：ファイルパスからフォルダの数を調べる＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String s = "C:\Users\aaa\Desktop\test.xls" s2 = 共通_フォルダ階層数(s) MsgBox ("フォルダ階層数は " & s2 & " です") En…

＜分類：値抜き取り＞ ＜使用例：ファイルパスからファイル名取出し＞ ＜プログラム例＞ Sub 使用例() Dim s As String Dim s2 As String s = "C:\Users\aaa\Desktop\test.xls" s2 = 共通_ファイルパスからファイル名取出し(s) MsgBox ("ファイル名は " & s2…