vb怎样删除Excel中的某一行

来源：百度知道 编辑：UC知道 时间：2024/05/10 12:57:28
1.我在将Excel中的数据导入SQL Server时,因为第一行是表头，无须导入,因此我就想删除第一行的数据以后,再将数据导入数据库,或者是导入数据时,跳过Excel表的第一行,从第二行开始导入数据,但两种方法我都不知道用vb编程怎样实现!
2.vb连接Excel时,当用户关闭Excel时,弹出消息框提示用户是否将数据保存到数据库,当用户选择是,则将数据导入数据库,编程怎样获得用户选择的结果?急,急,急,请各位帮帮我!

给你个思路，导入之前，先用函数计算当前记录的最大行数，定义为A,然后导入数据，再选择A行，删除该行，就OK了。
语言格式具体如何你自己参考一下，我在吃饭，呵呵。。。

这还不简单！
你将EXCEL的第一行手动删去不就行了．

第一个问题：
假设你想将Excel第x行，第y列的值存入变量a中，那么语句如下

Dim oExcel As Object
Dim oBook As Object
Dim oSheet As Object
.....

strColName = Chr(65 + y) & cstr(x)
a=oSheet.Range(strColName).Value

当然，跳过第一行就好办了，将x初始值设为2，递增就好了

第二个问题：太复杂，15分是搞不定的，望高手出招

你为什么不用 ADO 来联接 EXCEL呢?
下面是第一行是数据的
str = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & 文件名 _
& ";Extended Properties=" & Chr(34) & "Excel 8.0;HDR=NO;" & Chr(34)
如果条一行是字段
str = "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=" & 文件名 _
& ";Extended Properties=Excel 8.0;"