//下面为在第一段后插入文本
//webform.WebOffice.ActiveDocument.Application.ActiveDocument.Range(1).InsertAfter(mText);
}
}
//设置并取得Excel的内容
function WebGetExcelContent(){
webform.WebOffice.ActiveDocument.Application.Sheets(1).Select;
webform.WebOffice.ActiveDocument.Application.Range("C5").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "126";
webform.WebOffice.ActiveDocument.Application.Range("C6").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "446";
webform.WebOffice.ActiveDocument.Application.Range("C7").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "556";
webform.WebOffice.ActiveDocument.Application.Range("C5:C8").Select;
webform.WebOffice.ActiveDocument.Application.Range("C8").Activate;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "=SUM(R[-3]C:R[-1]C)";
webform.WebOffice.ActiveDocument.Application.Range("D8").Select;
alert(webform.WebOffice.ActiveDocument.Application.Range("C8").Text);
}
||||||//设置Excel页,并演示锁定相应栏目
function WebSheetsLock(){
webform.WebOffice.ActiveDocument.Application.Sheets(1).Select;
webform.WebOffice.ActiveDocument.Application.Range("A1").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "产品";
webform.WebOffice.ActiveDocument.Application.Range("B1").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "价格";
webform.WebOffice.ActiveDocument.Application.Range("C1").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "详细说明";
webform.WebOffice.ActiveDocument.Application.Range("D1").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "库存";
webform.WebOffice.ActiveDocument.Application.Range("A2").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "书签";
webform.WebOffice.ActiveDocument.Application.Range("A3").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "毛笔";
webform.WebOffice.ActiveDocument.Application.Range("A4").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "钢笔";
webform.WebOffice.ActiveDocument.Application.Range("A5").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "尺子";
webform.WebOffice.ActiveDocument.Application.Range("B2").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "0.5";
webform.WebOffice.ActiveDocument.Application.Range("C2").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "樱花";
webform.WebOffice.ActiveDocument.Application.Range("D2").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "300";
webform.WebOffice.ActiveDocument.Application.Range("B3").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "2";
webform.WebOffice.ActiveDocument.Application.Range("C3").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "狼毫";
webform.WebOffice.ActiveDocument.Application.Range("D3").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "50";
webform.WebOffice.ActiveDocument.Application.Range("B4").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "3";
webform.WebOffice.ActiveDocument.Application.Range("C4").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "蓝色";
webform.WebOffice.ActiveDocument.Application.Range("D4").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "90";
webform.WebOffice.ActiveDocument.Application.Range("B5").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "1";
webform.WebOffice.ActiveDocument.Application.Range("C5").Select;
webform.WebOffice.ActiveDocument.Application.ActiveCell.FormulaR1C1 = "20cm";
来源:upschool.cn
作者:
关键字:翻译
发表日期:2006-7-26
网页显示有限 阅读全文请下载本文完整版WORD文档
上一篇:Asp:base64编码、解码函数 下一篇:突破IIS的客户端连接限制
共13页
9 7 [
1] [
2] [
3] [
4] [
5] [
6] [
7] [
8] [
9] [
10] [
11] [
12] [
13]
8 :>
2009-1-9 1:24:57