Thema Datum  Von Nutzer Rating
Antwort
26.12.2019 21:30:54 Sabrina
NotSolved
26.12.2019 22:18:53 Flotter Feger
NotSolved
Rot Ordner per VBA auf Sharepoint öffnen
26.12.2019 22:26:36 Flotter Feger
NotSolved
27.12.2019 18:04:37 Gast67197
NotSolved

Ansicht des Beitrags:
Von:
Flotter Feger
Datum:
26.12.2019 22:26:36
Views:
1315
Rating: Antwort:
  Ja
Thema:
Ordner per VBA auf Sharepoint öffnen

Hallo,

Vergiss den obigen Post ...

Sub x()
Dim swFolder As Office.SharedWorkspaceFolder
Dim swParent As Office.SharedWorkspaceFolder
Dim newFolder As Office.SharedWorkspaceFolder

If ActiveWorkbook.SharedWorkspace.Folders.ItemCountExceeded = True Then
    MsgBox "No more Folders or Files can be created automatically." & vbCrLf & _
    "The displayable number of 99 folders and files has been exceeded.", _
    vbInformation, "ItemCountExceeded"
ElseIf ActiveWorkbook.SharedWorkspace.Folders.Count > 0 And _
    ActiveWorkbook.SharedWorkspace.Folders.Count < 99 Then
    For Each swFolder In ActiveWorkbook.SharedWorkspace.Folders
        If swFolder.FolderName = "searched Folder" Then
            'alternative: If swFolder.name LIKE "*[searched*Folder]*"
            Set swParent = swFolder
        End If
    Next
Set newFolder = ActiveWorkbook.SharedWorkspace.Folders.Add("MyNewFolder", Parent)
MsgBox "New Folder: " & newFolder.FolderName, _
    vbInformation + vbOKOnly, _
    "New Folder in Shared Workspace"
End If
Set newFolder = Nothing
Set swParent = Nothing
End Sub

Sabina


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
26.12.2019 21:30:54 Sabrina
NotSolved
26.12.2019 22:18:53 Flotter Feger
NotSolved
Rot Ordner per VBA auf Sharepoint öffnen
26.12.2019 22:26:36 Flotter Feger
NotSolved
27.12.2019 18:04:37 Gast67197
NotSolved