本文基于以下文件 http://pan.baidu.com/s/1nvJtsu9 (部分)内容预览: 1. 边框样式 Sub cell_format() Dim sht As Worksheet Dim rng As Range Set sht = Worksheets("Parameter") Set rng = sht.Range("B2:C20") ' 设置边框格式 ' 这是常规的实线.细线,默认颜色为黑色 rng.Borders.LineStyle = xl
var location = this.options.location; var cr = FR.cellStr2ColumnRow(location); var col = cr.col; var row = cr.row; var ORG_ID = contentPane.getWidgetByCell(FR.columnRow2CellStr({col: col, row: row})).getValue(); //alert(goods); //var index=goods.inde
注:要添加COM组件 Microsoft Excel 11.0 Object Library 引用. 具体代码如下: using System; using System.Collections.Generic; using System.Text; using System.Data.SqlClient; using Excel; using System.Reflection; using System.Data; using System.Data.OleDb; namespace Re