CLOSE all USE aaa use bbb use ccc use ddd....etc.. *INDEX ON flag tag FLAG_TAG gcDelimName = ALIAS( ) + '.xls' gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls') IF EMPTY(gcDelimFile) && Esc pressed CANCEL ENDIF COPY TO (gcDelimFile) xls && Create delimited file MODIFY FILE (gcDelimFile) NOEDIT endif