현재 노트북의 모든 셀 그룹을 축소 할 수 있습니까? 시도했지만Mathematica의 모든 셀 그룹을 프로그래밍 방식으로 닫으시겠습니까?
nb = SelectedNotebook[];
SelectionMove[nb, Before, CellGroup]
FrontEndTokenExecute["OpenCloseGroup"]
아무 것도 변경되지 않았습니다. 노트북이 셀 그룹으로 시작, 그리고 혼자 셀 경우에만 작동하지만
당신은
nb = SelectedNotebook[];
SelectionMove[nb, All, Notebook];
FrontEndTokenExecute[nb, "OpenCloseGroup"]
를 사용할 수 있습니다. (메뉴 항목은 동일한 방식으로 동작합니다.)
당신이 cellGroupCount 그룹이 알고 있다면, 당신은 또한 같은 것을 할 수있는 :이 하나의 마이그레이션이 아마 더 나은
nb = SelectedNotebook[];
SelectionMove[nb, Before, Notebook]
Do[SelectionMove[nb, Next, CellGroup];
FrontEndTokenExecute[nb, "OpenCloseGroup"], {cellGroupCount}]
합니다. 이미 신고 했어. 너무 플래그를 지정하면 더 빨리 마이그레이션됩니다. 여기에 머물러야하는 질문을 원하고있는 OP에 대한 우려는 없습니다. – Szabolcs