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 :

Liste excel à partir de répertoire windows


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre habitué
    Homme Profil pro
    demande de renseignement
    Inscrit en
    Décembre 2017
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : demande de renseignement
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Décembre 2017
    Messages : 11
    Par défaut Liste excel à partir de répertoire windows
    Bonjour,

    nouveau sur le forum, mon but et de créer une macro pour lister les vidéo sur mon pc

    j'ai trouvé cette macro qui fonctionne très bien :
    http://www.vbaexpress.com/kb/getarticle.php?kb_id=405

    cependant il me liste tous les types de fichier
    j'ai du créer une macro de nettoyage pour supprimer les éléments non désirés :

    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
    20
    21
    Sub retirer_le_surplut()
    '
    ' retirer_le_surplut Macro
    '
    ' Touche de raccourci du clavier: Ctrl+k
    '
        Range("F1").Select
        Selection.AutoFilter
        ActiveSheet.Range("$A$1:$K$983294").AutoFilter Field:=6, Criteria1:=Array( _
            "Archive WinRAR", "Chrome HTML Document", "Data Base File", "Fichier IDX", _
            "Fichier JPG", "Fichier PNG", "Fichier SUB", "Paramètres de configuration"), _
            Operator:=xlFilterValues
        Range("A151").Select
        ActiveWindow.SmallScroll Down:=-144
        Rows("2:252").Select
        Selection.Delete Shift:=xlUp
        ActiveSheet.Range("$A$1:$K$983130").AutoFilter Field:=6, Criteria1:=Array( _
            "VLC media file (.avi)", "VLC media file (.mkv)", "VLC media file (.mp4)"), _
            Operator:=xlFilterValues
        ActiveWindow.SmallScroll Down:=-132
    End Sub
    comment je peux faire pour l'intégrer au code principal?

    j'aimerais conserver un lien hypertext pour que l'excel se mette à jour si je modifie un nom de fichier ou une extension de fichier ; et-ce que c'est possible?

    merci d'avance pour votre aide

  2. #2
    Expert confirmé
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132

  3. #3
    Membre habitué
    Homme Profil pro
    demande de renseignement
    Inscrit en
    Décembre 2017
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : demande de renseignement
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Décembre 2017
    Messages : 11
    Par défaut
    merci pour ta réponse rapide je vais regarder les liens
    et désolé pour la mauvaise place de la discution

  4. #4
    Expert confirmé
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132
    Par défaut
    Re, une approche qui pourrait t'intéresser serait d'utiliser une appli combinant le 1er lien pour lister les fichiers ( la plus rapide et de loin de toutes : dir, fso ) et le dernier pour récupérer qqs infos sur ces fichiers via fso en 2 passes se suivant ( plus rapide qu'un mixte ) ?

  5. #5
    Membre habitué
    Homme Profil pro
    demande de renseignement
    Inscrit en
    Décembre 2017
    Messages
    11
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations professionnelles :
    Activité : demande de renseignement
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Décembre 2017
    Messages : 11
    Par défaut
    Bonsoir merci pour ton aide
    mais visiblement je m'y connais pas assez pour comprendre et arranger les codes à ma convenance ... je vais abandonner l'idée je penses et faire à la main ...
    l'idée me plaisait bien mais déjà je n'arrive pas à modifier les propriété des fichiers en mkv alors que les films en mp4 ça fonctionne
    mais en mp4 j'ai les sous titre à part

    donc en fait tant que je n'arriverai pas à modifier les propriétés des vidéos en .mkv, ce que je veux faire comme extraire les noms de vidéos, mettre un lien hypertext, largeur et hauteur de trame, prducteur, genre et année par exemple bah ça va être compliqué

  6. #6
    Expert confirmé
    Avatar de kiki29
    Homme Profil pro
    ex Observeur CGG / Analyste prog.
    Inscrit en
    Juin 2006
    Messages
    6 132
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Finistère (Bretagne)

    Informations professionnelles :
    Activité : ex Observeur CGG / Analyste prog.

    Informations forums :
    Inscription : Juin 2006
    Messages : 6 132
    Par défaut
    Salut, tu parlais au départ de lire et maintenant de modifier ce n'est absolument pas la même chose, voir Lire et modifier les propriétés des classeurs et autres fichiers avec DSO, mais cela de façon très limitée.

Discussions similaires

  1. Recherche multicritères sous Excel à partir de liste déroulantes
    Par cynoq dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 24/12/2008, 18h43
  2. Réponses: 0
    Dernier message: 01/08/2007, 12h12
  3. Réponses: 2
    Dernier message: 20/06/2007, 10h34
  4. Réponses: 1
    Dernier message: 28/03/2007, 17h12
  5. Remplissage automatique de cellules Excel à partir d'une liste
    Par Gullivert dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 31/08/2006, 17h48

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