Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]

Groups > comp.soft-sys.math.mathematica > #2329

Re: How to select all cells in a notebook with specific property?

Show all headers | View raw

Hi,

> Sometimes I change some cells in a notebook to closed
> (i.e. cell->Cell property->) and then deselect the Open
> property.
>
> I find this useful, when final report is done, and I do
> not need to print some cells.
>
> But when I go back and want to make some edits, I find
> I have to go select all those cells again using the
> mouse, one by one, so I can change the property again
> to open so I can see the content. The cells can be
> in different locations in the notebook.
>
> Is there a way to tell Mathematica to select all cells
> that are say closed, so that I do not have to keep
> doing this manual step each time? It gets tiring
> if there are many cells whose property I want
> to flip.   Like Cell->SelectAll->   or such.

I don't think that you expected to get this abuse of FixedPoint as an 
answer to that question, but it is all that came to my mind :-)

SelectionMove[EvaluationNotebook[], Before, Notebook];
FixedPoint[
   Function[
    SelectionMove[EvaluationNotebook[], Next, Cell];
    SetOptions[NotebookSelection[EvaluationNotebook[]],
     CellOpen -> True];
    NotebookRead[EvaluationNotebook[]]
    ],
   NotebookRead[EvaluationNotebook[]]
   ];

hth,

albert

Back to comp.soft-sys.math.mathematica | Previous | Next — Previous in thread | Find similar | Unroll thread

Thread

How to select all cells in a notebook with specific property? "Nasser M. Abbasi" <nma@12000.org> - 2011-05-12 08:34 +0000
  Re: How to select all cells in a notebook with specific property? Albert Retey <awnl@gmx-topmail.de> - 2011-05-13 10:27 +0000

csiph-web