bureaublad kopieren via vba

Status
Niet open voor verdere reacties.
B

brejen

Gebruiker
Lid geworden
21 apr 2007
Berichten
111
om een back up programmaatje te maken via vba ben ik op zoek naar de mogelijkheid om het bureaublad te kopiëren. via de functie fscopyfolder lukt dat niet. bestaat er een specifieke vba code om dat te doen?
 
Het bureaublad is gewoon een folder, dus wat lukt er dan niet met fscopyfolder?
Het bureaublad van de huidige gebruiker kan je bijvoorbeeld benaderen met:
Code: 
Environ("Userprofile") & "\Desktop"
 
Laatst bewerkt:
@edmoor
Waar staan die folders dan?
En is het er maar een folder of kunnen icoontjes verspreid zijn over meerdere folders, afhankelijk van de user en/of administrator.
 
Laatst bewerkt:
Zie mijn aanvulling in #2.
Voorbeeld:
Code: 
C:\Gebruikers\Alphamax\Bureaublad

Of, afhankelijk van de Windows taal:
Code: 
C:\Users\Alphamax\Desktop

Voor de voorbeeld VBA code die ik plaatste maakt de taal niet uit.

Daarnaast is er nog deze:
Code: 
C:\Gebruikers\Openbaar\Openbaar bureaublad

Of:
Code: 
C:\Users\Public\Desktop

Icoontjes en andere zaken die daar staan worden op het bureaublad van iedere gebruiker getoond.
 
Laatst bewerkt:
ik heb het in het engels gezet (users - desktop ..) en nu werkt het fijn. bedankt
 
@edmoor
Dankje
 
Als je VBA het werk voor je wil laten doen:

Code: 
Sub M_snb()
   With CreateObject("wscript.shell")
       MsgBox .specialfolders(4) & vbLf & .specialfolders(10)
   End With
End Sub
 
Laatst bewerkt:
bedankt. is opgelost. deze topic mag afgesloten worden.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan