|
分類:[VB.NET (Windows)]
[環境]VB.NET2005 Excel2000(MS Excel 9.0 Object Library)
VB.NETでExcelにデータを出力する(帳票)処理をしています。 帳票で、N列になるデータがあるので、 Excelのテンプレートには基本となる列(例えばA列)を用意し、 必要な列数だけその列(A列)をコピーし、 B列C列D列…に貼り付けるということをしようとしています。
A列(1列)をコピーしていく、というのは下記コードでできました。
'列コピー CType(xlsSheet.Columns(intCol), Excel.Range).Select() CType(xlsSheet.Application.Selection, Excel.Range).Copy()
'列貼り付け CType(xlsSheet.Columns(strColumn), Excel.Range).Select() xlsSheet.Paste()
※intCol:コピー元の列 ※strColumn:コピー先の列 ※列は「A,B,C」ではなく「1,2,3」です。
しかし、A列〜C列(N列)をD列〜F列にコピーというのが いまいちうまくいきません。
下記コードで試したのですがうまくいきませんでした。
'列コピー CType(xlsSheet.Columns(intColFrom & ":" & intColTo), Excel.Range).Select()
※intColFrom:コピー元の列開始位置 ※intColTo:コピー元の列終了位置 ※エラーメッセージ:「HRESULからの例外:0800A03EC」
何かお分かりになられましたらご教授ください。 お願いいたします。
|