With の使い方で、 FileName1 = objAttach.FileName という行は、 FileName1 = .FileName でもよいのではないか、と思って試してみたら、ちゃんと動いた。 With objAttach と宣言しているのだから、その後はobjAttach という言葉は使わずに、「.（ピリオド）…

objFSO って変数、要らないんじゃないか？と思って外してみたら、無事に動いた。まあ、当然だ。どうして気がつかなかった、というレベル。 ということで、外した版が以下。保存するフォルダ名をちょっと隠したけど、それでも動くはず。動いてください。 Priv…