미루스타일 챕터 0 - 인연

요즘들어 회사에서 계속 엑셀 잡무가 떨어지게 돼서 좀 더 간단히 해결할 수 있지 않을까 하는 방법을 찾다가 엑셀 오토메이션 쪽을 찾게 됐습니다. -0-

생각보다 간단하더군요~ 바로 예제소스를 보시죠~

# 요거이가 필요합니다. win32ole require 'win32ole' # Excel을 켜주시고요. xl = WIN32OLE.new('Excel.Application') # 엑셀을 보이게 만듭니다. (기본값은 0이에요) xl.Visible = 1 # 워크북이 하나도 열려있지 않으면 엑셀이 안켜져용~ # 아래처럼 새로 추가를 하든지 불러오든지 2가지 중에 하나를 해야겠죠?. ㅋ wb = xl.Workbooks.Add #wb = xl.Workbooks.Open("test.xls") # 워크시트를 선택해주는데요 0부터 시작이 아니라 1부터 시작이랍니다. ws = wb.Worksheets(1) ws.Name = 'Sample Worksheet' # 2차원 데이터 배열을 만들건데요. 대충 보시면 어떤식인지 아시겠죠? data = %w{핫 둘 셋 넷} datas = Array.new 4.times do datas << data.clone data.shift end # 값을 넣는 방법은 아주 간단하답니다. ^^ 범위를 선택해서 - 값을 넣으면 땡! ws.Range("A1:D4").value = datas # 물론 반대로도 가능하다는거 아시죠?. getData = ws.Range("A1:A4").value p getData # 저장과 종료는 아래와 같이~ #wb.SaveAs('c:\\test.xls') #wb.Close #xl.Quit
주석을 열심히(?) 달아 놓았으니 이해하는데 결코 어렵지 않으리라 생각한답니다~ ㅎㅎ

결과는 아래와 같구요~

---------- Ruby Run EUC-KR ----------
[["핫"], ["둘"], ["셋"], ["넷"]]

출력 완료 (1초 경과)

어때요.. 여러분도 잘 나오시나요?..

그럼 엑셀작업 편히 하세용~

히히~