EXCEL2007工作表已没有另存为DBF表的选项

yjrryyx 2011-07-08 04:19:12
EXCEL2007工作表已没有另存为DBF表的选项，当然也不能：oExcel.ActiveWorkbook.SaveAs('TEST.DBF',8)这种形式，
当然也不能用：appe from getfile("xls")这种形式,怎么办，不要跟我说退回到EXCEL2000，因为公司新的电脑都是按装EXCEL2007的，在EXCEL2007下如何操作EXCEL工作表成为DBF表，VFP真的好无奈啊，请各位高手支支招，谢谢！
...全文
3479 23 打赏 收藏 转发到动态 举报
写回复
用AI写文章
23 条回复
切换为时间正序
请发表友善的回复…
发表回复
xjj1976 2011-11-30
  • 打赏
  • 举报
 回复
可以先另存为”Microsoft Excel 5.0/95“，然后从VF软件中导入即可
sdjnjdxc 2011-07-18
  • 打赏
  • 举报
 回复
烦恼,烦恼
qgfudi 2011-07-14
  • 打赏
  • 举报
 回复
路过，学习！！！
everyday1212 2011-07-11
  • 打赏
  • 举报
 回复
真NB，学习了！
yjrryyx 2011-07-11
  • 打赏
  • 举报
 回复
[Quote=引用 17 楼 apple_8180 的回复:]
引用 9 楼 yjrryyx 的回复:
另存为2000-2003格式不行，另存为5.0/95 工作簿可以追加到DBF表中，在代码中如何把不是5.0/95 格式转为可追加的格式，在EXCEL2007将格式转为5.0/95工作簿录制宏代码如下：
Sub Macro1()
'
' Macro1 Macro
'
'
Cells.Select
ChDir "C:\Users\yjr\Desk……
[/Quote]
转换成功，谢谢！
wwwwb 2011-07-11
  • 打赏
  • 举报
 回复
http://msdn.microsoft.com/en-us/library/bb241279(v=office.12).aspx
从内容上看，支持DBF4的
oExcel.ActiveWorkbook.SaveAs('C:\NewTest95格式.xls',11)
十豆三 2011-07-11
  • 打赏
  • 举报
 回复
[Quote=引用 9 楼 yjrryyx 的回复:]
另存为2000-2003格式不行，另存为5.0/95 工作簿可以追加到DBF表中，在代码中如何把不是5.0/95 格式转为可追加的格式，在EXCEL2007将格式转为5.0/95工作簿录制宏代码如下：
Sub Macro1()
'
' Macro1 Macro
'
'
Cells.Select
ChDir "C:\Users\yjr\Desktop"
ActiveWorkbook.SaveAs Filename:="C:\Users\yjr\Desktop\6月单价.xls", FileFormat _
:=xlExcel5, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False
Application.Goto Reference:="Macro1"
End Sub
不知VFP代码如何写，请高手帮忙，谢谢！[/Quote]
lcFileName='C:\2007格式.xls'
oExcel=Createobject('Excel.application')
oExcel.Workbooks.Open('&lcFileName') &&打开文件
oExcel.DisplayAlerts=.F.
oExcel.ActiveWorkbook.SaveAs('C:\NewTest95格式.xls',39) && 43为97/2003 xlExcel9795（39为5.0/95 xlExcel5 & xlExcel7)
oExcel.Workbooks.Close &&关闭表
oExcel.Quit &&退出EXCEL
Release oExcel &&释放变量
Messagebox('另存为5.0格式完成！',64,'信息提示')
十豆三 2011-07-11
  • 打赏
  • 举报
 回复
另存为
Microsoft Excel 5.0/95 格式或4.0格式
或
CSV
再导入。
WWWWA 2011-07-11
  • 打赏
  • 举报
 回复
[Quote=引用 9 楼 yjrryyx 的回复:]
引用 2 楼 yjrryyx 的回复:
谢谢，第一条肯定不行，在EXDEL2007下不管你另存为什么格式，在追加时通通出错，第二条另存为txt格式，会出现乱码，那一种文本文件更正确一点，现在还没调试出来，有没有已在用EXCEL2007的有好的方法的高手显身一下，谢谢！

另存为2000-2003格式不行，另存为5.0/95 工作簿可以追加到DBF表中，在代码中如何把不是5.0/95 格式转为……
[/Quote]
与2000的VBA类似，试试
ActiveWorkbook.SaveAs("C:\Users\yjr\Desktop\6月单价.xls",56)
liuanzhao 2011-07-10
  • 打赏
  • 举报
 回复
调用EXCEL程序，打开要导入的文件，循环单元格,填到对应的DBF文件的字段里

如：

oexl=CREATEOBJECT("excel.application")
oexl.workbooks.open("&lcDelimFile")

ncount=AFIELDS(aprtarray)

nrow=1


WAIT '正在执行所请求的操作，请稍候......' WINDOW AT 40,50 NOWAIT


DO WHILE .t.

APPEND BLANK
FOR i=1 TO ncount
cfield=aprtarray(i,1)



xhbl=oexl.cells(nrow,i).value


IF varTYPE(xhbl)="X" AND cfield="序号" THEN
MESSAGEBOX("第1列遇到空白记录！导入结束",64,"友情提示")
oexl.workbooks.close
oexl.quit
RETURN
ENDIF

REPLACE &cfield WITH xhbl


nrow=nrow+1
i=1

ENDDO
liups 2011-07-10
  • 打赏
  • 举报
 回复
所以我只用office2003
dfwxj 2011-07-10
  • 打赏
  • 举报
 回复
是什么样的数据要导入到DBF？那数据是从哪来的？是机器自动生成出来的还是人手工录入的？
yjrryyx 2011-07-09
  • 打赏
  • 举报
 回复
唉，看来一般的技术完不动VFP了，从最简单的数据库语言要开始走向复杂的道路了，因为越来越需要要靠第三方控件来支持了！
FOXHENGXING 2011-07-09
  • 打赏
  • 举报
 回复
直接用com的方式访问，循环单元格，把数据填回来就好
yjrryyx 2011-07-09
  • 打赏
  • 举报
 回复
[Quote=引用 2 楼 yjrryyx 的回复:]
谢谢，第一条肯定不行，在EXDEL2007下不管你另存为什么格式，在追加时通通出错，第二条另存为txt格式，会出现乱码，那一种文本文件更正确一点，现在还没调试出来，有没有已在用EXCEL2007的有好的方法的高手显身一下，谢谢！
[/Quote]
另存为2000-2003格式不行，另存为5.0/95 工作簿可以追加到DBF表中，在代码中如何把不是5.0/95 格式转为可追加的格式，在EXCEL2007将格式转为5.0/95工作簿录制宏代码如下：
Sub Macro1()
'
' Macro1 Macro
'

'
Cells.Select
ChDir "C:\Users\yjr\Desktop"
ActiveWorkbook.SaveAs Filename:="C:\Users\yjr\Desktop\6月单价.xls", FileFormat _
:=xlExcel5, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False
Application.Goto Reference:="Macro1"
End Sub
不知VFP代码如何写，请高手帮忙，谢谢！
ACMAIN_CHM 2011-07-09
  • 打赏
  • 举报
 回复
还是先导出ACCESS然后再保存为DBF
-晴天 2011-07-09
  • 打赏
  • 举报
 回复
直接在VFP里导入.
wwwwb 2011-07-08
  • 打赏
  • 举报
 回复
假设你已经安装OFFICE2007：
oconnection = CREATEOBJECT("adodb.connection")
oconnection.connectionstring = 'Provider=Microsoft.ACE.OLEDB.12.0;Data Source=c:\myFolder\myExcel2007file.xlsx;Extended Properties="Excel 12.0 Xml;HDR=YES;IMEX=1";
oconnection.open
oConnection.EXECUTE('SELECT * INTO [DBASE 5.0;DATABASE=R:\TEMP].AA FROM [SHEET1$]')
yjrryyx 2011-07-08
  • 打赏
  • 举报
 回复
不知道如何再次导入到EXCEL 中，看来VFP的生命比我想象中的终结来的更早一点了，都是在程序中自动导入的，用追加形式，不知道如何重新修改了，自己用当然不怕2007还是2011的，是要用程序自动完成的导入，谢谢你，还请高手们再出出主意。
wwwwb 2011-07-08
  • 打赏
  • 举报
 回复

OR
在ODBC中建立数据源，连接EXCEL 2007，
在VFP中用远程视图访问
加载更多回复（3）
EXCEL万能百宝箱64位 V29.0珍藏版—智慧轻巧办公，批量打印二维码条形码，十倍提效率，一码三用，480个功能.rar
Excel万能百宝箱64位 是著名微软办公软件EXCEL（Microsoft Office for EXCEL）超大型插件。内置了图片百宝箱、财务百宝箱、函数百宝箱、二维码百宝箱。包括280以上个菜单功能和200个增益实用函数，集480个宝贝于一身，但体积小于30MB。当安装万能百宝箱后，如果您使用Excel 2003，则将产生【万能百宝箱】菜单，包括280个以上菜单；如果您使用Excel 2013或者2016，将产生【经典】与【万能百宝箱】功能区。根据各功能的特点，对子菜单作了18个分类， 并Excel函数基础上扩展新增200个实用新的函数，用于增益Excel的扩展功能。且所有功能都通用于Excel 2003、2007和2010、2013、2016、Excel2019。支持中英文显示与繁简体操作系统、拥有30多款华丽的皮肤界面,支持Excel2010全面隐藏选项卡，这个插件还前承了Excel2003经典样式菜单，目的是方便那些从Excel2003转向使用2007或2013版的朋友熟练使用。兼并了ExcelTabs工作薄多标签插件，方便在不同工作薄中切换与使用。跨工作薄存储格逐步提示输入功能让你录入数据更轻松。图片批量尺寸及嵌表格式导图、导入多列图片具备18项可设置参数，多达80种组合导入方式，满足各行业不同需求的图片导入导出与规范排版。表达式计算精灵让数学函数及复杂公式表达式全自动计算一切变得那么轻巧与高效，且能与EXCEL智能交互操作。工程解密功能可以解除VBA工程不可查看的EXCEL工程文档,解除后重新打开文档可100%准确还原源代码,结合Office编程百宝箱成为VBA开发者的必备利器。更内置了比Vlookup()函数更强大且好用的VlookupIn()函数。能对VBA宏程式能实现撤销与还原操作，防止鼠标误点功能与误操作。在EXCEL另存DBF功能的基础上还可以轻松实现对所有SQL数据库(*.DBF)文件进行加密或解密操作,防止重要内容不被随意读写操作。全能语音朗读器具备英语学习复读机的功效可重复及延时朗读。存储格朗读机即时响应按回车时朗读指定的或偏移行列的存储格内容。原创批量图片排序功能，誉为“图片排序大师”，有21种样式可选，能批量将工作表中指定存储格范围的图片快速排序并输出到新表中。支持XP至WIN10多个操作系统完美兼容,实现无缝隙对接，U盘版用户除了在原有可换机使用的基础上,实现XP/WIN7/WIN8/WIN10通行无阻。批量打印二维码与条形码、批量二维码识别(可带Logo)、批量二维码生成(可带Logo)、批量制作出货单标签、销售单标签、盘点标签之打印二维码、条形码等、依据模板一次性可以制作成千上百个二维码或条形码。表格数据汇总、全自动检索录入、数据采集大师、批量改图片大小、批量图片导入、批量图片导出、批量导图入批注、图片查询、截长图与分页截图、批量图片排序大师、批量图片格式转换、批量文字水印与Logo水印、批量取图片敏感信息、身份证验证、银行卡较验升级、取相同项与不同项、提取唯一值、取选区唯一值、智能填充、行列着色、背景着色、身份证验证、度量衡实时转换、批量改文件时间等等功能一应俱全等等功能一应俱全，每款功能千锤百炼。单机版与移动版产品均已实现注册码一码三用，可同时用于《EXCEL万能百宝箱》32位与64位以及《WPS万能百宝箱》。由全球顶尖级水平微软MVP专家与财会管理信息团队历时十年以上开发，是与EXCEL用户与爱好者共同努力的结晶，被誉为"全能的办公瑞士军刀"。适合办公文员、办公白领实现智能轻松办公。单机版产品已实现注册码一码二用，一码可以同时用于《EXCEL万能百宝箱》与《WPS万能百宝箱》。 USB盘移动版1用户不限电脑台数安装台数,任一台电脑均可用(推荐用金士顿U盘)。此版本比上一版本更新了多达40多项功能完善，批量制作、生成、打印二维码条形码，十倍地提升工作效率，物超所值，值得收藏了。。。
EXCEL万能百宝箱 V29.8 内置了图片百宝箱、财务百宝箱、函数百宝箱、二维码百宝箱.rar
Excel万能百宝箱 是著名微软办公软件EXCEL（Microsoft Office for EXCEL）超大型插件。内置了图片百宝箱、财务百宝箱、函数百宝箱、二维码百宝箱。包括280个菜单功能和200个以上自定义函数，集480个宝贝于一身，但体积小于30MB。当安装万能百宝箱后，如果您使用Excel 2003，则将产生【万能百宝箱】菜单，包括280多个子菜单；如果您使用Excel 2013或者2016，将产生【经典】与【万能百宝箱】功能区。根据各功能的特点，对子菜单作了18个分类， 而在函数向导对话框中也新增120个以上新的函数，用于扩展Excel的基本功能。且所有功能都通用于Excel 2003、2007和2010、2013、2016、Excel2019。支持中英文显示与繁简体操作系统、拥有30多款华丽的皮肤界面,支持Excel2010全面隐藏选项卡，这个插件还前承了Excel2003经典样式菜单，目的是方便那些从Excel2003转向使用2007或2013版的朋友熟练使用。兼并了ExcelTabs工作薄多标签插件，方便在不同工作薄中切换与使用。跨工作薄存储格逐步提示输入功能让你录入数据更轻松。图片批量尺寸及嵌表格式导图、导入多列图片具备18项可设置参数，多达80种组合导入方式，满足各行业不同需求的图片导入导出与规范排版。表达式计算精灵让数学函数及复杂公式表达式全自动计算一切变得那么轻巧与高效，且能与EXCEL智能交互操作。工程解密功能可以解除VBA工程不可查看的EXCEL工程文档,解除后重新打开文档可100%准确还原源代码,结合Office编程百宝箱成为VBA开发者的必备利器。更内置了比Vlookup()函数更强大且好用的VlookupIn()函数。能对VBA宏程式能实现撤销与还原操作，防止鼠标误点功能与误操作。在EXCEL另存DBF功能的基础上还可以轻松实现对所有SQL数据库(*.DBF)文件进行加密或解密操作,防止重要内容不被随意读写操作。全能语音朗读器具备英语学习复读机的功效可重复及延时朗读。存储格朗读机即时响应按回车时朗读指定的或偏移行列的存储格内容。原创批量图片排序功能，誉为“图片排序大师”，有21种样式可选，能批量将工作表中指定存储格范围的图片快速排序并输出到新表中。支持XP至WIN10多个操作系统完美兼容,实现无缝隙对接，U盘版用户除了在原有可换机使用的基础上,实现XP/WIN7/WIN8/WIN10通行无阻。批量二维码识别、批量二维码生成、表格数据汇总、全自动检索录入、数据采集大师、批量改图片大小、批量图片导入、批量图片导出、批量导图入批注、图片查询、批量图片排序大师、批量图片格式转换、批量文字水印与Logo水印、批量取图片敏感信息、身份证验证、银行卡较验升级等等功能一应俱全，每款功能千锤百炼。由全球顶尖级水平微软MVP专家与财会管理信息团队历时十年以上开发，是与EXCEL用户与爱好者共同努力的结晶，被誉为"全能的办公瑞士军刀"。此为多国语言版（EXCEL2003--EXCEL2019+繁简体通用）U盘+移动硬盘版（XP至WIN10通用+可换机用） 精品480个超实用功能的完整珍藏版本，呵呵。。。
MAPGIS地质制图工具
本系统是在Windows XP系统和MapGis6.7(B20051118)基础上，以Microsoft VC++ 6.0为编程语言，MapGis 6.7 SDK为开发平台进行开发的地质图件制作软件。系统基于MapGis输入编辑子系统强大的图形编辑能力，添加专业的地质图件制作工具，大大提高了地质图件的制作效率，能够很完美的转换CAD数据格式为MapGis格式。地质数据采集系统采用Microsoft Access的MDB格式，自动计算绘制符合行业标准的MapGis格式地质图件。 本软件完全免费使用。在使用过程中，如果是本软件的缺陷造成你的损失，本人不承担任何责任。一旦开始使用，视为你同意。 本软件可以自由复制传播，但不可用于商业用途。 操作演示请切换到“操作视频”帮助页面，网上下载高清有声视频。 现Section版本具有的主要功能模块： 1、绘制剖面图功能； 2、绘制柱状图功能； 3、辅助工具Ⅰ和辅助工具Ⅱ（CAD转MapGis文件）； 4、其他功能（暂时未归类功能）。 编辑本段Section快捷键对照表 Ctrl+A 选择相同图元功能 B 选择区 Ctrl +C 复制图元功能 C 选择点 Ctrl +V 粘贴图元功能 N 选择弧段 Ctrl +X 剪切图元功能 V 选择线 Ctrl +Z 后悔操作 X 选择子图 Shift+Z 选多类型图元功能 Z 选择文本 Shift +C 超级拷贝功能 E 扩展工具箱 Shift +V 超级粘贴功能 T 系统工具箱 F2 正交功能 Del 删除选择图元 Tab 全屏功能 空格键 捕捉功能 → 向右移动选择图元 ↑ 向上移动选择图元 ← 向左移动选择图元 ↓ 向下移动选择图元 Y 捕捉点图元 U 捕捉节点及端点 I（i） 捕捉交叉点 O 捕捉垂点 P 捕捉最近点 [ 捕捉中点 鼠标中键 按住可以移动图形 鼠标滚轮 放大缩小功能 双击鼠标中键 复原窗口功能 双击鼠标右键 取消所有操作，回到初始状态 （以上快捷键不区分大小写）,其它快捷键与mapgis相同。 在编辑视图中，如果状态为准备状态，按住Ctrl右击，将弹出常用图元编辑快捷菜单；按住Shift右击，将弹出扩展功能快捷菜单。 编辑本段安装与卸载 系统要求 基础软件：MapGis软件。推荐MapGis 6.7版本Build051118。 系统支持：Section软件支持Microsoft Windows 的2000， XP， Vista和 7系列的操作系统。(32位，64位未测试)。 语言：支持中文，简体。 下载 进入地信网论坛和华夏土地网论坛下载最新版本的Section程序。 安装软件步骤 1）对于Section单个程序：把section.exe和section.chm等放入MapGis67\program目录内即可。 2）对于独立安装包：（相对于单个程序文件，还包含了先前的各种自定义配置文件） 第一步：双击运行安装程序Section2010.exe，打开安装向导页面开始安装Section软件； 第二步：仔细阅读“许可协议”，点击“同意”，继续下一步安装，否则点击“取消”，退出软件安装； 第三步：仔细阅读“信息”，阅读软件重要信息，点击“下一步”，继续下一步安装，否则点击“取消”，退出软件安装； 第四步：选择安装路径：默认情况下，软件安装在系统的C:\MapGis67\program目录下，单击“浏览”可更改路径；注意非默认位置时，目录只要指向program的上级目录，即mapgis67。 第五步：请“选择组件”，有完全安装，简洁安装和自定义安装3种供选择。点击“下一步”，继续下一步安装； 第六步：在开始菜单文件夹中创建程序的文件夹名称。点击“下一步”，继续下一步安装； 第七步：选择附加任务:创建桌面快捷方式和快捷启动栏快捷方式，以及Section关联MapGis文件等。勾选所需选项，点击“下一步”，开始准备安装； 第八步：点击“安装”。直至最后，不想在安装完成后运行Section程序请去勾，点击完成。 卸载 1）对于非安装包：把section.exe程序和section.chm等文件删除即可。 2）对于独立安装包：打开控制面板，进入添加/删除程序（Win7的为程序和功能）找到Section卸载项目，双击“Section卸载”或者右键菜单中的卸载。 FAQ： 1、 双击section.exe后出现 “无法启动此程序，因计算机丢失basroot.dll……”的提示，程序不能使用？ 答：没有在mapgis环境下缺少基本组件和动态链接库，运行程序会出现此提示，把section.exe放入MapGis67\program目录内即可。 0327d正式版0612 软件更新日志 1、修正不能删除角度花纹有残留的Bu
php导出excel不兼容wps,#wps保存dbf不兼容#如何将Excel文件另存为DBF3格式
EXCEL文件另存为时，下拉列表中没有DBF-4格式的选项这是因为更新了版缘故，先保存成2003再为dbf即可。具体步骤：1开要转格式的Excel电子表格文件，点击文件菜单。2、点击 另存为。3、 保存类型选择DBF (这里有DBF 2、3、4 选 DBF4就行)4、 提示不支持多份工作表的工作簿。这里只能导出当前工作表到 DBF。点确定。5、 提示有不兼容功能。点击“是” (去掉所有不兼容的功能...
Excel将数据内容导出为数据库DBF文件的操作
今天要和大家分享的是，Excel将数据内容导出为数据库DBF文件的操作。如下图所示的数据内容……7.退出后我们再指定文件夹就可以看到指定的文件夹。2.我们首先需要选择方方格子按钮。如果经验帮到了你，请记得分享！3.选择其中的工作表命令操作。4.选择另存为DBF文件。6.单击确定即可完成操作。
VFP

2,726

社区成员

29,112

社区内容

发帖
与我相关
我的任务
社区描述
VFP，是Microsoft公司推出的数据库开发软件，用它来开发数据库，既简单又方便。
社区管理员
  • VFP社区
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章