怎样用VB代码去掉电子表的边框线？

liangqian999 2005-07-05 09:49:29
请教各位高手，如果电子表已经定义了边框，怎样用VB代码逐边（上、下、左、右）去掉边框？
...全文
165 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
crycoming 2005-07-05
  • 打赏
  • 举报
 回复
Dim r As Range ''选中需要修改的单元格范围
With r.Borders(xlInsideVertical)
.LineStyle = xlContinuous
.Weight = xlThin
.ColorIndex = xlAutomatic
End With
a97191 2005-07-05
  • 打赏
  • 举报
 回复
up
VB操作EXCEL表的常用方法
VB是常用的应用软件开发工具之一，由于VB的报表功能有限，而且一但报表格式发生变化，就得相应修改程序，给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统，如何把它们有机地结合在一起，是一个值得我们研究的课题。 一、 VB读写EXCEL表： VB本身提自动化功能可以读写EXCEL表，其方法如下： ...
VBA代码自学收集（150例）
VBA代码自学收集（150例）
VB编程技巧
文章浏览广告 VB编程技巧几例  现在加入 http://14.66.102.214  VB5 引入枚举变量，使用它，我们可以显著地改变应用程序的易读性： Public Enum TimeOfDay Morning = 0 Afternoon = 1 Evening = 2 End Enum Sub Main() Dim Righ
VB6常用方法汇编
使用静态变量放置控件:  Form1:Label1,Command1 属性设置: cLabel1.Autosize= true代码:Private Sub Command1_Click()  Static stflag As Boolean  使用静态变量来保存变量值  If stflag = False Then    Label1.Font.Size = 14
vb学习
 使用静态变量放置控件: Form1:Label1,Command1 属性设置: cLabel1.Autosize= true代码:Private Sub Command1_Click() Static stflag As Boolean 使用静态变量来保存变量值 If stflag = False Then    Label1.Font.Size = 14 
VB基础类

7,763

社区成员

197,609

社区内容

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章