Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2009

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: How do I hide all input in a Mathematica notebook?

  • To: mathgroup at smc.vnet.net
  • Subject: [mg97980] Re: How do I hide all input in a Mathematica notebook?
  • From: dbreiss at gmail.com
  • Date: Fri, 27 Mar 2009 05:34:03 -0500 (EST)
  • References: <gqfkt3$knt$1@smc.vnet.net>

One very clean way to do this would be to create a copy of the
notebook for delivery to your boss.  Then in this copy execute

Module[{nb},
 nb = EvaluationNotebook[];
 NotebookFind[EvaluationNotebook[], "Input", All, CellStyle];
 NotebookDelete[nb]]

Within your boss's notebook.


This will remove, rather than hide, the input cels in that copy of the
notebook.

However, if you wanted to just hid those cells you could execute

Module[{nb},
 nb = EvaluationNotebook[];
 NotebookFind[EvaluationNotebook[], "Input", All, CellStyle];
 SetOptions[NotebookSelection[nb], CellOpen -> False,
  ShowCellBracket -> False]
 ]

in that notebook...

Hope this helps....
More advanced methods using tagging could be used (see "The Joy of
Tagging: Manipulating and Mining Notebooks in Mathematica" at
http://scientificarts.com/worklife/notebooks/


I hope that this helps,

David


On Mar 26, 6:20 am, "michael.p.crouc... at googlemail.com"
<michael.p.crouc... at googlemail.com> wrote:
> Hi
>
> I am using Mathematica to prepare a report for my boss.  It has lots
> of tables and pie charts - the sort of things bosses love.  It also
> has a lot of Mathematica commands which scares the wossname out of
> him.
>
> At the moment I am hiding the input cell by cell but this is a pain.
> Is there a one click/one command solution?
>
> Thanks,
> Mike
>
> www.walkingrandomly.com



  • Prev by Date: Re: Read data structure from binary file
  • Next by Date: Re: HoldAll for Integrate
  • Previous by thread: How do I hide all input in a Mathematica notebook?
  • Next by thread: Re: How do I hide all input in a Mathematica notebook?