Toggling between collapse all and expand all

RobTrew

A draft applescript to toggle between collapsing and expanding all project tasks and sub-tasks.

Mainly illustrative - it works if run from the script menu, but its practical utility is limited by the fact that, (at least as of OF build 98016) static variables like blnNewState below lose their state between runs if the script is run from the OF toolbar.

Thus, if used from the toolbar, the script provides only a Collapse All function, whereas if run from the script menu, it alternately functions as Collapse All or Expand All, switching every time it is run.

Code:

tell application "OmniFocus"
	global blnNewState
	
	try
		blnNewState
		set blnNewState to not blnNewState
	on error
		set blnNewState to false
	end try
	
	tell content of window 1
		
		set oTrees to trees
		
		repeat with oTree in oTrees
			my Expand(oTree, blnNewState)
		end repeat
	end tell
end tell


on Expand(oTree, blnNewState)
	using terms from application "OmniFocus"
		set oSubTrees to trees of oTree
		
		if (count of oSubTrees) > 0 then
			set expanded of oTree to blnNewState
			repeat with oSubTree in oSubTrees
				Expand(oSubTree, blnNewState)
			end repeat
		end if
	end using terms from
end Expand

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Expand/Collapse All	Joseph	OmniGraffle General	2	2012-06-21 04:37 PM
OF 1.2 Expand/Collapse all	atreinke	OmniFocus for iPad	2	2010-11-13 04:06 AM
Expand a little, collapse a little ...	RobTrew	OmniOutliner 3 for Mac	0	2010-11-04 03:01 AM
Collapse or expand one section only?	rogbar	OmniOutliner 3 for Mac	1	2009-01-28 02:06 PM
Expand/collapse notes?	marieboyer	OmniFocus 1 for Mac	2	2008-08-09 08:29 AM