Improve and reinforce salesforce training & adoption using WalkMe's digital adoption platform. Start saving on costly employee training by creating fast intuitive Walk-Thrus for Salesforce. Claim your Free Account Now
Set dbs = OpenDatabase(“S:\interface\client.accdb”) Set tdfs = dbs.TableDefs For Each tdf In tdfs If tdf.SourceTableName <> "" Then 'If the table source is other than a base table ‘New link for access tables If Left(tdf.Name, 2) = "tb" Then tdf.Connect = ";DATABASE“S:\Data\clientData.accdb” 'Set the new source tdf.RefreshLink End If ‘New link for excel file If Left(tdf.Name, 2) = "xl" Then DoCmd.DeleteObject acTable, tdf.Name DoCmd.TransferSpreadsheet acLink, 10, tdf.Name, "S:\data\Product.xlsx", True End If End If Next
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Please Explain What Reading a Zip file Back In Means||11||68|
|Frustrated by Access database design - what am I missing||3||35|
|MS Access populate a field based on 2 other form fields||14||36|
|MS Access Recordset Need Help Setting All Record Values In A Query To False (No)||6||16|