nisus.com

Hi, I find the attached Find Nearby Words macro very, very useful - thanks again Martin.

Yet I always want the expression put into the Find panel, so I can modify it later if needed.

How do I modify this section so the default action changes and the expression, by default, goes into the Find panel?

# ask user what to do
$button = Prompt 'What should be done with those words?', '', 'Find All', 'Set In Find Panel'
$expression = "$first(AnyTextCharacter)(1+ Shortest)$second(Or)$second(AnyTextCharacter)(1+ Shortest)$first"
If $button == 'Set In Find Panel'
Write Find Expression $expression
Show Find
Exit
End

Thanks for your help,
Cris

CrisB wrote:Hi, I find the attached Find Nearby Words macro very, very useful - thanks again Martin.

Yet I always want the expression put into the Find panel, so I can modify it later if needed.

How do I modify this section so the default action changes and the expression, by default, goes into the Find panel?

That's not difficult, just switch the order of the button labels in the Prompt command, eg: The first label is for the default button.

Brilliant, it works perfectly...

thanks a million, Cris

Guess I should have attached the latest version of this macro...

Cris