C#のExcel操作で、ブック間のシートのコピーがしたい

Question

前提・実現したいこと

C#のExcel操作で、ブック間のシートのコピーがしたいです。
例えば、「ブックA」のsheet1を「ブックB」にコピーしたいです。

発生している問題・エラーメッセージ

System.Runtime.InteropServices.COMException: HRESULT からの例外です

該当のソースコード

ExcelTest excel1 = new ExcelTest("excel1ファイルのパス");
ExcelTest excel2 = new ExcelTest("excel2ファイルのパス");

//コピー元とコピー先のエクセルを開く
excel1.Open();
excel2.Open();

var sheet1 = excel1.Sheets("コピーしたいシート")
var sheet2 = excel2.Sheets("コピー先")

sheet1.Copy(Type.Missing, sheet2); //ここでエラー

補足情報

コピー先を同ブックに指定するとエラーは出ません。
そもそもWorkBookクラスのCopyメソッドではブック間ではCopyできないのでしょうか。

もし方法がありましたらご教授願います。

Comments

[imihito]

書き方、エラーメッセージからExcelをCOM操作していると思われますが、`excel1`、`excel2`は具体的には何型ですか？

[airu_chat]

はい、COM操作で苦戦しております。excel1とexcel2の型は、自作のExcelWorkクラスの型になります。

[imihito]

自作クラス間でExcelのインスタンスは共有していますか？それぞれ新規にインスタンスしていますか？

[airu_chat]

共有はしておりません。それぞれ新規にインスタンスを生成しております。

Answer 1

Excelはマルチインスタンス可能なアプリケーションとなります。

参考：Office のプロセス インスタンス制御について – Japan Office Developer Support Blog

そして、オブジェクトを引数とするメソッドに別のExcelインスタンス由来のオブジェクトを渡すと原則失敗します（私の経験上）。

今回の場合、sheet1とsheet2で属しているExcelのインスタンスが異なるのが原因となります（前回の質問も原因は同じです）。

対処としては、自作クラスの処理を変更して、自作クラス間でインスタンスを共有するように変更するのが正攻法となります。

その場しのぎで良ければ以下のコードでコピーできるはずです。

// using Excel = Microsoft.Office.Interop.Excel;

ExcelTest excel2 = new ExcelTest("excel2ファイルのパス");

excel2.Open();
var sheet2 = excel2.Sheets("コピー先")

Excel.Workbook copyFromBook = sheet2.Application.Workbooks.Open("excel1ファイルのパス");
// 他の種類のシートなら型を変更
Excel.Worksheet sheet1 = (Excel.Worksheet)copyFromBook.Worksheets.Item("コピーしたいシート");

sheet1.Copy(Type.Missing, sheet2);

Comments

[airu_chat]

ご回答ありがとうございます。
教えていただいたコードでコピーができました。

また、自作クラスを改修することでコピーすることも可能となりました。
ご教授ありがとうございました。

Answer 2

こういう質問については、Spire.XLSってライブラリを使ってごらん。

ブック間のシートのコピーはできますし、簡単です。

サンプルコードをご覧になってください

Workbook workbook1 = new Workbook();
workbook1.LoadFromFile("Vendor.xlsx");

//一つ目Worksheetを取得します。
Worksheet sheet1 = workbook1.Worksheets[0];

//二つ目のExcelをロードします。
Workbook workbook2 = new Workbook();
workbook2.LoadFromFile("Report.xlsx");

//一つ目のExcelから一つ目のシートを二つめのExcelにコピします。
Worksheet sheet2 = workbook2.Worksheets.AddCopy(sheet1);
sheet2.Name = "Copy";

//保存します
workbook2.SaveToFile("Report.xlsx");

どうですか？

Answer 3

ネットで拾ったVBAですが、この例だとBook1のSheet1がBook2のSheet1の後に
Sheet1(2)というシート名でコピーされるようです。

上記のコードでもいけそうですがCopy _
After:=の使い方ができていないように見受けられます。

補足ですが、このコードはファイルをOpenしていないので事前にブックを開いておくそうです。

Sub macro9()
Workbooks("Book1.xlsx").Sheets("Sheet1").Copy _
After:=Workbooks("Book2.xlsx").Sheets("Sheet1")
End Sub

上記はVBAでC#ではありませんでした。すみません。
C#もExcelも持っていませんが、次のコードでどうでしょう？

ExcelTest excel1 = new ExcelTest("excel1ファイルのパス");
ExcelTest excel2 = new ExcelTest("excel2ファイルのパス");

//コピー元とコピー先のエクセルを開く
excel1.Open();
excel2.Open();

Worksheet sheet1 = excel1.Sheets[1];
Worksheet sheet2 = excel2.Sheets[1];

sheet1.Copy(Type.Missing, sheet2);