2
$\begingroup$

For slide show, the default cell style (when it is created) is Text. However, I would like to change that default style to Input. How can I change this?

$\endgroup$
  • $\begingroup$ Ah, it seems you are using Journal stylesheet or something. $\endgroup$ – Kuba May 10 '16 at 12:55
2
$\begingroup$

Quick fix is to use

SetOptions[ EvaluationNotebook[], DefaultNewCellStyle -> "Input"]

if you want to restrict changes only to SlideShow environment put or edit your stylesheet with:

Cell[StyleData["Notebook","SlideShow"],
   DefaultNewCellStyle->"Section"
]

assuming your StyleDefinitions are in form of a _String/FileName not a Notebook you can set DefaultNewCellStyle for given environment:

SetOptions[
    EvaluationNotebook[],
    StyleDefinitions - >Notebook[{
        Cell[StyleData[StyleDefinitions -> CurrentValue[ 
           EvaluationNotebook[],StyleDefinitions]
        ]],
        Cell[StyleData["Notebook","SlideShow"],
           DefaultNewCellStyle->"Section"
        ]
    }]
]

Evaluate it in that notebook or replace EvaluationNotebook[] with a _NotebookObject pointing to your notebook.

$\endgroup$
  • $\begingroup$ This doesn't seem to be working (and it seems to mess up the font styles etc in my current slide show). The comment that you posted under my question did work. Why did you delete it? Please put it back. $\endgroup$ – QuantumDot May 10 '16 at 14:29
  • $\begingroup$ @QuantumDot ok, edited. $\endgroup$ – Kuba May 10 '16 at 15:21
  • $\begingroup$ Very nice. Thanks $\endgroup$ – QuantumDot May 10 '16 at 15:26

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service, privacy policy and cookie policy

Not the answer you're looking for? Browse other questions tagged or ask your own question.