XLS_file_path3 := "\4월.xlsx"
엑셀03:= ComObjCreate("Excel.Application")
엑셀03.Workbooks.Open(XLS_file_path3)
엑셀03.Visible:=false
sheetCount := 엑셀03.Sheets.Count, sheetIndex := "", sheetName := ""
sheetCount := 엑셀03.Sheets.Count
시트수 := sheetCount
엑셀03.Sheets(시트수).Copy(ComObjMissing(),엑셀03.Sheets("5월"))
이렇게 해서 마지막 시트수 알아내고 그시트를 복사하고싶은데 안되네요 ㅠㅠ