我想用Excel宏编写代码来对SQL数据库进行连接和操作，请教详细的步骤或方法，重分！！！！一定加分

我想用Excel宏编写代码来对SQL数据进行连接和操作，请教详细的步骤或方法，重分！！！！一定加分~

百度Hi上联系我吧，我在线帮助你。或者留个邮箱给我

1.打开sqlserver 选择数据库 点击右健[所有任务]-[导入数据]
2.按照向导 选择数据源 [micrsoft excel 97-2000] 选择要导入的文件
3.接下来的向导选择要导入到的数据库，该导入支持新建表，和表数据追加都可以，按照向导步骤操作就可以啦！

参考网上资料：
http://www.access-cn.com/offspace/html/32/n-532.html
一、加载ODBC宏（OFFICE2000光盘有提供）后您就可以使用该函数了。语法及示例详参《OFFICE2000帮助文档》，全篇如下：Office中国社区门户4q_
Sz y0[ Z!g

连接到外部数据源并运行工作表中的查询。然后，函数 SQL.REQUEST 以数组形式返回结果，而不必运行宏。如果该函数不存在，就必须安装 Microsoft Excel 的 QDBC 加载宏（XLODBC.XLA）。Office中国社区门户(m1n:jj(alT3^

语法Office中国社区门户}
}o%p&I"ev"b

SQL.REQUEST(connection_string,output_ref,driver_prompt,query_text,col_names_logical)

.I3ow{0F
Kh,]*S'A5V:Eq0
Connection_string 提供信息，如数据源名称、用户标识和口令等。这些信息对于连接数据源的驱动程序是必需的，同时它们必须满足驱动程序的格式要求。下表给出用于 3 个不同驱动程序的 3 个连接串的示例。

#RT"~6e7h&? M!`'J0
o
T f'j%o)M0 驱动器 连接串
dBASE DSN=NWind;PWD=test
SQL Server DSN=MyServer;UID=dbayer; PWD=123;Database=Pubs
ORACLE DNS=My Oracle Data Source;DBQ=MYSER VER;UID=JohnS;PWD=Sesame
Office中国社区门户r;}??X7||

7V2\O e&{S I;mIT8N0

在试图连接到数据源之前，必须定义在 connection_string 中使用的数据源名称（DSN）。Office中国社区门户p.D9{8]k }

Z0k0X/@ Q6|#rAP~0 可以以数组或字符串的形式输入 connection_string。但如果 connection_string 超过 250 个字符，必须按数组的形式输入。
4_0M+Hb&At3^0Office中国社区门户b-Q0iI9p)Y
如果函数 SQL.REQUEST 不能使用 connection_string 访问数据源，则返回错误值 #N/A。 Output_ref 对用于存放完整的连接字符串的单元格的引用。如果在工作表中输入函数 SQL.REQUEST，可以忽略 output_ref。

当需要函数 SQL.REQUEST 返回完整的连接串时,可以使用 output_ref（此种情况下，必须在宏表中输入函数 SQL.REQUEST）。Office中国社区门户#^;a#C/b9r~&d
Office中国社区门户K$M'FCJXb
如果省略 output_ref，函数 SQL.REQUEST 不能返回完整的连接串。 Driver_prompt 指定驱动程序对话框的显示时机以及可用的选项。可以使用下表中所描述的数字来描述 driver_prompt。如果省略 driver_prompt，函数 SQL.REQUEST 默认为 2 。

2cX!c0~e5Rl&RT6U0 Office中国社区门户X9d7G _n
Driver_prompt 说明
1 一直显示驱动程序对话框。
2 只有在连接串和数据源说明提供的信息不够充分，以致不能完成连接时，才显示驱动程序对话框。所有对话框选项都可使用。
3 只有在连接串和数据源说明提供的信息不够充分，以致不能完成连接时，才显示驱动程序对话框。如果未指明对话框选项是必需的，这些选项是暗的，不能使用。
4 不显示对话框。如果连接不成功，则返回错误值。

{ |1@Pi)L0Office中国社区门户8_E8q4L9x]6X4J"_/C

Query_text 需要在数据源中执行的 SQL 语句。

如果函数 SQL.REQUEST 不能在指定的数据源中执行 query_text，则返回错误值 #N/A 。Office中国社区门户*`%S Hr+C7e6A1h3f
Office中国社区门户Eg.\*_H)yB
可以将引用连接到 query_text 上来更新查询。在下面的例子中，每次 $A$3 改变，函数 SQL.REQUEST 使用新的数值来更新查询。
"SELECT Name FROM Customers WHERE Balance > "&$A$3&"".

Microsoft Excel 将串长度限制在 255 个字符内。如果 query_text 超过此长度，请在垂直单元格区域中输入查询并使用整个区域作为 query_text。所有单元格的值连接在一起，形成完整的 SQL 语句。 Office中国社区门户 S,m/u(k]
Column_names_logical 指明是否将列名作为结果的第一行返回。如果要将列名作为结果的第一行返回，请将该参数设置为 TRUE。如果不需要将列名返回，则用 FALSE。如果省略 column_names_logical，则函数 SQL.REQUEST 不返回列名。

/q#H@B#Y:ji_0
返回值

如果此函数完成了它的所有功能，则返回查询结果数组或受查询影响的行数。Office中国社区门户WRBy h&O@Pll
Office中国社区门户)z*WnpE1J'E$?.@
如果函数 SQL.REQUEST 不能使用 connection_string 访问数据源，则返回错误值 #N/A。

3u'sr+~9~/yFTfmS0说明

函数 SQL.REQUEST 可以以数组的形式输入。如果以数组形式输入函数 SQL.REQUEST，该函数将返回一个恰好填充选定区域的数组。Office中国社区门户 cq8Xq ]NS
Office中国社区门户(^T%b7@ ]y
如果单元格区域大于结果集，函数 SQL.REQUEST 向返回的数组添加空单元格，直至增加到所需要的大小。
;Y"X;FA,kW0
+Lu"l5@?0 如果结果集大于以数组形式选定的输入区域，函数 SQL.REQUEST 返回整个数组。Office中国社区门户]/y){ Q sIX
Office中国社区门户1c#ZY8`7n$YRp&x
函数 SQL.REQUEST 参数的次序与 Visual Basic for Application 中函数 SQLRequest 的参数次序不同。
Office中国社区门户"C!pK p9O6BnlPj
示例

6c!s3F^-TzT_0
假设需要对名为 DBASE4 的 DBASE 数据库进行查询。如果在单元格中输入下列公式，将会返回查询结果数组，其中第一行是列名：Office中国社区门户B9]4[RqK_w
c

SQL.REQUEST("DSN=NWind;DBQ=c:\msquery;FIL=dBASE4", c15, 2,
"Select Custmr_ID, Due_Date from Orders WHERE order_Amt>100", TRUE)二、用“数据”菜单上的“获取外部数据”-“新建数据库查询”向导获取数据库数据。用该向导取得数据后，以后该工作表的数据以后会随数据动态更新（在不移动数据源文件的前提下）。注意：请仔细设置外部数据表的属性，会有更多收获。
以上答案供参考

---

横县18445916929： excel中编写宏的步骤 - ？
台甘治糜： 1、首先打开excel,点击开发工具单击选择插入,之后在下拉的菜单中的表单中的控件里面选择”按钮“的图标. 2、然后再弹出的一个对话框“指定宏”的时候,单机新建的按钮. 3、这样就进入到Excel的VBA程序宏的编辑界面,进入之后写一个演示宏,然后点击保存. 4、这个时候程序就已经写好了,当点击excel中的按钮的时候会弹出一个hello world的消息提示框.

横县18445916929： Excel宏操作SQL数据库 - ？
台甘治糜： Dim cn As New ADODB.Connection Dim rs As New ADODB.Recordset Dim strCn As String Dim strSQL As String Dim CountryCode As String Dim CountryName As String Dim DeleteFlg As String Dim CreateBy As String Dim UpdateBy As ...

横县18445916929： EXCEL对一列求和的宏代码怎么写? - ？
台甘治糜： Set myRange = Worksheets(＂Sheet1＂).Range(＂A:A＂) sum_A = Application.WorksheetFunction.sum(myRange) 变量sum_A就是A列的求和值,if 可以以sum_A来判断 其他的你根据自己的需要编写吧 你的语法有很多错误,这个需要你自己来检查了

横县18445916929： EXCEL宏代码编写 - ？
台甘治糜： 1、新建一工作表. 2、在sheet1中插入一个艺术字(艺术字将成为按钮). 3、右击艺术字→指定宏→新建. 4、复制以下代码,就会在sheet1的A列中出现结果.(若要随机可插入Rnd函数). Sub 艺术字1_单击() step_a: a = InputBox(＂A的比...

横县18445916929： excel里怎样用宏 - ？
台甘治糜： 按下ALT+F11,菜单:插入-模块,复制下列代码,退出. 选定你的列.然后工具-宏-宏.选MACRO1(),运行. 举例子说明一下: 创建一个功能为将选定列的宽度设为20,再加上一个快捷键Ctrl+Shift+F? 按下ALT+F11,菜单:插入-模块,复制下列代码,退出. 选定你的列.然后工具-宏-宏.选MACRO1(),运行. Sub Macro1() Selection.ColumnWidth = 20 End Sub 工具-宏-宏.选中MACRO1(),点选项,在框中输入F

横县18445916929： 如何在自己的Excel中运行宏代码 - ？
台甘治糜： 工具:office excel 步骤: 1、打开office excel,执行菜单操作“工具”→“宏”→“宏”. 2、创建一个原来就没有的宏.输入宏的名字,点击“创建”. 3、输入自己的宏代码即可. 4、关闭VBA窗口,执行菜单操作“工具”→“宏”→“宏”,弹出如下图对话框. 5、点击“选项”即可看到.在操作Excel的时候,按下相应的组合键,该宏的代码马上就运行,效果立马就出来了.

横县18445916929： 怎么用Excel来编一个运算宏命令的?？
台甘治糜： 不用宏命令就能实现: 只要在 D2,E2,F2,中把公式设置好,在A2,B2,C2中输入D跟d还有R,X,Y,S 的值就自动算出来了.

横县18445916929： excel的宏怎么用 有人给我写了个程序样的东西去实现某些功能 可我不知道往哪里放 - ？
台甘治糜： 按alt+f11,点菜单,插入,模块,把代码粘贴进去就行了,然后在EXCEL里,按ALT+F8,点击对应的宏就可以了

横县18445916929： 如何用excel2013vba编写宏 - ？
台甘治糜： 软件版本:Office2013 方法如下:1.Alt+F11,打开VBE界面,点击左侧要执行代码的工作表,出现右侧空白编辑区2.输入代码,点击运行按钮,或者按F5:3.这样,就执行了宏代码:

横县18445916929： 求excel简单的宏编码 - ？
台甘治糜： DY10输入:=IF(OFFSET($Y$9,ROW(1:1),COLUMN(A:A)*34),OFFSET($Y$9,ROW(1:1),COLUMN(A:A)*34),＂＂),右拉下拉.注意:1. 估计下公式需要右拉多少列,比如从DY10右拉到EH10共10列填充了公式,那从A列开始的10列之前(即A:J列)都不能插入列(输入修改数据无妨,但不能插入新列),如果填充了26列公式,那Z列前都不能插入新列,否则要重新输入上面的公式右拉下拉填充;2. DY列前可按34列的倍数插入;3. 只可以增加行中数据,不可插入新行,否则公式要重新输入填充.