[VBA] Verander standaard file save directory

[Verwijderd]

Goedendag,

Ik ben nu al een paar dagen bezig om in Visual Basic een macro te maken die connect naar een sharepoint site. Het is dus de bedoeling dat als mensen deze macro runnen de standaard file open/save dialog connect naar de desbetreffende sharepoint site.

Dit is wat ik nu dus heb.

ChangeFileOpenDirectory ("http://<name server>/sites/<site>/")

Hij zegt helaas dat hij de pad niet kan vinden. Als ik het handmatig doe dus File->SaveAs en dan de link intyp connect hij er naar en werkt alles prima. Als ik in de functie C:\ gebruik werkt het ook allemaal prima. Hij kan dus waarschijnlijk niet over weg met een sharepoint site. Ik heb het internet al meerdere malen afgezocht maar liep iedere keer vast.

Is er misschien iemand die hier een oplossing voor heeft?

[OZ-Gump]

zit je in een eigen applicatie te werken, of gaat het hier om een Word of Excel document? Wanneer dat laatste het geval is: neem het handmatig opslaan eens op met een macrorecorder om te kijken wat Word/Excel er zelf van maakt?
Als dat niet het geval is: geef eens wat meer (relevante) code en informatie aub.

[Verwijderd]

het is een macro binnen in een Word/Excel applicatie.

Ik had zelf al een een macro opgenomen en daar stond dus in:

ChangeFileOpenDirectory ("http://<name server>/sites/<site>/")
ActiveDocument.SaveAs <name>

Ik kan dus bijvoorbeeld wel opslaan naar de sharepoint server door:
ActivceDocument.SaveAs "http://<name server>/sites/<site>/<name>"

Dat werkt dus wel. Het probleem is dus dat er meerdere sites zijn en dat ze door een keuze menu moeten kunnen kiezen uit de sites. Dat werkt allemaal daarna bestaan er op de sites nog aparte document library's daar moeten ze dus uit kunnen kiezen. Er zijn dus twee manier om het op te lossen.

1. Doormiddel van ChangeFileOpenDirectory op de sharepoint site te zetten en dat de gebruikers daarna zelf kunnen kiezen in welke dir ze willen op slaan.

2. Doormiddel van een keuze lijst te geven van de dir. binnen in een sharepoint site. Als ik dit heb kan ik dus doormiddel van ActiveDocument.SaveAs het bestand in de juiste site en directory opslaan.

[Verwijderd]

Voor de mensen die het interesseren heb ik de oplossing gevonden:

Options.DefaultFilePath(Path:=wdDocumentsPath) = Link

Dialogs(wdDialogFileSaveAs).Show

Hiermee kun je dus connecten naar sharepoint site.