すいませんが 
そのまんまのコードを載せてもらえませんでしょうか？ 
相対パスありで 
アプリをデータボックス化するプログラムを組むとVBが重くて仕方ありません。 
必要な時にはハングリますし。