如何在excel里面画表格线啊？

[闲情漫步]

我用VB把access数据表里的数据输出到excel中，可是没有表格线啊？谁能告诉我单元格的线是怎么画啊？用VB实现。

[__ANDY__WU]

關注

[crycoming]

用Range对象选择单元格后设置
With pRange.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With pRange.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With pRange.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With pRange.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With

[yingjm]

关注，能不能再详细一点，比如：如何用Range对象选择单元格

[pweixing]

Range("B5:H19").Select
选中指定区域
其实你可以这样，到excel里面录制一段宏，宏的VBA代码和VB代码基本通用。

[qtjbrfqqk]

同意上面的看法，用宏吧！！

[yingjm]

谢谢pweixing(幸运米，幸运得米！)