Office中国论坛/Access中国论坛

标题: 【求助】可不可以在Excel里更改ACCESS里的数据?! [打印本页]

作者: panjianhui    时间: 2008-10-8 09:14
标题: 【求助】可不可以在Excel里更改ACCESS里的数据?!
我能够在Excel里往ACCESS里添加数据。
但我想在Excel里更改ACCESS里的数据,请问能实现吗?如何实现?
如果在Exel里删除ACCESS里的数据,又是怎样实现的吗?
作者: panjianhui    时间: 2008-10-13 01:17
自己顶一下。。
作者: toad13    时间: 2010-10-22 12:00
可以在excel中编写vba,先查询要更改的数据,然后删除,在excel中录入数据,重新添加到数据库中。下面给楼主个程序,是写在excel表vba中的,用于执行删除指定数据库中符合条件的行。当然要在excel表中设置和数据库中要执行操作的表一样格式的sheet表格。具体的条件设定楼主可以自己将下面的程序补全试用一下。
Sub ()
Dim CNN As New ADODB.Connection
  Dim RS As New ADODB.Recordset
  Dim pthStr As String
  Dim SQL As String
  pthStr = ThisWorkbook.Path & "\(数据库名).mdb"
  CNN.Open "Provider=Microsoft.Jet.Oledb.4.0;data Source=" & pthStr
    SQL = "select * from flb where (条件)
  RS.Open SQL, CNN, adOpenKeyset, adLockOptimistic, adCmdText
  RS.MoveLast
  Icount = RS.RecordCount
  Debug.Print Icount
  RS.MoveFirst
    For I = 1 To Icount
      RS.Delete
      RS.Update   '保存更改
      RS.MoveNext
    Next I
  Set RS = Nothing
  CNN.Close
end sub
当然肯定还有别的办法,我只是对excel比较熟,acc也是菜鸟一个,所以举得这个方法。也希望能看到真正的高手的解答,我也顺便学习下。呵呵




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3