62,046
社区成员
发帖
与我相关
我的任务
分享一个关于Excel的问题！那位大虾能帮帮小弟啊！急，在线等！
我已经成功将DataGrid中的数据导入到Excel中，现在的问题是显示在Excel中的数据的表格固定死了，Excel默认的那些虚框也不见了，如果我在Excel中再加入其它新的数据，则新加的数据没有边框，看起来非常难看，请大家帮我想想办法，怎样才能把虚框也显示出来，让Excel 表处于正常的编辑状态啊！
不知我描述的大虾们能否听得懂啊！
问题解决马上结贴，决不拖延！在线等！急！
谢谢大家了！
不知我描述的大虾们能否听得懂啊！
问题解决马上结贴，决不拖延！在线等！急！
谢谢大家了！
...全文
请发表友善的回复…
发表回复
conbell 2003-10-24
- 打赏
- 举报
自己画线,找到位置后
Dim xlssheet As Excel.Worksheet
Dim RowIndex as Integer
Dim CellIndex as Integer
xlssheet.Range(xlssheet.Cells(RowIndex, CellIndex), xlssheet.Cells(RowIndex, CellIndex)).Borders(Excel.XlBordersIndex.xlEdgeBottom).Weight = Excel.XlBorderWeight.xlThin
xlssheet.Range(xlssheet.Cells(RowIndex, CellIndex), xlssheet.Cells(RowIndex, CellIndex)).Borders(Excel.XlBordersIndex.xlEdgeBottom).ColorIndex = Excel.XlColorIndex.xlColorIndexAutomatic
Dim xlssheet As Excel.Worksheet
Dim RowIndex as Integer
Dim CellIndex as Integer
xlssheet.Range(xlssheet.Cells(RowIndex, CellIndex), xlssheet.Cells(RowIndex, CellIndex)).Borders(Excel.XlBordersIndex.xlEdgeBottom).Weight = Excel.XlBorderWeight.xlThin
xlssheet.Range(xlssheet.Cells(RowIndex, CellIndex), xlssheet.Cells(RowIndex, CellIndex)).Borders(Excel.XlBordersIndex.xlEdgeBottom).ColorIndex = Excel.XlColorIndex.xlColorIndexAutomatic
donger2000 2003-10-22
- 打赏
- 举报
可能你保存的内容不是Excel格式的，只不过是文件名以xls结尾的罢了！
你试着用记事本打开看看！
你试着用记事本打开看看！
stone723 2003-10-20
- 打赏
- 举报
没有人知道吗？：（
stone723 2003-10-20
- 打赏
- 举报
up!
wayneliu 2003-10-20
- 打赏
- 举报
顶
summerboy 2003-10-16
- 打赏
- 举报
帮你顶
donger2000 2003-10-16
- 打赏
- 举报
http://www.csdn.net/develop/Read_Article.asp?Id=21391
