Spreadsheet 常用属性 标题栏是否可见 Spreadsheet1.TitleBar.Visible=true 标题栏背景颜色 Spreadsheet1.TitleBar.Interior.Color='Green' 标题栏标题内容 Spreadsheet1.TitleBar.Caption='test' 标题栏字体颜色 Spreadsheet1.TitleBar.Font.Color='Red' 标题栏字体名称 Spreadsheet1.TitleBar.Font.Name='Vendana' 标题栏字体大小 Spreadsheet1.TitleBar.Font.Size=10 标题栏字体是否加粗 Spreadsheet1.TitleBar.Font.Bold=true 标题栏字体是否加下划线 Spreadsheet1.TitleBar.Font.Underline=true 标题栏字体是否倾斜 Spreadsheet1.TitleBar.Font.Italic=true 选取单个单元格 Spreadsheet1.ActiveSheet.Range('A2').Select() 选取矩形区域内的所有单元格 Spreadsheet1.ActiveSheet.Range('A2:D3').Select() 单元格宽度 Spreadsheet1.ActiveSheet.Range('A2').ColumnWith=100 单元格宽度 Spreadsheet1.ActiveSheet.Range('A2').RowHeight=100 从当前位置删除指定的列数 Spreadsheet1.ActiveSheet.Range('A2').DeleteColumns(10) 从当前位置删除指定的行数 Spreadsheet1.ActiveSheet.Range('A2').DeleteRows(10) 从当前位置插入指定的列数 Spreadsheet1.ActiveSheet.Range('A2').InsertColumns(10) 从当前位置插入指定的行数 Spreadsheet1.ActiveSheet.Range('A2').InsertRows(10) 单元格框线的宽度 Spreadsheet1.ActiveSheet.Range('A2').Borders.Weight=2 单元格框线的颜色 Spreadsheet1.ActiveSheet.Range('A2').Borders.Color='Red' 单元格框线样式 Spreadsheet1.ActiveSheet.Range('A2').Borders.LineStyle=4(2~6) 对单元格赋值 Spreadsheet1.ActiveSheet.Range('A2').Value='123' 剪切/复制/粘帖单元格内容 Spreadsheet1.ActiveSheet.Range('A2').Cut(){Copy();Paste()} 粘帖指定内容到单元格 Spreadsheet1.ActiveSheet.Range('A2').ParseText('test') 单元格内容清空 Spreadsheet1.ActiveSheet.Range('A2').Clear() 单元格内执行查询 Spreadsheet1.ActiveSheet.Range('A2').Find('test') 单元格背景颜色 Spreadsheet1.ActiveSheet.Range('A2').Interior.Color='Yellow' 单元格字体颜色 Spreadsheet1.ActiveSheet.Range('A2').Font.Color='Red' 单元格字体名称 Spreadsheet1.ActiveSheet.Range('A2').Font.Name='Verdana' 单元格超链接名称 Spreadsheet1.ActiveSheet.Range('A2').Hyperlink.Name='超链接' 单元格超链接URL Spreadsheet1.ActiveSheet.Range('A2').Hyperlink.Address=“http://www.sohu.com” 单元格超链接删除 Spreadsheet1.ActiveSheet.Range('A2').Hyperlink.Delete() 单元格内文字垂直对齐方向 Spreadsheet1.ActiveSheet.Range('A2').VAlignment=1(0,1,2) 单元格内文字水平对齐方向 Spreadsheet1.ActiveSheet.Range('A2').HAlignment=2(1,2,3) 合并单元格 Spreadsheet1.ActiveSheet.Range('C3:D5').Merage 撤销合并 Spreadsheet1.ActiveSheet.Range('C3:D5').UnMerage 自动套用计算公式 Spreadsheet1.ActiveSheet.Range('B2').Formula='=SUM(C5*C6)' 单元格内容格式化 Spreadsheet1.ActiveSheet.Range('B2').NumberFormat='¥ #,##0.00;¥-#,##0.00' 保护xls文档 Spreadsheet1.ActiveSheet.Protection.Enabled=true 输出到本地并在Excel环境打开 Spreadsheet1.ActiveSheet.Export('C:\\test.xls') 自适应行高 Spreadsheet1.AutoFit=true 是否隐藏表头 Spreadsheet1.DisplayColHeaders=true 是否隐藏横向滚动条 Spreadsheet1.DisplayHorizontalScrollBar=true 是否隐藏纵向滚动条 Spreadsheet1.DisplayVerticalScrollBar=true 是否隐藏属性工具箱 Spreadsheet1.DisplayPropertyToolbox=true 是否隐藏标志表头 Spreadsheet1.DisplayRowHeaders=true 是否隐藏标题栏 Spreadsheet1.DisplayTitleBar=true 是否隐藏工具栏 Spreadsheet1.DisplayToolBar=true 刷新 Spreadsheet1.Refresh() 文字提示 Spreadsheet1.ToolTipText='test'
|
|