如何通过Excel VBA更新共享点列表项

时间:2018-07-14 15:14:53

标签: excel vba excel-vba sharepoint ms-office

我有一个Microsoft Sharepoint列表,供多个人使用,并且经常一次全部使用。团队中的每个人都通过表单提交请求。一组特定的代理进入,更新提交中的一个字段,该字段表示从“待定”更改为“审阅”提交。然后,完成后,他们会将状态更新为“已完成”,以便每个人都知道它已经完成,因此无需理会。一切都很好,花花公子。我想做的是使用已经建立的VBA宏,并在宏中有一个按钮,该按钮会自动将看到的第一个提交状态(处于“待处理”状态更新为“正在审核”),然后单击完成操作后单击第二个按钮,将其移至“完成”。这可能吗?

是否可以通过Excel VBA更新共享点列表上提交中的特定列。如果是这样,有人可以指出我的帮助方向吗?

1 个答案:

答案 0 :(得分:-1)

您可以尝试一下,看看是否有效吗?

Private Sub CreateList()
    Dim folder As folder
    Dim f As File
    Dim fs As New FileSystemObject
    Dim RowCtr As Integer
    RowCtr = 1
    Set folder = fs.GetFolder("http://excel-pc:43231/Shared Documents/Forms/") '<=Variable Location
    For Each f In folder.Files
       Cells(RowCtr, 1).Value = f.Name
       RowCtr = RowCtr + 1
    Next f
End Sub

我现在无权访问SharePoint;我无法测试。