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 2003] Erreur sur boite 'Ouvrir un fichier'


Sujet :

VBA Access

  1. #1
    Membre habitué Avatar de texas2607
    Homme Profil pro
    Inscrit en
    Juillet 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Drôme (Rhône Alpes)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 344
    Points : 159
    Points
    159
    Par défaut [Access 2003] Erreur sur boite 'Ouvrir un fichier'
    Salut,
    Sur un précédent Post j'ai eu la réponse concernant la possibilité d'ouvrir une boite de dialogue afin de sélectionner un fichier. (http://access.developpez.com/faq/?pa...#AffBoitDialog)

    Cela fonctionne nickel sauf si je ne sélectionne pas de fichier et que je fais annuler, à ce moment là j'ai une boite qui s'ouvre et qui me demande de "sélectionner la source de données".
    Comment faire pour que 'Annuler' ferme bien ma boite.
    D'avance merci
    Fred
    Loi des Évolutions synchronisées : Les logiciels deviennent de plus en plus lent, et ceci plus vite que le hardware ne devient plus rapide.

  2. #2
    Expert éminent sénior
    Avatar de Dolphy35
    Homme Profil pro
    Responsable Systemes d'Information
    Inscrit en
    Octobre 2004
    Messages
    4 373
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Responsable Systemes d'Information
    Secteur : Industrie

    Informations forums :
    Inscription : Octobre 2004
    Messages : 4 373
    Points : 11 218
    Points
    11 218
    Par défaut
    Salut,

    Tu peux charger le retour de la bd dans une variable, il te suffit ensuite de tester cette variable :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Dim strChemin As String
        strChemin = OuvrirUnFichier(Me.Hwnd, "Parcourir", 1, "Fichier Word", "doc")
        If strChemin = "" Then
     
            MsgBox "Commande annulée par utilisateur", vbInformation, "Ouvrir un fichier"
        Else
     
            MsgBox strChemin
     
        End If
    Dolphy

  3. #3
    Membre habitué Avatar de texas2607
    Homme Profil pro
    Inscrit en
    Juillet 2006
    Messages
    344
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Drôme (Rhône Alpes)

    Informations forums :
    Inscription : Juillet 2006
    Messages : 344
    Points : 159
    Points
    159
    Par défaut
    Ouah, et en plus c'est tellement simple.
    Merci beaucoup
    Fred
    Loi des Évolutions synchronisées : Les logiciels deviennent de plus en plus lent, et ceci plus vite que le hardware ne devient plus rapide.

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

Discussions similaires

  1. Réponses: 6
    Dernier message: 19/06/2006, 12h15
  2. ACCESS 2003 : TRI sur le mois
    Par Eric26 dans le forum Access
    Réponses: 3
    Dernier message: 10/06/2006, 21h17
  3. [Access 2003] Erreur "Dépassement de capacité"
    Par Bapt.ice dans le forum Access
    Réponses: 2
    Dernier message: 08/06/2006, 12h15
  4. Réponses: 1
    Dernier message: 05/05/2006, 10h36
  5. Réponses: 7
    Dernier message: 12/08/2005, 09h47

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