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

Macros et VBA Excel Discussion :

Compatibilité avec excel 2007


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    13
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 13
    Par défaut Compatibilité avec excel 2007
    Bonjour a tous,

    Voici mon problème.J'ai développé une interface VBA sous excel 2003 et celle ci fonctionne tres bien..Malheureusement sous excel 2007, ça ne fonctionne pas

    Avez vous déjà rencontré ce problème avec la fonction ( search ) ci-dessous

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    With Application.FileSearch                                                    ' Search the file
         .LookIn = Way                                                             ' In the same folder
         .SearchSubFolders = True                                                  ' In the under folder
         .Filename = RefIndusPart & ".jpg"                                         ' With the extension jpg
         If .Filename = ".jpg" Then
             PictureSparePart.Picture = LoadPicture()                              ' Display a white screen
             Label16.Visible = True                                                ' Visible label
             Label16.Caption = " Picture No Available. "                           ' Write the message
         Else
             If .Execute > 0 Then                                                      ' Si au moins un fichier est trouvé
                FullWay = .FoundFiles(1)                                              ' Définit le nom complet du fichier trouvé
                PictureSparePart.Picture = LoadPicture(FullWay)                       ' Display the picture
             Else
                PictureSparePart.Picture = LoadPicture()                              ' Display a white screen
                Label16.Visible = True                                                ' Visible label
                Label16.Caption = " Picture No Available. "                           ' Write the message
             End If
         End If
    End With

    Merci d'avance a tous ceux qui pourront m'aider

  2. #2
    Expert confirmé Avatar de casefayere
    Homme Profil pro
    RETRAITE
    Inscrit en
    Décembre 2006
    Messages
    5 138
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 71
    Localisation : France, Ardennes (Champagne Ardenne)

    Informations professionnelles :
    Activité : RETRAITE
    Secteur : Agroalimentaire - Agriculture

    Informations forums :
    Inscription : Décembre 2006
    Messages : 5 138
    Par défaut
    Bonjour,
    il faut voir les conseils de sylkiroad, j'avais les memes problemes et telecharger le complement classefilesearch après ca marche impec

    http://www.developpez.net/forums/sho...d.php?t=563409
    Cordialement,
    Dom
    _____________________________________________
    Vous êtes nouveau ? pour baliser votre code, cliquer sur cet exemple : Anomaly
    pensez à cliquer sur :resolu: si votre problème l'est
    Par contre, il est désagréable de voir une discussion résolue sans message final du demandeur (satisfaction, désarroi, remerciement, conclusion...)

Discussions similaires

  1. probleme avec le verificateur de compatibilité sur excel 2007
    Par scons dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 11/08/2008, 16h59
  2. Compatibilité Couleurs Excel 2007 et Excel 97
    Par enfin dans le forum Excel
    Réponses: 4
    Dernier message: 17/01/2008, 18h11
  3. Création d'un formulaire avec Excel 2007
    Par soso78 dans le forum Excel
    Réponses: 1
    Dernier message: 29/11/2007, 05h49
  4. Réponses: 2
    Dernier message: 22/08/2007, 14h39

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