화면띄우기(경로명,시트명)
{
Gui, Submit, Nohide
F1ILL := 경로주소(경로명)
XLS_file_path3 := F1ILL
엑셀03:= ComObjCreate("Excel.Application")
엑셀03.Workbooks.Open(XLS_file_path3)
엑셀03.Visible:= false ;false ;True
NUN_1 := 12
Loop
{
NUN_1++
관명 := 관명표시하기(경로명)
전시물명 := 시트명
A값 := 엑셀03.Sheets(시트명).Range("A" NUN_1).Value
B값 := 엑셀03.Sheets(시트명).Range("B" NUN_1).Value
C값 := 엑셀03.Sheets(시트명).Range("C" NUN_1).Value
D값 := 엑셀03.Sheets(시트명).Range("D" NUN_1).Value
E값 := 엑셀03.Sheets(시트명).Range("E" NUN_1).Value
F값 := 엑셀03.Sheets(시트명).Range("F" NUN_1).Value
IF A값 =
{
break
}
IF (A_index = 1)
{
LV_Add("",관명,전시물명,A값,B값,C값,D값,E값,F값)
}
else
{
LV_Add("","","",A값,B값,C값,D값,E값,F값)
}
}
;엑셀03.ActiveSheet.PrintPreview
;엑셀03.ActiveWorkbook.Save()
엑셀03.ActiveWorkBook.Close
엑셀03.ActiveWorkBook.Save := True
엑셀03.Quit
return
}
이렇게해서 엑셀의 저장내용을 리스트 뷰로 보이게 할려고 만들고있습니다. 아직 초보인지라;;
조금 볼품은 없지만서도 .. ㅎㅎㅎ;;
다름이아니오라.. 저렇게 해서 리스트뷰에 표시하고잇는데 다른건 잘읽어오는데
날짜 부분에서 2016.00000000 이런식으로 나오네요;; 분명 엑셀에는 2016 년만 표시되어있는데;;
뭘잘못한걸까요?
오핫유저는 아니지만 다른 언어에도 아주 우현히 정수와 소수 계산이 번갈아가면서 의미없는 소수점이 쭈욱 나올때가 있습니다. 숫자를 출력하는 변수에 floor(변수) 이렇게 한번해보세요...
A := 3.154864
B := floor(A)
msgbox, %B%