Add (方法)

新建样式并将其添加到当前工作簿的可用样式列表中。返回一个代表新样式的 Style 对象。

参数

属性	数据类型	必填	说明
Name	str	必填	新样式的名称。

示例

python

#本示例定义新样式，并将工作表 Sheet1 中的单元格 A1 改为此样式
def test():
    Sty = Application.ActiveWorkbook.Styles.Add("theNewStyle")
    Sty.IncludeNumber = False
    Sty.IncludeFont = True
    Sty.IncludeAlignment = False
    Sty.IncludeBorder = False
    Sty.IncludePatterns = False
    Sty.IncludeProtection = False
    Sty.Font.Name = "Arial"
    Sty.Font.Size = 18
    Application.Worksheets.Item("Sheet1").Range("A1").Style = "theNewStyle"

python

#此示例为活动工作簿添加一个新的样式，并设置该样式内部填充颜色为绿色，再将单元格区域A5:A10改用此样式
def test():
    sty = Application.ActiveWorkbook.Styles.Add("新样式")
    sty.Interior.Color = RGB(0, 255, 0)
    Application.Worksheets.Item(1).Range("A5:A10").Style = "新样式"