locatie "Mijn documenten" in verschillende excel versies

[TBosgraaf]

Ik heb, mede met hulp van dit forum, een programma in elkaar gezet. Dit programma (in Excel 2007) moet een ingevulde spreadsheet opslaan als .xls filename in een map met vaste naam in de Mijn documenten map.
Nou wordt het programma gebruikt op verschillende pc's met verschillende excel versies waarbij de locatie van de map 'Mijn documenten' verschilt en ,omdat op sommige pc's een engelstalige ecel versie draait, is de naam soms ook nog anders

Vraag is of ik deze diversiteit m.b.v. VBA kan oplossen?

 

[snb]

    c0 = CreateObject("Wscript.Shell").specialfolders("Mydocuments")

of 

   c1 = CreateObject("Wscript.Shell").specialfolders(13)

 

[TBosgraaf]

snb

dank voor de code, maar het is me niet duidelijk wat ik ermee moet en wat het doet

Taede

 

[TBosgraaf]

snb

dank nogmaals. ik ben eruit v.w.b. de locatie van mijn documenten:thumb:

Taede