LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 13
Default Using ADODB in MS Excel.


I have 2 excel files namely Interface.xls & Tracker.xls.

I have used following code to update data from Interface to Tracker.

Public Sub interface2datadump()
Sheet1.Select

Dim cn As ADODB.Connection, RS As ADODB.Recordset, RS1 As ADODB.Recordset, r
As Long

Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=D:\Tracker\tracker.xls;" & _
"Extended Properties=""Excel 8.0;"""

Set RS = New ADODB.Recordset
RS.Open "select * from [DATABASE$]", cn, adOpenKeyset, adLockOptimistic
r = 2

With RS
.AddNew
.Fields("Name") = Sheet1.Cells(1, 2).Value
.Fields("Emp ID") = Sheet1.Cells(2, 2).Value
.Fields("Phone") = Sheet1.Cells(3, 2).Value
.Update
End With
RS.Close
Set RS1 = Nothing
Set RS = Nothing
cn.Close
Set cn = Nothing

Sheet1.Cells(1, 2).Value = ""
Sheet1.Cells(2, 2).Value = ""
Sheet1.Cells(3, 2).Value = ""

End Sub

Is there any better way to do this? or can I update the data to tracker
without opening the tracker.xls except using ADODB as I have used above.

Also, I want to edit some data in Tracker & I want to use Inerface file to
edit & update & even delete the data in tracker.xls. Please help me to write
code to fetch the data from tracker, edit & update.

Thanks,
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
ADODB Create New Database from Excel Clayman Excel Programming 2 July 16th 07 04:32 PM
How to use ADODB in Excel 2003 alpder[_3_] Excel Programming 2 February 7th 06 03:32 PM
share adodb connection in excel Marek Excel Programming 3 September 7th 04 08:56 AM
adodb.recordset with excel nate axtell Excel Programming 14 June 11th 04 01:32 PM
Export from Excel to Access ADODB javydreamercsw Excel Programming 2 February 19th 04 09:49 PM


All times are GMT +1. The time now is 05:26 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"