• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

map aanmaken en pdf opslaan in sharepoint

Status
Niet open voor verdere reacties.

JHH

Gebruiker
Lid geworden
18 aug 2015
Berichten
72
Hallo,

ik wil automatisch een folder laten maken als deze nog niet bestaat in sharepoint en vervolgens een selecte van een werkblad opslaan als pdf naar deze map.
in windows explorer werkt mijn macro wel, maar met het adres naar sharepoint werkt dit niet meer.

kan iemand mij hier mee helpen?

voorbeeldcode:

*** = bedrijfsnaam; deze publiceer ik liever niet zomaar, en niemand kan bij deze link, het gaat meer om het principe.

---------------------------------------------------------------
Code:
Sub ORDERBLAD()

Dim wsA As Worksheet
Dim wbA As Workbook
Dim FilePath As String
Dim FileName As String
Dim FileDir As String
Dim FileLoc As String

Set wbA = ActiveWorkbook
Set wsA = Sheets("ORDERBLAD")

FilePath = "https://sr***-my.sharepoint.com/personal/rk_sr**_nl/_layouts/15/onedrive.aspx?id=%2Fpersonal%2Frk_sr-***_nl%2FDocuments%2FDocuments/"
FileDir = Blad2.Range("F3").Value
FileLoc = FilePath & FileDir
FileName = "ORDERBLAD"

'Sub Folder_Test()
    If Dir(FileLoc, vbDirectory) <> FileDir Then
    MkDir FileLoc
    End If

FileName:=FileLoc & "" & FileName & ".pdf",
 
wsA.Range("H1:K50").ExportAsFixedFormat _
Type:=xlTypePDF, _
FileName:=FilePath & "/" & FileName & ".pdf", _
Quality:=xlQualityStandard, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False

End Sub
------------------------------------------------

alvast bedankt
 
Laatst bewerkt:
Dat gaat ook niet werken zo.
Je kan alleen paden gebruiken die je ook met de Verkenner kan bereiken.
 
Is er dan nog een andere methode? of kan het gewoon niet?
via verkenner heb ik het geprobeerd, maar dan maakt excel of adobe van de hyperlink gewoon tekst.
Alleen een internet-url wordt gezien als link, vandaar dat ik het dan in sharepoint wilde zetten, maar als dat ook niet kan hoe kunnen dan samengestelde hyperlinks die met de functie Hyperlink aangemaakt zijn overgezet worden naar pdf?
 
Het kan wel verwacht ik maar dan zal je met FTP in VBA aan de slag moeten.
 
Maak via het Excel subscherm Opslaan als een ftp lokatie aan.
 

Bijlagen

  • FTP_lokatie_toevoegen.PNG
    FTP_lokatie_toevoegen.PNG
    43 KB · Weergaven: 82
Laatst bewerkt:
ok, bedankt. ik zal me daar dan verder in moeten verdiepen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan