This is very similar to the link I was referred to earlier, from J.
Walkenbach's site. I modified the function declaration to be public,
made subroutine to play  the tone, and put the call in a conditional
statment in two different routines in this workbook. Both work fine.