Re: buttons
- To: mathgroup at smc.vnet.net
- Subject: [mg32547] Re: [mg32475] buttons
- From: Omega Consulting <omega_consulting at yahoo.com>
- Date: Sat, 26 Jan 2002 04:08:11 -0500 (EST)
- Sender: owner-wri-mathgroup at wolfram.com
At 02:20 AM 1/22/2002, David P. Johnson wrote:
>Anyone using buttons in notebooks? I'd like to simply put a button at
>the end of my notebook that will cause two cells to be calculated each
>time I hit it. Couldn't quite figure it out from the documentation. Any
>help appreciated.
>
>--
>-David
>(Signature continues here)
>N.B.: Remove the 'x' to email me
Add the celltag "MyTwoCells" to the cells you want to evaluate and this
button will do the trick
ButtonBox["Evaluate", Active -> True,
ButtonFunction :> (NotebookFind[ButtonNotebook[], "MyTwoCells", All,
CellTags];
SelectionEvaluate[ButtonNotebook[]])] // DisplayForm
--------------------------------------------------------------
Omega Consulting
"The final answer to your Mathematica needs"
Spend less time searching and more time finding.
http://www.wz.com/internet/Mathematica.html