1
$\begingroup$

Is there any way to print out to pdf file, in sequence, all cells independently? I have literally hundreds of cells that need to be printed in that way. Selecting each cell and "Print Selections" takes me ages before I finish.

$\endgroup$
1
$\begingroup$

A simple suggestion, assuming you want each cell in a separate file:

cellCounter = 1;
Map[
 Export[
   StringJoin["cell-", ToString[cellCounter++], ".pdf"],
   NotebookRead[#]] &, 
 Cells[]];

and the resulting file corresponding to this cell:

cell export

$\endgroup$
  • $\begingroup$ Awesome, thank you very much. It's possible to print out cells "In" and "Out" together (including labels). Now, each of them is printed to separated file. $\endgroup$ – Thomas Jul 14 '13 at 12:56
  • $\begingroup$ @thomas perhaps add these requirements to your question? I'm not much of a notebook programmer... $\endgroup$ – cormullion Jul 14 '13 at 13:23
  • $\begingroup$ @thomas Consider Split[Cells[], MemberQ[Cells[CellStyle -> {"Input"}], #1] && MemberQ[Cells[CellStyle -> {"Output"}], #2] &] and "CellLabelsToTags" $\endgroup$ – Michael E2 Jul 14 '13 at 19:46

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.