hi,
thank you so much it works.
>Mohammed,
>
>The following code worked fine for me with your table (I don't see 0 at all)
>
>

>CLOSE all
>
>use answers excl
>browse
>*>select answers && excl - you can not put exclusive in SELECT command, it should be in the USE command
>
>local lnI as Integer, llError as Logical
>
>local array laFields[1]
>
>afields(laFields)
>
>for lnI = 1 to alen(laFields,1)
>
>  llError = .f.
>
>if inlist(laFields[m.lnI,2],'N','B','I')&&Invalid subscript reference
>
>   if not laFields[m.lnI,5] && &&Invalid subscript reference
>
>       try
>
>         ALTER TABLE Answers  ALTER COLUMN (laFields[m.lnI,1]) NULL
>
>       catch to loError
>
>          llError = .t.
>
>       endtry
>
>   endif
>
>   if not m.llError
>
>       replace (laFields[lnI,1]) with null for empty(&laFields[lnI,1])
>
>   endif
>
>endif
>
>*ENDFOR
>
>next
>
>brow
>
>*********************convert to excel
>
>
>
>*GETFILE()
>
>gcDelimName = ALIAS( ) + '.xls'
>
>gcDelimFile = PUTFILE('excel_file:', gcDelimName, 'xls')
>
>IF EMPTY(gcDelimFile)
>
>   CANCEL
>
>ENDIF
>
>COPY TO (gcDelimFile) XLS

>
>I'm not going to answer my e-mail next week and I definitely prefer to receive questions in the forum rather by e-mail.