I have tried to insert the AutoCollapse command defined in this nice answer
How to Keep Input Cells Hidden After Evaluating Notebook
inside a Button
Button["Input Délétion OK",
AutoCollapse[] := (If[$FrontEnd =!= $Failed,
SelectionMove[EvaluationNotebook[], All, GeneratedCell];
FrontEndTokenExecute["SelectionCloseUnselectedCells"]])]
AutoCollapse[]
But AutoCollapse[] stay blue and unevaluated or is evaluated and then unevaluated --- MA 10.1. Any idea ?
AutoCollapse[ ]as the last evaluation item in a multi-expression input cell? – m_goldberg Nov 15 '16 at 15:36AutoCollapse[]so I'm quite confused why it was left outside. Can you clarify? – Kuba Apr 13 '18 at 08:05