Javaphua Blog

          BlogJava 首頁 新隨筆 聯系 聚合 管理
            46 Posts :: 5 Stories :: 46 Comments :: 0 Trackbacks

          利用腳本操作Excel文件,一些基礎的東西,主要涉及到生成Excel文件,和寫入單元格內容,設置字體、寬高等,以及如何合并單元格,更高級的可以通過錄制宏來查看。


          ?
          1.?<SCRIPT?LANGUAGE='JavaScript'>
          ?
          2.?<!--
          ?
          3.?var?xlCenter=-4108;
          ?
          4.?var?xlbottom=-4107;
          ?
          5.?var?xlRight=-4152;
          ?
          6.?
          ?
          7.?var?oSheet;
          ?
          8.?var?oActiveSheet;
          ?
          9.?var?oApplication;

          10.?//初始化Excel對象

          11.?try?{?

          12.???????oApplication????=?new?ActiveXObject?(?'Excel.Application'?);

          13.???????}

          14.?catch(e)?{?

          15.?alert('您必須安裝Excel電子表格軟件,同時瀏覽器須使用“ActiveX?控件”!');

          16.?????return?'';

          17.???}???????

          18.?oApplication.visible?=?true;???????

          19.?var?xlBook?=?oApplication.Workbooks.Add;

          20.?oActiveSheet?=?xlBook.Worksheets(1);?

          21.?//設置行高

          22.?oActiveSheet.Rows('1:1').RowHeight?=?30;

          23.?//設置列寬

          24.?oActiveSheet.Columns('A:A').ColumnWidth?=?8;

          25.?//設置單元格的內容

          26.?oActiveSheet.Cells(4,1).FormulaR1C1='日??期';?//第4行第1列

          27.?//單元格選擇

          28.?oActiveSheet.Range('A2:G2').Select();

          29.?//另外一種高級的選擇方法

          30.?oActiveSheet.Range(oActiveSheet.cells(5,3),oActiveSheet.Cells(6,4)).Select;

          31.?//設置文字格式

          32.?oApplication.Selection.Font.Size=15;

          33.?oApplication.Selection.Font.bold=?true

          34.?oApplication.Selection.Font.Name='宋體';

          35.?//合并選取的單元格

          36.?oApplication.Selection.Merge();

          37.?//設置選取單元格的垂直對齊和水平對齊

          38.??oApplication.Selection.HorizontalAlignment?=?xlCenter;

          39.??oApplication.Selection.VerticalAlignment?=?xlCenter;

          40.?//注意,對selection的操作都適用于cells

          41.?

          42.?//設置自動換行

          43.?oApplication.Selection.WrapText=true;

          44.?//-->

          45.?</SCRIPT>

          ?

          posted on 2006-05-18 19:37 Javaphua 閱讀(331) 評論(0)  編輯  收藏

          只有注冊用戶登錄后才能發表評論。


          網站導航:
           
          主站蜘蛛池模板: 安多县| 茶陵县| 怀柔区| 宣威市| 闽清县| 肥乡县| 高安市| 巴马| 张家港市| 蒙自县| 同仁县| 河间市| 斗六市| 敦化市| 句容市| 丰镇市| 承德市| 富宁县| 利川市| 兴国县| 梨树县| 尖扎县| 潍坊市| 灵石县| 马关县| 大悟县| 涿州市| 万山特区| 勐海县| 盐城市| 综艺| 闸北区| 富源县| 平泉县| 兰考县| 油尖旺区| 普兰店市| 大埔县| 云梦县| 巩义市| 新宁县|