Search results

Hi there, I'm beginning to to pull my hair out with this. My database that distribute to my team is failing to sync all columns on linked a SharePoint list I've added a button to the database to auto re link the SharePoint to resolve this issue: DoCmd.DeleteObject acTable, "tblPro" DoEvents...

Hi there, I have a list of tables like this: January_2014 February_2014 March_2014 ... Is there away I can create union within VBA that will search for tables like the above and add them to a union query or append them to a master table? Users will be importing a new table each month so I...

I have used the Application.SaveToText to save each forms source code. I'm looking to re-import each text file and append it to a table. like below ID | Object_Name | Script 1 | Form1 | SoruceCode 2 | Form 2 | SoruceCode I want to automate the process so it imports all txt files in the...

Hi there, I've got a script that exports all objects to .txt files using the Application.SaveToText, but what I want to do is save the objects script into a table along with the object name. Table would look like: ID | Object_Name | Script Is that possible? I want to avoid exporting /...

Thank you arnelgp, That worked a treat!

Hi there, I have vba that renames an external database, upon renaming the database it is not instantly updated unless you refresh the folder / desktop, is there vba that can refresh the windows desktop?

Hi all, I figured it out using the following code: Dim db As Database Dim strBackend_Path As String Dim LResult As String strBackend_Path = Me.RESULT LResult = Replace(strBackend_Path, "(v2.5)", "(v2.9)") Name strBackend_Path As LResult

Hi there, I have a service pack database that a user opens which the user selects their database to update. After the service pack as exported its contents to their database, is it possible to rename their database file (accdb) lets say from "Version 1.0" to "Version 2.0" via VBA in the...

Hi Galaxiom, I used the following code that worked: Dim ref As Reference Dim intRef As Integer Dim ErrorMsg As String intRef = 1 Set ref = References.AddFromFile("C:\Program Files\Common Files\System\ado\msado21.tlb") Exit Sub Many thanks for your help!

Hi there, I have a database that is shared across the country, I regulary issue service packs thats updates their database. which contains Updates & New forms / tables etc... anywho when they open up the service pack database it automactilly exports its contents to their database to update it...

Thank you both for your replies! I've opted to use Pyro's sample database that worked an absolute treat! Many thanks!!!

Thank you for your relies! I ended using the following link: http://www.utteraccess.com/forum/index.php?showtopic=1992179&view=findpost&p=2276028 There is an example database that shows you where to store your sql statement and run it via vba. many thanks again for all your help everyone.

Hi there, I have a query "qry_tmp" that changes depending on the sql statement, i'm looking to open the query in a popup form and display the results in Datasheet view. But as the qry_temp changes the fields change as they may be less / more columns depending on my sql statement, Is it...

Thank you, the part where it says: qdfTemp = .CreateQueryDef("", _ "SELECT * FROM Employees") I changed it to qdfTemp = me.txtstring but to no joy

Ahh my apologies, I would like it to execute the select statement stored in the textbox field and display the query results.

Hi Plog, Many thanks for you reply, I do indeed mean run, is it possible to run the query from statement I have stored in my textbox?

Hi there, I would like to run a select query from a string. basically I want to store the SQL statements in a texbox and click a button to run the code. Textbox contents = SELECT CurrentVersion.AreaTeam, CurrentVersion.Version, CurrentVersion.Selected FROM CurrentVersion GROUP BY...

Woops I meant Dim VbaString as string Vbastring = dlookup("vbacode","vbatable") Eval (vbastring) Apologies I can build strings I'm having one of those days What I'm trying to achieve is a quick fix table that contains Vba code so users can execute the code as and when it comes available...

Thank again Plog, I do / dont understand I tried: dim x=dlookup("vbacode","vbatable") Eval("x") or Eval("x = x") ...a little confused on how to refernce "docmd.quit" from the table using the Eval solution.

Many thanks for your reply! I take your serious warning onboard..I completely agree with too. What I'm trying to do is a simple quick fix which your solution seems to do! but i'm struggling with the eval function itself after reading the microsoft article. Eval = (DLookup("vbaCode"...