excel vba 实例 （可以让入门者立马提升兴趣 ）

1、新建一个excel，然后打开

4、输入代码：Sub 字体颜色等() With Range("水瑞侮瑜b2") [b19] = .Font.Size '字体大小 [b20] = .Font.ColorIndex '字体颜色 [b21] = .Interior.ColorIndex '背景颜色 [b22] = .Borders.LineStyle '边框类型 End With End SubSub 另一个() Range("a1").Value = 12345 End Sub此代码随便写，我写这个只不过是实现的时候，大家看起来比较明显，知道有什么效果！

7、在电脑上创建一个文件夹：customUI 文件夹里创建CustomUI.xml这个文档。用记事本打开这个CustomUI.xml;写入代码：<customUI xmlns="http://schemas.microsoft.com/office/2006/01/customui" > <ribbon startFromScratch="false"> <tabs> <tab id="rxTabCustom19" label="我的牛逼工具" insertBeforeMso="TabHome"> <group id="myGroup4" label=" "> <button id="a1" imageMso="TableExportTableToSharePointList" size="large" label="字体颜色等" supertip="字体颜色等" onAction="字体颜色等"/><button id="a2" imageMso="HappyFace" size="large" label="另一个" supertip="另一个" onAction="另一个"/> </group> </tab> </tabs> </ribbon></customUI> 之后保存

9、然后打开excel 看打效果了吧