Can you help me write a simple code?

[rgwood86]

Nearly there!!!

Ok, so the below code works perfectly other than I still get the error message appear, but at least it does open the test database and closes the one I started the code in. Is there a way of removing this error message?

The error message only appears once and fills the screen which is a little unusual

 

[isladogs]

In future, add a debug line:

Debug.Print strPath & "\" & strName

Run the code and check the output in the VBE immediate window is what it should be

Anyway, to solve the issue with the spaces, add two more quotes changing the line to:

Call Shell("msaccess.exe "[COLOR="Red"][B]""[/B][/COLOR] & strPath & "\" & strName, vbMaximizedFocus)

or better still remove spaces from folder & file names!

 

[rgwood86]

In future, add a debug line:

Debug.Print strPath & "\" & strName

Run the code and check the output in the VBE immediate window is what it should be

Anyway, to solve the issue with the spaces, add two more quotes changing the line to:

Call Shell("msaccess.exe "[COLOR=red][B]""[/B][/COLOR] & strPath & "\" & strName, vbMaximizedFocus)

or better still remove spaces from folder & file names!

Colin...... I could kiss you right now!!!

Thanks again

 

[isladogs]

Thankfully I'm a safe distance away

EDIT Many thanks for the kind reputation comment. For future info, points aren't awarded unless you also tick 'I approve'

 

[moke123]

crossposted http://www.utteraccess.com/forum/index.php?showtopic=2047871&hl=

I dont do much with excel but it seems to me that all you need to do is drop the table (linked excel file) and relink it with docmd.transferSpreadsheet.

 

[isladogs]

That explains why I hadn't seen it then ....