2009-03-11から1日間の記事一覧
Function GetFolder(str As Variant) '2.Split関数でファイル名を操作(XL2000のみ) 'Dim Var As Variant 'Var = Split(str, "\") '\マークを区切り文字にして配列化 'Dim i As Integer 'Dim fPath As String 'fPath = "" 'For i = 0 To UBound(Var) - 1 …
Function GetFolder(str As Variant) '2.Split関数でファイル名を操作(XL2000のみ) 'Dim Var As Variant 'Var = Split(str, "\") '\マークを区切り文字にして配列化 'Dim i As Integer 'Dim fPath As String 'fPath = "" 'For i = 0 To UBound(Var) - 1 …