Hi Budianto,

Something like this might work:

#DEFINE xlDBF4 11
x = 0
FOR EACH loSheet in oXL.Sheets
x = x+1
lcTable = "Sheet" + transform(x)
loSheet.SaveAs(lcTable, xlDBF4)
ENDFOR
Can' guarantee the translation, but you'll get a table from each sheet.

pamela

>Hi all,
>
>Anyone knows how to transfer exel file to dbf file within VFP automatically, the exel file has more than one worksheet. I did some testing using macro exel but couldn't find the right syntax in VFP
>
>
>
>TIA,
>
>Budianto