ScriptomとExcelでセルのユーザ定義書式を設定する

ScriptomとExcelでセルのユーザ定義書式を設定するには、以下のコードを実行します。

import org.codehaus.groovy.scriptom.*;
import org.codehaus.groovy.scriptom.tlb.office.excel.*;

Scriptom.inApartment
{
 ea = new ActiveXObject("Excel.Application")

 wb = ea.workbooks.open(new File("test1.xls").canonicalPath)

 ea.DisplayAlerts = false

 // １枚目のシートのセル範囲A1の値を設定
 wb.sheets(1).Range("A3").Value = 321
 // １枚目のシートのセル範囲A1の表示形式のユーザ定義を設定
 wb.sheets(1).Range("A3").NumberFormatLocal = "0000"

 wb.saveAs(new File("test12a.xls").canonicalPath)
 wb.close
}

サンプルExcelブック(test1.xls)


実行結果


動作環境
groovy 1.6.3/JDK6 Update14/Excel 2007

関連情報
Range.NumberFormatLocal Property
http://msdn.microsoft.com/en-us/library/bb213679.aspx

WSHで同様の処理を行うには以下のスクリプトを実行します。

Set sh = CreateObject("WScript.Shell")
Set xa = CreateObject("Excel.Application")

xa.DisplayAlerts = false

Set wb = xa.workbooks.open(sh.CurrentDirectory + "\test1.xls")
wb.sheets(1).Range("A3").value = 321
wb.sheets(1).Range("A3").NumberFormatLocal = "0000"
wb.saveAs(sh.CurrentDirectory + "\test12b.xls")
wb.close

関連情報

• ScriptomとExcelのまとめ