>FOR i = 1 TO THIS.oProjRef.Files.Count > oFile = THIS.oProjRef.Files(i) > IF oFile.Type = "R" > lcFileName = oFile.Name > WAIT WINDOW "Clearing Printer information from report: " + lcFileName NOWAIT > USE (lcFileName) IN 0 EXCL ALIAS ReportFile > * The "use" might have failed for whatever reason... the error handler simply ignores it > IF USED("ReportFile") > SELE ReportFile > GO TOP > REPLACE Tag WITH "" > REPLACE Tag2 WITH "" > USE IN ReportFile > ENDIF > ENDIF >ENDFOR > >WAIT CLEAR > >Hi Erik,