vb怎样删除Excel中的某一行
1.我在将Excel中的数据导入SQLServer时,因为第一行是表头，无须导入,因此我就想删除第一行的数据以后,再将数据导入数据库,或者是导入数据时,跳过Excel表的...
1.我在将Excel中的数据导入SQL Server时,因为第一行是表头，无须导入,因此我就想删除第一行的数据以后,再将数据导入数据库,或者是导入数据时,跳过Excel表的第一行,从第二行开始导入数据,但两种方法我都不知道用vb编程怎样实现!
2.vb连接Excel时,当用户关闭Excel时,弹出消息框提示用户是否将数据保存到数据库,当用户选择是,则将数据导入数据库,编程怎样获得用户选择的结果?急,急,急,请各位帮帮我! 展开
2.vb连接Excel时,当用户关闭Excel时,弹出消息框提示用户是否将数据保存到数据库,当用户选择是,则将数据导入数据库,编程怎样获得用户选择的结果?急,急,急,请各位帮帮我! 展开
4个回答
展开全部
给你个思路，导入之前，先用函数计算当前记录的最大行数，定义为A,然后导入数据，再选择A行，删除该行，就OK了。
语言格式具体如何你自己参考一下，我在吃饭，呵呵。。。
语言格式具体如何你自己参考一下，我在吃饭，呵呵。。。
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
这还不简单！
你将EXCEL的第一行手动删去不就行了．
你将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分是搞不定的，望高手出招
假设你想将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;"
下面是第一行是数据的
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;"
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（2）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
