OnKeyDown灬Sona 2018-05-19 09:27 采纳率: 75%
浏览 1759
已采纳

Excel/WPS,如何自定义模板,方便后期修改格式啥的?

(20个以上的表格修改,,,今天一个一个改的要吐了)
如下图,
前两行为标题行 字体加粗加黑 前N列蓝色背景 N-M列如图所示 M-L列绿色背景
后面的行0-----L列 字体 大小 行高 边框固定


最后,,,,C币好商量

图片说明

  • 写回答

6条回答 默认 最新

  • threenewbee 2018-05-19 10:46
    关注

    图片说明

         n = Val(InputBox("N=?"))
        Range("A1:" & Chr(Asc("A") + n - 1) & "2").Select
        With Selection.Interior
            .Pattern = xlSolid
            .PatternColorIndex = xlAutomatic
            .ThemeColor = xlThemeColorAccent6
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With
        Range(Chr(Asc("A") + n) & "1:S2").Select
        With Selection.Interior
            .Pattern = xlSolid
            .PatternColorIndex = xlAutomatic
            .Color = 12611584
            .TintAndShade = 0
            .PatternTintAndShade = 0
        End With
        Range("A2:S2").Select
        With Selection.Font
            .Name = "SimHei"
            .Size = 11
            .Strikethrough = False
            .Superscript = False
            .Subscript = False
            .OutlineFont = False
            .Shadow = False
            .Underline = xlUnderlineStyleNone
            .ThemeColor = xlThemeColorLight1
            .TintAndShade = 0
            .ThemeFont = xlThemeFontNone
        End With
    
    

    这只是一个演示,在这里你输入n,这个宏会自动把前n列设置为绿色,后面的设置为蓝色
    而且还设置了字体为黑体。

    如果你想进一步了解。采纳本回答,重新提问,提出你的需求,可以给你写一个更适合你的。

    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(5条)

报告相同问题?

悬赏问题

  • ¥15 虚幻5 UE美术毛发渲染
  • ¥15 CVRP 图论 物流运输优化
  • ¥15 Tableau online 嵌入ppt失败
  • ¥100 支付宝网页转账系统不识别账号
  • ¥15 基于单片机的靶位控制系统
  • ¥15 真我手机蓝牙传输进度消息被关闭了,怎么打开?(关键词-消息通知)
  • ¥15 装 pytorch 的时候出了好多问题,遇到这种情况怎么处理?
  • ¥20 IOS游览器某宝手机网页版自动立即购买JavaScript脚本
  • ¥15 手机接入宽带网线,如何释放宽带全部速度
  • ¥30 关于#r语言#的问题:如何对R语言中mfgarch包中构建的garch-midas模型进行样本内长期波动率预测和样本外长期波动率预测