Access VBA - DoCmd.RunCommand acCmdRefreshSharePointList

I have a routine that when executed in Excel 2010/Access 2010 works fine. But when I run the same routine on Excel 2003/Access 2003, I have a compile error at line DoCmd.RunCommand acCmdRefreshSharePointList: Variable not defined

The code as follows:

Function RefreshSharePointLinkToTable()
   Dim dbs As Database
   Set dbs = CurrentDb()

    Dim exWB As Excel.Workbook
    Dim exSheet As Excel.Worksheet
    Dim AccountChoice As String
    Dim excelark As Object              
    Dim sql As String                  
    Dim rst As Object                      
   

    Set excelark = GetObject(, "Excel.Application")
    Set exWB = excelark.ActiveWorkbook
    Set exSheet = exWB.Worksheets("Sheet1")
       
    AccountChoice = exSheet.Cells(1,1).Value
 

  sql = "SELECT * FROM [" & AccountChoice & "];"
  Set rst = dbs.OpenRecordset(sql, dbOpenDynaset)
     If rst.Updatable Then  
        DoCmd.SelectObject acTable, AccountChoice, True
        DoCmd.RunCommand acCmdRefreshSharePointList        <<<< variable not defined
          rst.Close
      End If

        Set dbs = Nothing
        Set exSheet = Nothing
        Set excelark = Nothing
        Set exWB = Nothing
        Set exSheet = Nothing    


End Function


I step over the codes and the variable (.e.g. AccountChoice )  was correctly sourced. Would appreciate your help to debug the error.


Please note rst.Updatable returns True and Accountchoice exists as a list in SP ( say ListABC) as well as a linked table, ListABC in Access .
RussellbrownAsked:
Who is Participating?

[Webinar] Streamline your web hosting managementRegister Today

x
 
mbizupConnect With a Mentor Commented:
<<
Don't know what is the significance of this value and why there is a difference.
>>

These acCmdWhatevers are constants that make it easier/more intuitive for you to program your runcommand statements.  As you noted, that difference simply means that the functionality is not there in Access 2003.  As I recall Access 2007 introduced features that made it a lot easier for developers to work with Share Point, and a lot more was added in Access 2010.

I personally do not work with SharePoint lists, so I am not real familiar with them.  Does your share point list appear like a linked table in your Access database?

If so, an alternative might be to re-link your SharePoint list.  This article has code for linking to SharePoint lists, specifically from Access 2003:
http://msdn.microsoft.com/en-us/library/office/aa662942(v=office.11).aspx
0
 
gowflowCommented:
your vba code exist in Access ? as in Excel the DoCmd does not exist.


OOPS revewing my post.
If your using Excel just add a reference to the Microsoft Access Library in your project and that should be ok.
gowflow
0
 
RussellbrownAuthor Commented:
Hi,

In Excel 2003, MS Access 11.0 Object Library is already in the VBA>Tools>References and in Access 2003, MS Excel 11.0 Object Library as well.



R
0
The new generation of project management tools

With monday.com’s project management tool, you can see what everyone on your team is working in a single glance. Its intuitive dashboards are customizable, so you can create systems that work for you.

 
gowflowConnect With a Mentor Commented:
so it is this
acCmdRefreshSharePointList
that is not declared do u know what should be its value ?
gowflow
0
 
gowflowCommented:
well don't hv all your variable when I run it the first line CurrentDB() is obviously set to nothing here so can't go further. Anything more you can supply to help troubleshoot this would be a plus.
gowflow
0
 
RussellbrownAuthor Commented:
in Excel 2010 which is working fine, it is 626. In Excel 2003 it is empty/null. Don't know what is the significance of this value and why there is a difference.
0
 
gowflowCommented:
Hv you tried putting it this way ? replace this line
DoCmd.RunCommand acCmdRefreshSharePointList        

by this line
DoCmd.RunCommand 626


gowflow
0
 
RussellbrownAuthor Commented:
I recd an error message: The RunCommand action was cancelled. Err Number 2501.

The DoCmd.RunCommand 626 works only for Access 2010 and not for Access 2003. Do you have an equivalent code?  Thanks.
0
 
gowflowCommented:
Honestly I don't know what to say as never used share point either so I guess good luck !

What I found is that in Excel 2003 when you add the Access library although you get in the snipset list the property acCmdRefreshSharePointList listed and you can choose it,
however what is intriguing is that when you lookup help and check all the commands that are listed you do not find this command. So maybe this leads to the conclusion that this command was not available in 2003 but unfortunately I cannot confirm this statement nor deny it as no pervious experience with share point.

gowflow
0
 
RussellbrownAuthor Commented:
Hi both,

<<Does your share point list appear like a linked table in your Access database?>> Yes (orange icon )

Thank you for the heads-up. I have a routine ( although that was not the original purpose ) that re-links to the Share Point list - as part of the error handling step. It is alright as a workaround since Access 2003 does not have a feature to refresh the link using VBA.
0
 
mbizupConnect With a Mentor Commented:
So relinking is working okay for you?

To my understanding, that is the best you can do from Access 2003.
0
 
RussellbrownAuthor Commented:
Yes it works as an acceptable workaround and good to know that that is the  best one can do from Access 2003. Thank you.
0
 
mbizupCommented:
OK
0
All Courses

From novice to tech pro — start learning today.