在Excel VBA中编写命令导出Oracle数据库的数据，怎麼使用TO_Char语句?

问一下哈，excel 里面有“TO_Char”这个命令吗？如果DEL_DELIVERY是格式为"yyyy/mm/dd hh:mm:ss"字符串，用left（DEL_DELIVERY，10）可以提取出yyyy/mm/dd，我觉得excel读取外部资料后可用的原因是，excel把DEL_DELIVERY处理成格式"yyyy/mm/dd hh:mm:ss"，再用to_char(del_delivery,'yyyymmdd')提取出yyyymmdd是没有问题的，而直接从外部读取的话，excel只把del_delivery处理成字符串，没有格式，所以to_char(del_delivery,'yyyymmdd')提取yyyymmdd就会出错，不知道这样理解对不对。：)

1、打开源数据文件，把首行中的对应的数据，复制行到空白位置。

2、选中J2单元格，单击编辑栏中的"插入函数“，如图示。

3、d出”插入函数“对话框，设置其类别为”逻辑“，并选择列表框中的IF选项。然后确定。

4、在d出的”函数参数“对话框中，设置Logical_test参数为”I2=“”，将Value_if_true设置为“”，即空白内容。

将Value_if_false参数框中输入“VLOOKUP(I2,A2:B2846,2),然后确定。

5、选中J2单元格，注意是J2，不是I2哦.(I2是输入证券代码的地方），鼠标移动到单元格右下角，出现十字光标时，按住鼠标左键向右拖动到O2单元格。如图

6、这个时候会发现原来源数据中的C2-G2单元格中的内容就会自动填充到K2-O2单元格中。这个时候，如需要的数据是按源数据中的数据从上 到下排列的，就可以不用修改了。直接重复第5步中的方法，把J2-O2每个单元格下拉填充就完成了。如图示，先把需要的数据列复制到I列中，然后依次下拉 填充。

7、但有时候，需要的不是按照源数据中的排序，比如说，现用的这个例子，如果在I3中，输入000002就会出错。如图示。

8，这是j3中的函数为VLOOKUP(I3,A3:B2847,2))，也就是搜索从A3到B2487区域中 的内容。没有包含A2，所以我们输入000002在源数据中找不到。所以使用这个方法前，要先对需要的数据按源数据进行排序。不然，是不准确的。

一、在Access数据库中直接导出

用Access打开校友录的数据库文件，选中包含校友信息的“student”表，然后单击鼠标右键并选择“导出”命令。

在打开的对话框中将“保存类型”改成“Microsoft Excel 97-2003 (*.XLS)，然后输入文件名称，单击“导出”按钮，稍后就得到了一个标准的Excel工作簿文件。注意：在Access程序中还可以轻松将数据库表导出为VF的DBF文件、Paradox的数据库文件、文本文件等多种格式以供调用。用Excel打开导出得到的文件，将不需要的列删除，只保留姓名和E-mail地址所在的两列，随后保存，最后将此文件上传给领导审阅即可。

二、用AccessToExcel来帮忙

如果对Access数据库 *** 作不熟悉，没关系，可以使用AccessToExcel这款免费软件来帮忙。AccessToExcel，顾名思义，就是将Access数据库转换为Excel工作簿。安装并运行Access ToExcel，单击窗口左上角“导出Access数据库文件”左边的Access图标，在打开的对话框中选择要转换的MDB文件，打开该数据库文件。提醒：该软件附带提供获取Access数据库密码的功能，但算法不够全面，如果不能获取要打开的数据库密码会d出提示，请在“Access数据库密码”下手动输入。单击右侧“数据库 *** 作”标签下的“获取数据库”按钮，稍后将在“数据表名称列表”下显示该数据库中各表的名称。

从列表中选中要转换的那个表，单击“获取字段列表”按钮，在窗口左下方便列出了表中的各字段，去除不需要的字段前的对勾，然后点击“浏览数据”按钮，可检验是否为最终需要的项目。

切换到“导出数据”标签下，单击“选择导出文件”按钮，输入最终要导出的EXCEL文件名。单击“导出”按钮，在窗口下方会显示导出进度，完成后在d出的对话框中点击“是”立即保存。这样便得到了需要的Excel文件。用Excel打开导出的文件，可发现其中只有选中的字段。和直接导出相比，使用AceeToExcel导出的表前部会增加一个标题，如果不需要可在Excel中将其去掉。

---