경로 := "나의_엑셀_파일.xlsx"
시작시간 := A_TickCount
커넥션 := ComObjCreate( "ADODB.Connection")
레코드 := ComObjCreate( "ADODB.Recordset")
커넥션.Open( "Provider=Microsoft.ACE.OLEDB.12.0;Data source='" 경로 "';Extended properties='Excel 12.0;HDR=No'")
레코드.Open( "Select * from [Sheet1$] ", 커넥션, 3, 3, 1)
While ! 레코드.EOF
{
Loop % 레코드.Fields.Count
{
셀길이합산 += StrLen( 레코드.Fields.Item( A_Index - 1).Value)
항목개수 ++
}
레코드.MoveNext
}
커넥션.Close()
경과시간 := Floor(( A_TickCount - 시작시간))
MsgBox % ""
. "셀 전체 개수 : " RegExReplace( 항목개수, "(?<=\d)(?=(\d{3})+$)", ",") " 개`n"
. "셀 글자 합산 : " RegExReplace( 셀길이합산, "(?<=\d)(?=(\d{3})+$)", ",") " 개`n"
. "총 소요 시간 : " RegExReplace( 경과시간, "(?<=\d)(?=(\d{3})+$)", ",") " 밀리초"
