| 
    
     |  | ▼sa さん: 
 ありがとうございます。
 
 >Mid の代わりに Leftを使ってみてください
 
 Left を使い下記のマクロで実行してみたのですが
 なぜか「name〜」の 「na」部分だけのこってしまいます。
 
 実は、+1とかの意味がわかっていないのですが
 これはどういう意味なのでしょうか?
 ご教授お願いいたします。。
 
 
 >>++++++++++++++++++++++++++++++++++++++
 >>
 >>Sub test()
 >>
 >>Dim D As Range
 >>
 >>
 >>  For Each D In Range("A1", Range("A65536").End(xlUp))
 >>   D.Value = Mid(D.Value, InStrRev(D.Value, "\") + 1)
 >>  Next
 
 >>  For Each F In Range("A1", Range("A65536").End(xlUp))
 >>   F.Value = Left(D.Value, InStrRev(D.Value, "date") + 1)
 >>  Next
 
 >>
 >>End Sub
 >>++++++++++++++++++++++++++++++++++++++
 
 |  |