吾爱破解 - LCG - LSG |安卓破解|病毒分析|www.52pojie.cn

 找回密码
 注册[Register]

QQ登录

只需一步,快速开始

查看: 6396|回复: 2
收起左侧

[其他转载] 【笔记】excel (VBA)如何运行宏代码

[复制链接]
bowangbuqi 发表于 2019-3-17 13:36
第一次研究EXCEL的VBA,谢谢大家指正。
Sub FormatTitle()
'
' FormatTitle 宏
' Excel Home图书示例
'
' 快捷键: Ctrl+q
'
    Range("A1:H1").Select
    Selection.Font.Bold = True
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorLight2
        .TintAndShade = 0.599993896298105
        .PatternTintAndShade = 0
    End With
End Sub

发帖前要善用论坛搜索功能,那里可能会有你要找的答案或者已经有人发布过相同内容了,请勿重复发帖。

smxslkj 发表于 2019-3-18 09:47
Range("A1:H1").Select    '<单元格>区域("A1:H1" )的选定
Selection.Font.Bold = True    ' 被选项的字体的粗体=True
With Selection.Interior    '工作于 被选项的内部
        .Pattern = xlSolid    '<With对象>的样式=xlSolid
        .PatternColorIndex = xlAutomatic    '<With对象>的PatternColorIndex=xlAutomatic
        .ThemeColor = xlThemeColorLight2    '<With对象>的ThemeColor=xlThemeColorLight2
        .TintAndShade = 0.599993896298105    '<With对象>的TintAndShade= 0.599993896298105
        .PatternTintAndShade = 0    '<With对象>的PatternTintAndShade=0
End With    'With语句结束
End Sub    '子程序结束
川哥 发表于 2019-3-18 08:45
表头栏有开发工具,点击就会看到宏,点击会提示你启用哪一个;或者开发工具下有插入选项,点击插入第一个,也就是窗体控件,然后会提示你指定哪个宏,你选择就OK了
您需要登录后才可以回帖 登录 | 注册[Register]

本版积分规则 警告:本版块禁止灌水或回复与主题无关内容,违者重罚!

快速回复 收藏帖子 返回列表 搜索

RSS订阅|小黑屋|处罚记录|联系我们|吾爱破解 - LCG - LSG ( 京ICP备16042023号 | 京公网安备 11010502030087号 )

GMT+8, 2024-4-19 18:56

Powered by Discuz!

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表