summaryrefslogtreecommitdiff
path: root/ext/win32ole/sample/excel3.rb
blob: 72aee2a929da9cfd55bd1ef07d4243bf8ed1a7fa (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
# frozen_string_literal: false
require 'win32ole'

#application = WIN32OLE.new('Excel.Application.5')
application = WIN32OLE.new('Excel.Application')

application.visible = true
workbook = application.Workbooks.Add();
sheet = workbook.Worksheets(1);
sheetS = workbook.Worksheets
puts "The number of sheets is #{sheetS.count}"
puts "Now add 2 sheets after of `#{sheet.name}`"
sheetS.add({'count'=>2, 'after'=>sheet})
puts "The number of sheets is #{sheetS.count}"

print "Now quit Excel... Please enter."
gets

application.ActiveWorkbook.Close(0);
application.Quit();