Function Repository Resource:

AddStyleToNotebook

Source Notebook

Add a style to a notebook's stylesheet

Contributed by: Brian Van Vertloo

ResourceFunction["AddStyleToNotebook"][nbobj,stylename,{sty₁,sty₂,…}]

adds stylename, defined by the sty_i, to nbobj.

Details and Options

A private stylesheet is created for the notebook, if necessary.

The new stylesheet for the notebook is returned.

Inherit from existing styles by including StyleDefinitions→name or StyleDefinitions→StyleData[name] in the list of styles sty_i.

Only one style can be inherited by each added style using this function; specifying a new inheritance will overwrite the previous one.

Examples

Basic Examples (3)

This style is not yet defined:

In[1]:=

Add the style:

In[2]:=

Use it:

In[3]:=

Scope (1)

Specify a style that inherits from an existing style:

In[4]:=

In[5]:=

Possible Issues (1)

Only one existing style can be inherited:

In[6]:=

$Cases[ResourceFunction["AddStyleToNotebook"][EvaluationNotebook[], "Test", {StyleDefinitions -> "Text", FontColor -> Blue}], Cell[StyleData["Test", __], __], Infinity]$

Out[6]=

In[7]:=

$Cases[ResourceFunction["AddStyleToNotebook"][EvaluationNotebook[], "Test", {StyleDefinitions -> "Title", FontColor -> Blue}], Cell[StyleData["Test", __], __], Infinity]$