天天看點

ruby代碼将查找資料存入execl表的處理.rb

ruby代碼将查找資料存入execl表的處理.rb

require 'win32ole'

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

worksheet1 =application.Workbooks.Open(File.dirname(__FILE__) + '/' + "1.xls")
worksheet = worksheet1.Worksheets('Sheet1')
application.DisplayAlerts = false

worksheet.Activate
contLoop = true           # Dummy counter for the loop

while contLoop do

worksheet.Cells(1, 1).Value = 11111
worksheet.Cells(1, 2).Value = 11111222
#puts colVal
#if (colVal) then
#
## 如果這個字段非空,則表示這行有值
#
## 在這裡處理讀取
#
##do processing ….
#
#else
#
## 這裡表明結束。
#
## End the loop
#
#
#end
contLoop = false

# go to the next Row

#row +=  1

end

# we are done
worksheet1.save
application.Workbooks.Close
puts 'ok'