段落がバラバラなのを忘れてました。すみません。なるほど、Sub data()の中にaddがあったからですね。終了用まで加えて頂き、助かりました。nobuさんありがとうございました。実行の周期を短くする事がどうしても必要だったためにタイマーを使用したのですが、タイマー無しで出来る事もわかって勉強になりました。akさん、ありがとうございます!