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 閱讀(324) 評論(0)  編輯  收藏

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


          網站導航:
           
          主站蜘蛛池模板: 大城县| 安国市| 抚远县| 葵青区| 遂昌县| 米林县| 宜君县| 乐山市| 钦州市| 锡林郭勒盟| 微博| 九龙坡区| 宁明县| 甘南县| 云龙县| 白山市| 北流市| 东丽区| 东乡县| 巴马| 双鸭山市| 泸定县| 阜康市| 游戏| 桐乡市| 淮南市| 资兴市| 津市市| 南充市| 湄潭县| 万宁市| 衡南县| 隆昌县| 平原县| 宁波市| 宿迁市| 石嘴山市| 青川县| 五河县| 柯坪县| 桃江县|