excel启用宏工具，vba以后无法连接oracle数据库了 100
2个回答
展开全部
首先看是否加载连接数据库的引用没?
其次如果是在别的主机上使用你自己写好的VBA,有时需要重新引用.
最后看你的oracle数据库是否搭建完成,用SQLplus登陆查询下.
更多追问追答
追问
嗯，已经用sql登录成功了
就是前几天还能用，这几天打开一些带宏的工作表，把我的excel弄乱了
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
可以的，我就做过，在安装了oracle的机子上搜这三个库文件（我用的是oracle11g），oci.dll、orannzsbb11.dll、oraociei11.dll，拿出来，要用到它们，然后把这三个文件放在程序根目录就可以了，注意与服务器的编码问题，如果编码不一致，中文可能出现乱码
使用Excel通过VBA连接Oracle数据库查询数据，可以实现一键自动快速生成所需的多个标准报表，大大地提高工作效率，节省很多时间。这里将此方法分享给大家，为方便学习，简化了很多功能，仅介绍如何连接数据库并将库表USER_USERS的查询结果保存到Excle表中，先看效果图：
通过@微盘分享文件“Excel通过VBA连接Oracle数据库V1.0.rar”
大家可以根据业务需求，灵活调整VBA代码，将数据库中的数据输出到标准报表格式之中。
接下来介绍实现过程。要连接Oracle数据库，须获取服务名、IP地址、端口、用户名、密码等关键信息，假设Oracle数据库服务器信息如下：
有了以上信息之后，如何用Excel通过VBA连接Oracle数据库呢？
首先，应安装Oracle客户端（不了解安装过程的朋友请使用Google或百度搜索答案），并用Net Manager进行配置（熟悉的朋友可以跳过下面介绍的配置步骤）。Net Manager的配置步骤如下：点击创建Net服务名后，出现Net服务名向导。
第一步：输入网络服务名。
第二步：选择协议。
第三步：输入主机名和端口。
第四步：输入服务名。
第五步：测试。
点击完成，结果如下图：
点击上图中的进行连接测试，利用数据库的用户名和密码，直到连接测试成功！
保存配置后应该就可以正常连接到Oracle数据库了。
下面开始介绍如何用Excel通过VBA连接Oracle数据库。
第一步：按Alt+F11，设计窗体。
第二步：为窗体添加代码。
第三步：插入“查询”模块。
第四步：插入“菜单”模块。
第五步：为ThisWorkbook添加代码。
最后，在“数据化分析”表中添加SQL语句（可自定义），保存Excle文件，重新打开“Excel通过VBA连接Oracle数据库V1.0.xls”文件，即可像本文开头的效果图那样开始使用了。
------------
2012年11月25日更新：
有用户反馈查出来的数据只有一行，我今天抽空检查了一下，因为当时举的例子只有一行，结果循环时出了点小问题，现已对查询模块的代码进行了修正，修正后的代码为：
For i = 1 To rs.Fields.Count
ws2.Cells(row, i) = rs.Fields(i - 1).Name
Next
Do Until rs.EOF
row = row + 1
For i = 1 To rs.Fields.Count
ws2.Cells(row, i) = rs.Fields(i - 1).Value
Next
rs.MoveNext
Loop
rs.Close
使用Excel通过VBA连接Oracle数据库查询数据，可以实现一键自动快速生成所需的多个标准报表，大大地提高工作效率，节省很多时间。这里将此方法分享给大家，为方便学习，简化了很多功能，仅介绍如何连接数据库并将库表USER_USERS的查询结果保存到Excle表中，先看效果图：
通过@微盘分享文件“Excel通过VBA连接Oracle数据库V1.0.rar”
大家可以根据业务需求，灵活调整VBA代码，将数据库中的数据输出到标准报表格式之中。
接下来介绍实现过程。要连接Oracle数据库，须获取服务名、IP地址、端口、用户名、密码等关键信息，假设Oracle数据库服务器信息如下：
有了以上信息之后，如何用Excel通过VBA连接Oracle数据库呢？
首先，应安装Oracle客户端（不了解安装过程的朋友请使用Google或百度搜索答案），并用Net Manager进行配置（熟悉的朋友可以跳过下面介绍的配置步骤）。Net Manager的配置步骤如下：点击创建Net服务名后，出现Net服务名向导。
第一步：输入网络服务名。
第二步：选择协议。
第三步：输入主机名和端口。
第四步：输入服务名。
第五步：测试。
点击完成，结果如下图：
点击上图中的进行连接测试，利用数据库的用户名和密码，直到连接测试成功！
保存配置后应该就可以正常连接到Oracle数据库了。
下面开始介绍如何用Excel通过VBA连接Oracle数据库。
第一步：按Alt+F11，设计窗体。
第二步：为窗体添加代码。
第三步：插入“查询”模块。
第四步：插入“菜单”模块。
第五步：为ThisWorkbook添加代码。
最后，在“数据化分析”表中添加SQL语句（可自定义），保存Excle文件，重新打开“Excel通过VBA连接Oracle数据库V1.0.xls”文件，即可像本文开头的效果图那样开始使用了。
------------
2012年11月25日更新：
有用户反馈查出来的数据只有一行，我今天抽空检查了一下，因为当时举的例子只有一行，结果循环时出了点小问题，现已对查询模块的代码进行了修正，修正后的代码为：
For i = 1 To rs.Fields.Count
ws2.Cells(row, i) = rs.Fields(i - 1).Name
Next
Do Until rs.EOF
row = row + 1
For i = 1 To rs.Fields.Count
ws2.Cells(row, i) = rs.Fields(i - 1).Value
Next
rs.MoveNext
Loop
rs.Close
更多追问追答
追问
嗨，闲时你可以远程帮我看一下吗，我的excel设置的问题，数据库配置的没问题，有感谢(⊙o⊙)哦，
1911833567
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
