Figbytag.m

function [h]=figbytag(str)
  %pass a tag string to look for and function returns handles of all
  %objects with str in tag
  h=findall(0);
  tags=char(get(h,'Tag'));
  [A,I]= grep(tags,str);
  h=h(I);

figbytag