Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access chemin Mes Documents

chemin Mes Documents

3 réponses
Avatar
G4F
bonjou

je voudrais savoir s'il existe une fonction en VBA (access) qui me permet de recuperer le chemin Mes documents pour que l'application puisse tourner sur toute la gamme window
car je sais que sous windows 98... c'est c:\mes document
mais pour 2000 et XP : c'est dans documents et setting\poste...

merci par avance
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Raymond [mvp]
Bonjour.

il existe les variables d'environnement:
HOMEDRIVE qui donne le disque
HOMEPATH qui donne le chemin de l'utilisateur

Environ("Homedrive") & environ("Homepath") & "mes documents" te donneront
le chemin complet

--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"G4F" a écrit dans le message de
news:
bonjour

je voudrais savoir s'il existe une fonction en VBA (access) qui me permet
de recuperer le chemin Mes documents pour que l'application puisse tourner

sur toute la gamme windows
car je sais que sous windows 98... c'est c:mes documents
mais pour 2000 et XP : c'est dans documents et settingposte....

merci par avance


Avatar
Eric
=?Utf-8?B?RzRG?= écrivait
news::

bonjour

je voudrais savoir s'il existe une fonction en VBA (access) qui me
permet de recuperer le chemin Mes documents pour que l'application
puisse tourner sur toute la gamme windows car je sais que sous windows
98... c'est c:mes documents mais pour 2000 et XP : c'est dans
documents et settingposte....

merci par avance



Bonjour,

En complément de la réponse de Raymond, et extrait de l'aide sur la
fonction Environ()

Sub test()
Dim EnvString As String, Indx As Integer ' Déclare les variables.
Indx = 1 ' Initialise l'index à 1.
Do
EnvString = Environ(Indx) ' Extrait la variable d'environnement.
Debug.Print EnvString ' L'affiche dans la fenêtre Exécution
Indx = Indx + 1
Loop Until EnvString = ""
End Sub

Tu récupères ainsi toutes les variables d'environnement.

A+
Eric

Avatar
Anor
Bonjour,

G4F wrote:
| bonjour
|
| je voudrais savoir s'il existe une fonction en VBA (access) qui me
| permet de recuperer le chemin Mes documents pour que l'application
| puisse tourner sur toute la gamme windows car je sais que sous
| windows 98... c'est c:mes documents
| mais pour 2000 et XP : c'est dans documents et settingposte....
|
| merci par avance

les solutions proposées te conviennent-elles ou
tu veux aussi essayer celle là :
Function FindMesDocuments()

Dim Wsh As Object
Dim WshSystem As Object

Set Wsh = CreateObject("WScript.Shell")
Set WshSystem = Wsh.Environment("SYSTEM")

FindMesDocuments = Wsh.SpecialFolders("MyDocuments")

Set WshSystem = Nothing
Set Wsh = Nothing

End Function
à+-- Arnaud--------------------------------------------------Conseils d'utilisation :
http://users.skynet.be/mpfa/ Site Perso : http://memoaccess.free.fr /Réponses
souhaitées sur ce forum, merci/--------------------------------------------------