diff options
Diffstat (limited to 'ext/win32ole/sample/excel1.rb')
-rw-r--r-- | ext/win32ole/sample/excel1.rb | 15 |
1 files changed, 13 insertions, 2 deletions
diff --git a/ext/win32ole/sample/excel1.rb b/ext/win32ole/sample/excel1.rb index e366a52839..2cad84a488 100644 --- a/ext/win32ole/sample/excel1.rb +++ b/ext/win32ole/sample/excel1.rb @@ -1,22 +1,33 @@ require 'win32ole' -#application = WIN32OLE.new('Excel.Application.5') application = WIN32OLE.new('Excel.Application') application.visible = TRUE workbook = application.Workbooks.Add(); worksheet = workbook.Worksheets(1); + +=begin worksheet.Range("A1:D1").value = ["North","South","East","West"]; worksheet.Range("A2:B2").value = [5.2, 10]; + worksheet.Range("C2").value = 8; worksheet.Range("D2").value = 20; +=end +worksheet.Range("A1:B2").value = [["North","South"], + [5.2, 10]]; + +vals = WIN32OLE_VARIANT.new([["East","West"], + [8, 20]], + WIN32OLE::VARIANT::VT_ARRAY) +worksheet.Range("C1:D2").value = vals + range = worksheet.Range("A1:D2"); range.Select chart = workbook.Charts.Add; workbook.saved = TRUE; - +sleep 0.5 application.ActiveWorkbook.Close(0); application.Quit(); |