まことさん、おはようございます。

＞dw_1.object.data[1, 1] = xlsub.cells[1,13]
＞とすると、
＞外部オブジェクトプロパチィdataのアクセスエラー。データ型が一致しません。
＞といわれます。

cellというオブジェクトを取ろうとしているせいではないかと思います。
cell(x.y).Value で cellの値 を取らないといけないのでは？

＞xlsub.cells[1,13] = dw_1.object.data[1, 1]
＞とする事で、dw_1の１行目１カラム目のデータを、Excelシートの１行目１３列目に入れる事
＞はできます。

これ、Excelの省略可能なプロパティ（この場合 Valueとみなされる）で
上手くいっているに過ぎない気がします。