% % don't start emailing until userform started % _Xls.Uhwnd zero { % % no user form yet % } { % % scan for any emails produced % empty ofmms empty { "EMA_" nextext ? "emailing" log)( % % the numbr would be filled by valid email text file % Msg.*? { % % valid email directive % /* "___PrvText___" _Mail.PrvText replall "___Banner___" _Mail.Banner replall "___BackA___" _Mail.BackA replall "___Comp___" _Mail.Comp replall "___Product___" _Mail.Product replall "___ProdA___" _Mail.ProdA replall "___ProdB___" _Mail.ProdB replall "___ProdC___" _Mail.ProdC replall "___ProdD___" _Mail.ProdD replall "___ProdE___" _Mail.ProdE replall _Mail.Subject */ *xactmmtx *condemai } if finaled } loop filing) } ifelse