>>728
たとえば、マクロ中の
ActiveWorkbook.FullName を
Replace(ActiveWorkbook.FullName, Application.PathSeparator, "/")
に書き換えるのはどうでしょう？