Discussion :

[Meranto]

Bonjour !

Voici mon problème :

J'ai 5 feuilles avec des données sur des défauts robot qui sont nommé BRUT BRUT2 BRUT3 BRUT4 BRUT5. Chaque robot a un nom ( Cé détail est important pour la suite )

Les données sont organisé comme ceci :

Colonne A nommé Module avec le nom de module
Colonne B nommé Nbs avec le nombre de défaut pour ce type de défaut sur le robot en question ( Phrase compliqué je l'admet )
Colonne C nommé Libellé des Défauts qui correspondent aux défauts, Exemple : "DL : Défauts robot baie : "Nom du robot" "
Colonne D nommé Tps de Défauts, qui correspond a la durée du défauts
Colonne E nommé DateHeure, avec la date et l'heure sur la même case
Colonne F nommé Priorité, ( celle ci peux être variable mais je l'ai trié sur 16)
Colonne G nommé DeltaTemps, qui en soit ne me sert plus mais c'est pas grave si elle est présente
Colonne H nommé Appartenance, qui sont en fait les nom des robots

Voici en image :



Ces feuilles BRUT sont crée en lançant ma macro, en fait ma macro extrait des données d'un fichier txt pour les organiséés dans les feuilles nommé BRUT. J'ai 5 feuilles BRUT car il y a 5 lignes de productions ( usine ). Les premières feuil que vous pouvez voir sont aussi des feuilles statique qui indique juste les modules a selectionner et les libellé a supprimer pour chaque feuille BRUT. ( J'espère avoir été clair... )
J'ai donc une feuille Recherche qui est aussi statique ( quand je dit statique c'est qu'elle n'est pas supprimé a l'exécution de ma macro )
Cette feuille contient un bouton "Recherche d'un Robot"

Ce que j'aimerais que ce bouton me réalise :

On clique dessus.
Une boite dialogue s'ouvre et nous demande de rentrer le nom du robot ( Colonne H nommé Appartenance ).
On rentre le nom du robot, on clique sur ok.
Une recherche s'éxécute sur les 5 fichier BRUT.
Un nouvel onglets est crée. Cette onglet ce nomme comme le nom de robot qu'on a rentrer dans la boite de dialogue.
Cette feuille est organisé de la même manière que les feuilles BRUT.

Voici en image :



J'espère avoir été clair dans ma demande. Si ça n'est pas le cas, n'hésitez pas a poser des questions.
Sinon merci d'avance pour vos réponses !

[Igloobel]

Bonjour,

ta demande est assez complexe et je pense qu'il faudra plusieurs étapes.

1ère étape récuperer les classeurs nécessaire

On clique dessus.
Une boite dialogue s'ouvre et nous demande de rentrer le nom du robot ( Colonne H nommé Appartenance ).
On rentre le nom du robot, on clique sur ok.
Une recherche s'éxécute sur les 5 fichier BRUT.
Un nouvel onglets est crée. Cette onglet ce nomme comme le nom de robot qu'on a rentrer dans la boite de dialogue.

je te propose un élément pour commencer qui permet de récupérer la série des classeurs nécessaire

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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
'ouverture de fichier(s) par boite FileDialog
'**********************************************************
    'Declaration d'une variable comme objet FileDialog
    Dim fd As FileDialog
 
    'Creation d'un objet FileDialog comme un File Picker dialog box.
    Set fd = Application.FileDialog(msoFileDialogFilePicker)
 
    'Déclaration d'une variable contenant le "path" de style variant
    Dim vrtSelectedItem As Variant 'obligatoirement de type variant
 
    With fd
 
        'donner le Path initial lors de l'affichage de la boite filedialog.
        'Cela permet d'arriver directement sur le repertoire addéquat
        .InitialFileName = ThisWorkbook.Path
 
        'Utilisation de la méthode show pour afficher le File Picker de la boite de dialogue et
        '   retourne la valeur de l'action de l'utililisateur.
        If .Show = -1 Then
 
            'pour chaque élément sélectionné dans la collection FileDialogSelectedItems .
            For Each vrtSelectedItem In .SelectedItems
 
                'vrtSelectedItem est un String contenant le "path"  de chaque item selectionné.
                'affichage du "PATH et du fichier selectionné" dans une boite message
                MsgBox "Vous avez sélectionné : " & vrtSelectedItem
                'récuparation du nom du fichier avec son path
				File_Select = vrtSelectedItem
 
            Next vrtSelectedItem
 
        'Au cas ou l'utilisateur appuis sur Cancel...
        Else
            'Dans ce cas je sors.
            Exit Sub
        End If
    End With

dis si cela peut faire l'affaire ... ou pas

A+

[SfJ5Rpw8]

....

Ces feuilles BRUT sont crée en lançant ma macro, en fait ma macro extrait des données d'un fichier txt pour les organiséés dans les feuilles nommé BRUT. J'ai 5 feuilles BRUT car il y a 5 lignes de productions ( usine ). Les premières feuil que vous pouvez voir sont aussi des feuilles statique qui indique juste les modules a selectionner et les libellé a supprimer pour chaque feuille BRUT. ( J'espère avoir été clair... )
J'ai donc une feuille Recherche qui est aussi statique ( quand je dit statique c'est qu'elle n'est pas supprimé a l'exécution de ma macro )
Cette feuille contient un bouton "Recherche d'un Robot"
...

Bonsoir,

modifie ta code de création et ne crée plus qu'un seul onglet BRUT (ne crée pas les feuilles brut2 à 5 ) .... ainsi ensuite un simple filtre te permet d'afficher le résultat souhaité

[Meranto]

Bonjour,

Igloobel : Merci pour ton aide mais cela ne me sert pas a grand chose :/ Je me suis tromper dans mon premier post, ce ne sont pas des fichiers mais des feuilles...

bbil : Je ne peux malheureusement pas faire ça... Chaque fichier brut est crée a partir d'un fichier différent dont le nombre de ligne est variable en fonction des jours.

Cependant, j'ai pensé a une solution peut-être plus simple.
Crée un userform, avec un menu déroulant, selectionner la feuille voulu ( BRUT, BRUT2, BRUT3, BRUT4, BRUT5) puis rentrer le robot a chercher.
Comme cela la recherche se fera dans le fichier selectionner directement ? Seul chose il faudrait que sur le menu déroulant les feuilles ne s'appel pas par leur nom de base mais par un autre plus compréhensible par le technicien qui va utiliser ce programme.

Je n'y connais rien sur le UserForm, j'ai proposé ça a la volé, je ne sais pas si c'est possible.

Voilà la tête de mon UserForm :



Merci pour votre aide !

[SfJ5Rpw8]

bonjour ,

...

bbil : Je ne peux malheureusement pas faire ça... Chaque fichier brut est crée a partir d'un fichier différent dont le nombre de ligne est variable en fonction des jours. ...

et alors ? qu'est-ce qui t’empêche de mettre tous les fichiers dans le même onglet les uns à la suite des autres ?

[Meranto]

Bonjour,

Mhhh... Les fichier ont une longueur variable, ils ne sont pas forcément constituer de 100lignes chacun.
Je ne vois pas comment les mettre l'un en dessous des autres si leurs longueurs changent constamment :/