|    | 
     >ちなみに、最終的にどのようにしたかをご紹介いただけると過去ログとして、 
>残り、後々掲示板を見ている方々に役に立つこともありますので、差し支え 
>なければ、教えていただければと思います。 
 
失礼致しました。 
マクロ内容は以下のようになっております。 
 
しかし、今試したところ 
既に【Book1.xls】が開いた状態で、 
マクロを実行するとでファイルが2重で開くことになってしまいます。 
 
『ファイルが既にOPENされていれば【Book1.xls】をOPENする必要はない』 
というような制御は可能でしょうか? 
これはマクロの記録ではできない部分のようで…。 
 
********************************************************* 
Sub Macro1() 
  ChDir "C:\DOCUMENTS AND SETTINGS\XXXX\デスクトップ" 
  Workbooks.Open Filename:= _ 
    "C:\DOCUMENTS AND SETTINGS\XXXX\デスクトップ\Book1.xls" 
  Range("A1:E1").Select 
  Selection.Copy 
  Windows("1Book1.xls").Activate 
  ActiveSheet.Paste 
End Sub 
********************************************************* 
 
 | 
     
    
   |