Nice Ron :)Cheers Lee 😁
...That's the ticket :) .. you could also remove the first asterisk in red.
ps......this looks like it works
(and (not (wcmatch tb "*A#_*")) (vla-put-name a (strcat sz "_" tb)))
Sorry Ron - I couldn't resist the urge to LISP :PNo worries .. it is a disease you know. ;DCode - Auto/Visual Lisp: [Select]
) ) ) ) )