> なにか方法があれば教えてください。いい方法かどうかは解りませんが、クリップボード経由でコピペして下さい。ヒント(Sample_No.400 [Excel・Word]) xlSheet.UsedRange.Copy Spreadsheet1.Range("A1").Paste