タイトル : Re^4: エクセル間でで値だけのコピー 投稿日 : 2007/12/24(Mon) 16:46 投稿者 : K
GOD様、花ちゃん様、お世話になります。 花ちゃん様からご返答を頂いた、CopyFromRecordsetは ADOのみ対応してるものとの事で、 こちらではOLEDBを使用しているため使えないようです。 GOD様からご返答を頂いた、「クリップボードを利用して」では、私の知識不足もありますが、クリップボードへのデータを入れ方はわかったのですが、貼り付け方がわからずに断念しました。 その後、VB.netのヘルプを参考に、2次元配列のオブジェクト変数を宣言してその変数に DataGrid上のデータを取り込み、それを下記のようにエクセルに貼り付けるようにしました。 Dim WriteLine(dTbl.DefaultView.Count, 2) As Object For Row_Num = 0 To dTbl.DefaultView.Count - 1 For Clm_num = 0 To 33 WriteLine(Row_Num, Clm_num) = DataGridEx1.Item(Row_Num, Clm_num) Next Next xlSheet.Range("A11").Resize(dTbl.DefaultView.Count, 34).Value = WriteLine これで思ってた通りの処理ができるようになりました。 GOD様、花ちゃん様、本当にありがとうございました。 |