3

このコードを使用して、Excel VBA を使用して共有ポイントのファイルをループしています。ローカル ドライブ パスを使用している場合、このコードは正常に機能します。しかし、パスを共有ポイントのパスに置き換えると、fs.GetFolder で「パスが見つかりません」というエラーが表示されます。

親切にアドバイスしてください

私が使用しているコードは次のとおりです。

Private Sub CommandButton2_Click()

Dim folder As Variant
Dim f As File
Dim fs As New FileSystemObject
Dim fs1 As New OLEObject
Dim RowCtr As Integer
Dim FPath As String
Dim wb As Workbook
FPath = "my URL"
Set fs = CreateObject("Scripting.FileSystemObject")
RowCtr = 1
Set folder = fs.GetFolder(FPath)
'<=Variable Location
For Each f In folder.Files
   Cells(RowCtr, 1).Value = f.Name
   RowCtr = RowCtr + 1
Next f
End Sub
4

1 に答える 1

2

SharePoint StackExchangeで説明されているように、sharepoint を Windows ドライブ文字にマップする必要があります。マッピングが完了すると、ローカル ドライブ パスとして開くことができます。

于 2013-09-13T18:24:55.607 に答える