概要

IronRubyで起動中のExcelのシートを編集するマクロを作ります。
GUI画面を持ち、パラメータを指定することができます。

前提

RubyとExcelのマクロについてある程度知っている方向けです。
本記事のテーマはRubyやExcelマクロの文法やコーディング作法ではなく、Ruby(IronRuby)とExcelを連携させるときのテクニックです。

環境

Windows 8.1（64ビット）
IronRuby 1.1
Excel 2010

開始ボタンのみの例

最初は最もシンプルな例として、開始ボタンのみの画面のあるコードを紹介します。

コード

excel_set_random_with_gui_01.rb

# coding: utf-8

require 'PresentationFramework'

include System::Windows
include System::Windows::Controls

# 起動中のExcelのプロセスにアタッチする
begin
	excel = System::Runtime::InteropServices::Marshal::GetActiveObject("Excel.Application")
rescue
	abort "No Excel process."
end


window = Window.new
window.title = "IronRuby"
window.AllowDrop = true
window.Width="300"
window.Height="300"

button = Button.new
button.MinWidth = 150
button.Content = "乱数書き込み"
window.Content = button

button.Click do |sender, e|
	# カーソルが当たっているセルに1～100の乱数を書き込む
	excel.ActiveCell.Value = rand(100) + 1
end

app = Application.new
app.run(window)

実行方法

[1] Excelを起動します

[2] DOS窓を開き、excel_set_random_with_gui_01.rbを実行します

> "C:\Program Files (x86)\IronRuby 1.1\bin\ir.exe" excel_set_random_with_gui_01.rb

[3] 実行すると"乱数書き込み"というボタンのあるウィンドウが表示されます

[4] ボタンを押すとA1のセルに1～100の乱数が入力されます（カーソルがA1のセルにあるため）

[5] ボタンを連打するとA1のセルの値が次々と変化するはずです

パラメータを指定できる例

次に、ボタンに加えてテキストボックスも配置して、パラメータを指定できるコードを紹介します。

コード

excel_set_random_with_gui_02.rb

# coding: utf-8

require 'PresentationFramework'

include System::Windows
include System::Windows::Controls

# 起動中のExcelのプロセスにアタッチする
begin
	excel = System::Runtime::InteropServices::Marshal::GetActiveObject("Excel.Application")
rescue
	abort "No Excel process."
end


window = Window.new
window.title = "IronRuby"
window.Width="200"
window.Height="100"

label = TextBlock.new
label.Text = "↓接頭辞を入力"

textbox = TextBox.new

button = Button.new
button.Content = "乱数書き込み"
button.Click do |sender, e|
	# カーソルが当たっているセルに1～100の乱数を書き込む
	excel.ActiveCell.Value = "#{textbox.Text}#{rand(100) + 1}"
end

panel = StackPanel.new
panel.Children.Add(label)
panel.Children.Add(textbox)
panel.Children.Add(button)

window.Content = panel


app = Application.new
app.run(window)

実行方法

[1] Excelを起動します

[2] DOS窓を開き、excel_set_random_with_gui_02.rbを実行します

> "C:\Program Files (x86)\IronRuby 1.1\bin\ir.exe" excel_set_random_with_gui_02.rb

[3] 実行するとテキストボックスとボタンが1つずつあるウィンドウが表示されます

[4] テキストボックスに適当な文字を入力します

[5] ボタンを押すとA1のセルに[4]で入力した文字と乱数が入力されます（カーソルがA1のセルにあるため）

[6] ボタンを連打するとA1のセルの値が次々と変化するはずです

何がうれしいの？

Excelのマクロ実行環境のGUIエディタを使わずに、GUIつきマクロを作ることができます。
WPFで作った画面はリサイズが可能であるなど柔軟性があります。