require 'win32ole'
excel = WIN32OLE.new("Excel.Application")
excel.WorkBooks.Open("f:\\book1.xls") #打开excel
worksheet = excel.ActiveWorkbook.WorkSheets(1)
line = 1
while worksheet.Range("a#{line}")['Value']
line=line+1
end #line的值为第一处空白行的行数
line = '2'
data = []
while worksheet.Range("a#{line}")['Value']
data << worksheet.Range("a#{line}:d#{line}")['Value']
line.succ!
end