作者：乔山办公网日期：
返回目录：excel表格制作
你试试只运百行前两个步骤（步骤1 和步骤2）：
先最好确定表是没有打开的
在vf菜单中选择 “文件度->导入知（I）”
选择 “导入向导”
步骤1 主要选择好 “文件类型（T）”
步骤2 注意选好 “工作表（W）”和“导入起始行（R）”一般选为2
步骤3、4 可以暂时不动
其他操作地球人道都知道了，就不多说了。
这两步完了就可以点 “完成（F）”了
在VF运行后，专屏幕没有变化。属在命令窗口打上 brow 就能看到你的杰作了。
其它要改动的再改
那你先用代码把excel表合并了，然后再导入，如果你的数据中没有合并过的单元格，我可以帮你合并一下，要是你的结构确实一样，
vfp导出excel的简单方法
vfp的表都是DBF格式的文件，如下有几种简单的方法可以将表中的数据导入Excel。
方法一：
如果你的数据中都是普通的数值和字符串类型，直接用Excel打开表，然后“另存为”一个Excel就可以了。
这样最多可以保存65,536 行(但其中有一行保留给字段标题)，因为目前EXCEL最多支持7a686964616fe58685e5aeb9331 65,536 行
方法二：
用VFP9.0执行如下语句：
USE test.dbf
Copy To TEST.Xls Type Xl5
注：可以输出最多 65,536 行(但其中有一行保留给字段标题)，因为目前EXCEL最多支持 65,536 行
Excel 8.0 (Excel 97)之前的版本只能显示前 16,384 行，并且不能导入超过 32,767 行的文件。
方法二：
导成 Csv 文件，记录没有限制，用EXCEL一样打开，但EXCEL2003最多能查看65,536行，因为目前EXCEL2003最多支持 65,536行(Excel 2007 最大行列:16384 列 1048576 行)
USE test.dbf
Copy To test.Csv Type Csv
但导成CSV有如下限制:
- 逻辑字段转换为 F/T 而不是 FALSE/TRUE.
- 如果一个字符字段只包括数值且值中包括前导的零, Excel 转换它为数值型的值 (如 "00000100" => 100).
- 日期型字段导出时要将设为 mm/dd/yy 格式或 mm/dd/yyyy 格式，否则导回时将丢失日期字段内容.
特别是字段是一个专用关键字且你又要在稍后从Excel 文件转换回 VFP 时，这样会有问题。
1、“确定”按钮的click事件代码：
ok=.t.
ON ERROR do err.prg
USE pra &表名
APPEND from ALLTRIM(thisform.text1.value) type xls
USE
if(ok)
=MESSAGEBOX("添加成功")
endif
2、“选择文件”按钮的click事件：
sPath=GETFILE("xls","请选择文件：","选中")
thisform.text1.value=sPath
3."取消"按钮click事件：
thisform.release
4、在initial事件（用来设置搜索目录，防止表找不到）：
lcsys16=SYS(16)
lcprogram = LEFT(lcsys16, rAT("\", lcsys16,1))
lcprogram=alltrim(substr(lcprogram, RAT(":",lcprogram)-1))
SET DEFAULT TO &lcprogram
SET PATH TO &lcprogram
5、另外建一个err.prg
MESSAGEBOX("请却保操作正确")
ok=.f.
这样应该就好很多吧～
ole的没见过怎么操作excel表格的，所以抱歉帮不e68a84e8a2ad7a64335上了～