ryou34さん、こんにちは。

＞データウインドゥにExcelファイルのデータを貼り付けれる方法があるときいておりますが、
＞そのﾌﾟﾛｸﾞﾗﾑコードがわかりません。
＞データウインドゥ以外ならinsertfile関数ではりつけれたのですが・・
＞すいませんがどなたか教えていただけないでしょうか？

発言されてからずいぶん経っているのですでに解決されたかもしれませんが、

OleObject Ole_Excel
Long ll_row
Long ll_column
Long ll_count1
Long ll_count2

Ole_Excel = Create OleObject
Ole_Excel.ConnectToNewObject(\"Excel.Application\")

Ole_Excel.Workbooks.Open(\"C:\\My Documents\\Test.xls\")
Ole_Excel.Parent.ActiveSheet.Copy
Ole_Excel.Workbooks[1].Close(False)

ll_row = //Excelの行数 or DWの行数
ll_column = //Excelの列数 or DWの列数

For ll_count1 = 1 to ll_row
  For ll_count2 = 1 to ll_column
    dw_1.Object.Data[ll_count1,ll_count2] = Ole_Excel.Cells[ll_count1,ll_count2].Value
  Next
Next

Ole_Excel.Workbooks[1].Close(False)
Destroy Ole_Excel

こんな感じではいかにも鈍くさくてずいですか？
もしくはExcelのセルをひとつずつ読み込んでタブ区切りの文字列にしてからインポート、とか。
動作は未確認なのでバグっていたらごめんなさいですが。