如何用VBA/VB来设置Excel的格式 30

包括设置字型大小,位置,格线...等等... 包括设置字型大小,位置, 格线 ...等等 展开
 我来答
百度网友c3a1d6ceb
2005-11-23 · TA获得超过265个赞
知道小有建树答主
回答量:208
采纳率:0%
帮助的人:211万
展开全部
告诉你一个最简单,最好用的办法。
打开Excel,点击工具菜单下宏--录制新宏。然后把你想要用程序实现,而自己又不会编程的操作都做一遍,停止录宏。然后再点击工具菜单下宏--宏,打开这个宏就可以了。你会发现你想要的代码都有实例了。
当然,你也可以把每一个操作分别录宏,这样看起来就更清楚了。
就这么简单,祝你好运。^_^
本回答被网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友f3ea6ed
2005-11-23 · TA获得超过1751个赞
知道小有建树答主
回答量:997
采纳率:0%
帮助的人:975万
展开全部
Dim bl As Excel.Application '定义一个Excel应用
Dim wbook As Variant
Set bl = New Excel.Application '初始化
bl.Visible = True
bl.SheetsInNewWorkbook = 1 '页
Set wbook = bl.Workbooks.Add
Myexcel = True
.............................

With ActiveSheet.Cells(1, 2) '每个单元格叫
'做一个cell,cell(1,2)就是第一行第2列的单元格
.Font.Name = "宋体" '以下是设置字体什么的
.Font.Size = 20
.Font.Color = RGB(0, 0, 0)
.Font.Underline = xlUnderlineStyleDouble
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlCenter
.WrapText = False
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
End With

参考资料: http://www.bc-cn.net/bbs/Article/20059/15/27745.html

已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式