최근 자바스크립트를 이용해 엑셀을 조작하여 보고서를 생성하는 프로젝트를 진행했습니다. 다음은 자세한 주석이 표시된 예시입니다. 코드 복사 코드는 다음과 같습니다. script 언어="javascript" type="text/javascript"> <br>function MakeExcel(){ <br>var i,j; <br>try { <br>var xls = new ActiveXObject( "Excel.Application" ); <br>} <br>catch(e) { <br>alert( "이 표를 인쇄하려면 Excel 스프레드시트 소프트웨어를 설치해야 하며, 브라우저에서 "ActiveX 컨트롤"을 사용해야 하며, 브라우저에서 실행 제어를 허용해야 합니다.브라우저 설정 방법을 알아보려면 [도움말]을 클릭하세요!"); <br>return ""; <br>} <br>xls.visible =true; //Excel을 표시되도록 설정 <br>var xlBook = xls.Workbooks.Add; <br>var xlsheet = xlBook.Worksheets (1) <br><!--병합--> <br>xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).mergecells=true; xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,7)).value="카드 발급 기록" <br>// xlsheet.Range(xlsheet.Cells(1,1),xlsheet . Cells(1,6)).Interior.ColorIndex=5;//배경색을 파란색으로 설정<br>// xlsheet.Range(xlsheet.Cells(1,1),xlsheet.Cells(1,6)) . Font.ColorIndex=4;//글꼴 색상 설정 <br>// xlsheet.Rows(1) Interior .ColorIndex = 5;//배경색을 파란색으로 설정하고 배경색을 설정합니다. Rows(1).Font .ColorIndex=4 <br><!--행 높이 설정--> <br>xlsheet.Rows(1).RowHeight = 25 <br><!--글꼴 설정 ws.Range(ws.Cells) (i0 1, j0), ws.Cells(i0 1,j1)).Font.Size = 13 --> <br>xlsheet.Rows(1).Font.Size=14 <br><!- -글꼴 설정 선택 영역의 글꼴 xlsheet.Range(xlsheet.Cells(i0,j0), ws.Cells(i0,j0)).Font.Name = "Heibody" --> (1).Font .Name="Helvetica"; <br><!--열 너비 설정 xlsheet.Columns(2)=14;--> <br>xlsheet.Columns("A:D"). ColumnWidth =18; <br><!--숫자 대신 문자를 표시하도록 설정--> <BR>xlsheet.Columns(2).NumberFormatLocal="@" <BR>xlsheet.Columns(7).NumberFormatLocal ="@"; <BR><BR>//셀 내용을 자동으로 줄 바꿈하도록 설정 range.WrapText = true <br>//셀 내용 범위의 가로 정렬을 설정합니다.HorizontalAlignment = Excel.XlHAlign.xlHAlignCenter;/ /셀 내용을 수직으로 쌓도록 설정 Method<br>//range.VerticalAlignment=Excel.XlVAlign.xlVAlignCenter <BR>//range.WrapText = true; .Cells(2,1).Value="Card number"; 🎜>xlsheet.Cells(2,2).Value="비밀번호"; <BR>xlsheet.Cells(2,3).Value="청구 방법 "; <BR>xlsheet.Cells(2,4).Value= "유효일"; <BR>xlsheet.Cells(2,5).Value="금액"; <BR>xlsheet.Cells(2,6) .Value="서비스 항목" <BR>xlsheet.Cells(2 ,7).Value="카드 발급 시간"; <BR>var oTable=document.all['fors:data'] <BR>var rowNum =oTable.rows.length <BR>for(i=2; i<=rowNum;i ){ <BR>for (j=1;j<=7;j ){ <BR>//html 테이블 클래스 내용 Excel <BR>xlsheet.Cells(i 1,j)에 쓰기. Value=oTable.rows(i-1).cells(j-1).innerHTML; <BR>} <BR><BR>} <BR> <!-- xlsheet.Range(xls.Cells(i 4, 2),xls.Cells(rowNum,4)).Merge; --> <br>// xlsheet.Range(xlsheet.Cells(i, 4), xlsheet.Cells(i-1, 6)).BorderAround , 4 <br>// for(mn=1,mn<=6;mn ) . xlsheet.Range(xlsheet.Cells(1, mn), xlsheet.Cells(i1, j)).Columns.AutoFit; >xlsheet.Columns.AutoFit; <br>xlsheet.Range( xlsheet.Cells(1,1),xlsheet.Cells(rowNum 1,7))HorizontalAlignment =-4108;//Centered<br>xlsheet.Range( xlsheet .Cells(1,1),xlsheet.Cells(1,7)).VerticalAlignment =-4108; <BR>xlsheet.Range( xlsheet.Cells( 2,1),xlsheet.Cells(rowNum 1,7)). Font.Size=10; <BR>xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum 1,7)).Borders (3).Weight = 2 //왼쪽 여백 설정 <BR>xlsheet.Range( xlsheet.Cells(2,1),xlsheet.Cells(rowNum 1,7)).Borders(4).Weight = 2;/ /오른쪽 여백 설정<BR>xlsheet.Range(xlsheet.Cells (2,1),xlsheet.Cells(rowNum 1,7)).Borders(1).Weight = 2;//상단 여백 설정<BR>xlsheet .Range(xlsheet.Cells(2,1),xlsheet. Cells(rowNum 1,7)).Borders(2).Weight = 2;//하단 여백 설정<BR><BR><BR>xls.UserControl = true; //매우 중요하므로 생략할 수 없습니다. 그렇지 않으면 문제가 발생합니다. 즉, Excel은 사용자에 의해 제어됩니다. <BR>xlBook=null <BR>xlsheet=null; <br><br><BR> ziyuanweihu 卡号 密码 计费方式 有效天数 金额 所属服务项目 发卡时间 h000010010 543860 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010011 683352 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010012 433215 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010013 393899 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010014 031736 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010015 188600 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010016 363407 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010017 175315 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010018 354437 计点 2.0 测试项目 2006-06-23 10:14:40.843 h000010019 234750 计点 2.0 测试项目 2006-06-23 10:14:40.843
