C# と VB.NET の質問掲示板

■No53221 (なつき さん) に返信
> でも、このままくっつけたらエラーになりました。(Dimが見つかりませんなど・・・)
C# での回答を望むなら、最初の質問時に、
　分類:[.NET 全般]
ではなく、
　分類:[C#]
を選択しておいた方が良かったですね。

> どこを置き換える必要がありますか？？
.NET Framework 4 だとこんな感じで書けます。

手元に VS2010 が無かったので、メモ帳でコーディング + 手動コンパイルです。

// ファイル名
//   C:\sample.cs
// コンパイル コマンドライン
//   %WINDIR%\Microsoft.NET\Framework\v4.0.30319\CSC.exe /out:C:\sample.exe C:\sample.cs

using System;
using System.Drawing;
using System.Runtime.InteropServices;

public class Sample {
  public static void Main() {
    string xlsPath = @"C:\book1.xls";
    string imgPath = @"C:\sample.png";

    Rectangle rect = new Rectangle(10, 10, 300, 300);

    Console.Write("Excel を起動します。Enter を押してください。");
    Console.ReadLine();

    var t = Type.GetTypeFromProgID("Excel.Application");
    dynamic xlsApp = Activator.CreateInstance(t);
    xlsApp.Visible = true;
    dynamic xlsBooks  = xlsApp.Workbooks;
    dynamic xlsBook   = xlsBooks.Open(xlsPath);
    dynamic xlsSheets = xlsBook.Worksheets;
    dynamic xlsSheet  = xlsSheets[1];
    dynamic xlsShapes = xlsSheet.Shapes;

    Console.Write("画像を貼り付けます。Enter を押してください。");
    Console.ReadLine();

    dynamic xlsShape = xlsShapes.AddPicture(imgPath, false, true,
      rect.Left, rect.Top, rect.Width, rect.Height);

    Console.Write("貼り付けました。保存して終了します。Enter を押してください。");
    Console.ReadLine();

    xlsBook.Save();
    if(Marshal.IsComObject(xlsShape )) Marshal.ReleaseComObject(xlsShape );
    if(Marshal.IsComObject(xlsShapes)) Marshal.ReleaseComObject(xlsShapes);
    if(Marshal.IsComObject(xlsSheet )) Marshal.ReleaseComObject(xlsSheet );
    if(Marshal.IsComObject(xlsSheets)) Marshal.ReleaseComObject(xlsSheets);
    if(Marshal.IsComObject(xlsBook  )) Marshal.ReleaseComObject(xlsBook  );
    if(Marshal.IsComObject(xlsBooks )) Marshal.ReleaseComObject(xlsBooks );
    xlsApp.Quit();
    if(Marshal.IsComObject(xlsApp   )) Marshal.ReleaseComObject(xlsApp   );

    Console.Write("終了しました。Enter を押してください。");
    Console.ReadLine();
  }
}