我需要每周更改状态并为SharePoint中的大约100个列表编写注释。我试着让它自动化。我知道如何使用宏在编辑模式下打开它们,但我不知道如何更改状态或如何用宏写任何想法?
这是我的代码:
Sub TT()
Dim ie(40) As Object, obj As Object
Dim cislo As String
For i = 0 To 40
If Cells(i + 2, 1).Value = "" Then
Exit Sub
End If
Set ie(i) = CreateObject("Internetexplorer.Application")
ie(i).Visible = True
ie(i).Navigate "http://adress of sharepoint list .com"
Do While ie(i).Busy
Loop
Next i
End Sub
答案 0 :(得分:2)
这些教程应该为您提供您需要知道的内容......优秀且做得好,它们向您展示如何通过Listobjects和SQL实现它
https://www.youtube.com/watch?v=nM-gq3N6f2E
有一系列13个视频。