>That does look quite a bit simpler than what I was doing. I'd forgotten about GetBar() and it never came up in the xref for any of the other menu commands. Actually, the Microsoft docs are noticeably lacking in this area and often lack meaningful examples, IMO. But that's where UT comes in: somebody can always come up with the missing piece of a puzzle!
>
>Thanks

Lynda,
Did you get the removal working?

         lcCaption = ThisForm.Caption
	lnTot = 0
	lnTot = cntbar("Window")
	for lnBar = lnTot to 1 step -1
	  if prmbar("Window", getbar("Window", lnBar)) = lcCaption
	    release bar getbar("Window", lnBar) of Window
	    exit
	  endif
	endfor

HTH