IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

[Access 97] ouvrir l'explorateur


Sujet :

VBA Access

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre chevronné
    Profil pro
    Inscrit en
    Septembre 2007
    Messages
    503
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France

    Informations forums :
    Inscription : Septembre 2007
    Messages : 503
    Par défaut [Access 97] ouvrir l'explorateur
    Bonjour,

    je cherche le moyen d'ouvrir l'explorateur windows à un répertoire particuler, depuis une commande access.

    J'ai bien ça:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Windows.Application.Dialogs(xlDialogOpen).Show "E:\"
    mais ca ne marche pas:la boite de dialogue pour ouvrir un fichier xls s'ouvre, et je navigue dans l'arborescence, mais pas moyen d'ouvrir le fichier voulu.


    Merci de votre aide

  2. #2
    Membre confirmé
    Profil pro
    Inscrit en
    Juillet 2006
    Messages
    235
    Détails du profil
    Informations personnelles :
    Localisation : Luxembourg

    Informations forums :
    Inscription : Juillet 2006
    Messages : 235
    Par défaut
    J'ouvre l'explorateur avec shell

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
        Shell "explorer " & LienRep, vbNormalFocus
    avec lienRep un string.
    Par contre me souviens plus des références à ajouter s'il y en a.

  3. #3
    Rédacteur/Modérateur

    Avatar de Jean-Philippe André
    Homme Profil pro
    Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Inscrit en
    Juillet 2007
    Messages
    14 684
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 41
    Localisation : Canada

    Informations professionnelles :
    Activité : Architecte Power Platform, ex-Développeur VBA/C#/VB.Net
    Secteur : Finance

    Informations forums :
    Inscription : Juillet 2007
    Messages : 14 684
    Par défaut
    bonjour,
    tu peux essayer avec les references excel :

    dnas l'idée ca donnerait ca
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    dim a as variant
    a = getopenfilename()
    if a <> false then
    shellexecute(a)
    end if
    Cycle de vie d'un bon programme :
    1/ ça fonctionne 2/ ça s'optimise 3/ ça se refactorise

    Pas de question technique par MP, je ne réponds pas

    Mes ouvrages :
    Migrer les applications VBA Access et VBA Excel vers la Power Platform
    Apprendre à programmer avec Access 2016, Access 2019 et 2021

    Apprendre à programmer avec VBA Excel (3e édition)
    Prise en main de Dynamics 365 Business Central

    Coffrets disponibles de mes ouvrages : https://www.editions-eni.fr/jean-philippe-andre
    Pensez à consulter la FAQ Excel et la FAQ Access

    Derniers tutos
    Excel et les paramètres régionaux
    Les fichiers Excel binaires : xlsb,

    Autres tutos

  4. #4
    Membre chevronné
    Profil pro
    Inscrit en
    Septembre 2007
    Messages
    503
    Détails du profil
    Informations personnelles :
    Âge : 46
    Localisation : France

    Informations forums :
    Inscription : Septembre 2007
    Messages : 503
    Par défaut
    Citation Envoyé par le_niak Voir le message
    J'ouvre l'explorateur avec shell

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
        Shell "explorer " & LienRep, vbNormalFocus
    avec lienRep un string.
    Par contre me souviens plus des références à ajouter s'il y en a.
    Jpcheck, j'ai pas tester ta solution, mais celle de Le_niak me convient parfaitement.

    Merci beaucoup.

    6ril

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Ouvrir l'explorateur Windows ?
    Par Nohant dans le forum Access
    Réponses: 2
    Dernier message: 24/03/2006, 11h40
  2. Ouvrir l'Explorateur Windows ???
    Par Ricardo_Tubbs dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 13/02/2006, 16h34
  3. Réponses: 2
    Dernier message: 03/02/2006, 13h02
  4. [Access][VBA] Ouvrir un document word existant
    Par NicoNGRI dans le forum Access
    Réponses: 1
    Dernier message: 16/12/2005, 13h39
  5. Ouvrir l'explorateur systematiquement un affichage detaillé?
    Par coronelle dans le forum Windows XP
    Réponses: 5
    Dernier message: 26/02/2005, 09h41

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo