diff --git a/SPListLibrary.bas b/SPListLibrary.bas index 4456ac6..21ce8e8 100644 --- a/SPListLibrary.bas +++ b/SPListLibrary.bas @@ -34,9 +34,9 @@ Public Function SPListItem(SharepointUrl As String, ListName As String, ListData If objXMLHTTP.Status = 200 Then Set xmlhttpResponse = objXMLHTTP.responseXML - CreateSPItem = CInt(xmlhttpResponse.SelectSingleNode("//UpdateListItemsResult//Results//Result//z:row").Attributes.getNamedItem("ows_ID").Text) + SPListItem = CInt(xmlhttpResponse.SelectSingleNode("//UpdateListItemsResult//Results//Result//z:row").Attributes.getNamedItem("ows_ID").Text) Else - CreateSPItem = -1 + SPListItem = -1 End If Set objXMLHTTP = Nothing diff --git a/readme.md b/readme.md index 710af7e..6a68263 100644 --- a/readme.md +++ b/readme.md @@ -18,7 +18,5 @@ In the VBA editor window choose Tools -> References. - ListData is a VBA dictionary object containing key value pairs, where the key is the name of a field and the value is the value that will be assigned to it. - ItemID is the SharePoint ID of a list item that will be updated (if omitted, a new list item will be created). -VBA SharePoint List Library is a collection of VBA functions designed to allow your VBA code to interact with a SharePoint list. - ## Contributing ## Please see the contribution guide in contributing.md \ No newline at end of file