匠心艺语:用VBA为选定的单元格加边框

来源：百度文库编辑：偶看新闻时间：2024/04/28 00:00:07

用VBA为选定的单元格加边框

(2009-05-06 15:43:45)

转载标签：

excel与vba

分类： Excel与VBA

用VBA为选定的单元格加边框的代码如下：

// 选定当前工作表的Cells(i,3)单元格

Cells(i, 3).Select

//以下22行代码是分别为选定单元格的左边、上边、下边、右边加边框线
Selection.Borders(xlDiagonalDown).LineStyle = xlNone
Selection.Borders(xlDiagonalUp).LineStyle = xlNone
With Selection.Borders(xlEdgeLeft)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeTop)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeBottom)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
With Selection.Borders(xlEdgeRight)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With

VBA用CELLS表示单元格,如何实现单元格的合并为什么EXCEL单元格加边框加不上？用cells如何选定一整片单元格？ Excel中单元格边框的问题如果设置某单元格一边的边框？？怎么样用PS加边框拖拽EXCEL单元格内容时能否不改变原设置的单元格边框线条? 在AutoCAD中利用VBA怎么把选定的图形的类型跟属性显示出来? 关于PHOTOSHOP加边框的问题给图片加gif格式的边框用PS怎么给画面加边框怎么用ps给图加边框？请问在excel宏设计中如何获得当前选定区域的单元格地址怎样才能使Excel选定内容的单元格都有外边框？ 13、在Word的编辑状态中，利用_______菜单可以选定单元格。（1分） execel怎样保护选定区域？其他的单元格可以填入数据。 vb操作excel,如何给选定的合并单元格整体赋值? 在网页中,我想让表格的边框显示,而单元格和行的边框不显示,怎么弄??????????? 如何在vba中得到当前单元格的行号和列号 vba中如何引用单元格内容如何用vba获取excel单元格格式 Excel中怎么在单元格的边框中的斜画线两边分别输入文字用PHOTOSHOP怎么给图片加边框?好看点的那种. 我想用PHOTOSHOP给照片加上很简单的灰色边框，要怎么加？