La mise à jour des données

Le 04/05/2017 à 15:39

Salut tout le monde,

Dans le cadre de mon PFE, je dois rendre la mise à jour du fichier ci-joint automatique, d'une manière ou d'une autre.

Alors, je veux supprimer les OF qui existent sur la Feuille MASTER et qui n’existent pas sur la feuille TMP et ajouter les OF qui n’existent po sur la feuille Master et qui existent sur la feuille TMP. Dont la colonne :

- OF (Feuille MASTER) = Work Order (Feuille TMP)

- Item Number (Feuille MASTER) = Item Number (Feuille TMP)

- Désignation (Feuille MASTER) : = Description 2 (Feuille FAMILLE)

- Famille (Feuille MASTER) : = Famille (Feuille FAMILLE)

- Run Time (Feuille MASTER) = Run Time (Feuille FAMILLE)

- Week (Feuille MASTER) = la fonction => NO.SEMAINE (Colonne H ‘’ Release Date’’)

- Year (Feuille MASTER) = la fonction => ANNEE (Colonne H ‘’ Release Date’’)

- Release Date (Feuille MASTER) = Release Date (Feuille TMP)

- WO statut (Feuille MASTER) = Work Order Status (Feuille TMP)

- KITS (Feuille MASTER) = Location (Feuille TMP)

Il est à noter que les infos de la feuille TMP juste copier - coller d’un notre fichier

Quelqu'un parmi vous peut m’aider pour le rendre. Je serai très reconnaissant pour vos aides.

Cordialement.

16c-pro.xlsx (190.07 Ko)

Le 04/05/2017 à 17:12

Hé hé, le fichier étant vide, cela se complique un peu.

Ma démarche serait de faire deux fois un EQUIV pour rechercher la correspondance dans un sens puis dans l'autre ! avec un jeu de données réduit cela peut se démontrer.

Le 04/05/2017 à 22:24

Steelson a écrit :
Hé hé, le fichier étant vide, cela se complique un peu.
Ma démarche serait de faire deux fois un EQUIV pour rechercher la correspondance dans un sens puis dans l'autre ! avec un jeu de données réduit cela peut se démontrer.

Je vous remercie pour l'intérêt que vous avez donner à mon problème.

Merci de trouver en PJ un fichier remplit

Merci.

14c-pro.xlsx (220.78 Ko)

Le 05/05/2017 à 03:40

Voilà, j'ai ajouté 2 colonnes ...

12c-pro-1.xlsx (222.68 Ko)

Le 07/05/2017 à 20:30

Steelson a écrit :
Voilà, j'ai ajouté 2 colonnes ...

Merci pour votre réaction à ma demande. Pourtant , pourriez-vous s'il vous plait faire une macro pour supprimer les lignes qui existent sur la Feuille MASTER et qui n’existent pas sur la feuille TMP et ajouter les lignes qui n’existent po sur la feuille Master et qui existent sur la feuille TMP.

Le 08/05/2017 à 06:35

je ne peux pas te répondre pour le moment, je suis en déplacement, mais j'y pense

que fais-tu comme étude ?

Le 08/05/2017 à 07:13

Il y a des liens externes !

=RECHERCHEV(D:D;'D:\Documents\1.Mes études\Master\S 10\CABLIANCE\[CP.xls]MASTER'!A$1:B$65536;2;0)

et une erreur ici D:D :

=RECHERCHEV(D:D;...;2;0)

Quelles sont les correspondances ?

TMP

Item Number Group Site Work Order ID Prod Line Buyer/Planner Phantom Quantity Ordered Quantity Completed Qty Rejected Quantity Open Release Date Due Date Work Order Status Run Time Issue Started Size Remarks Location

MASTER

OF Item Number Désignation Famille Week Prod Week Year Release Date WO statut A KITS EXPLICATION

Le 10/05/2017 à 03:37

Steelson a écrit :
Il y a des liens externes !
=RECHERCHEV(D:D;'D:\Documents\1.Mes études\Master\S 10\CABLIANCE\[CP.xls]MASTER'!A$1:B$65536;2;0)
et une erreur ici D:D :
=RECHERCHEV(D:D;...;2;0)
Quelles sont les correspondances ?
TMP
Item Number Group Site Work Order ID Prod Line Buyer/Planner Phantom Quantity Ordered Quantity Completed Qty Rejected Quantity Open Release Date Due Date Work Order Status Run Time Issue Started Size Remarks Location
MASTER
OF Item Number Désignation Famille Week Prod Week Year Release Date WO statut A KITS EXPLICATION

Des liens externes parce que la feuille TMP c'été un fichier à part mais je veux le rendre au sein de ce fichier pour faciliter la mise à jou du la feuille MASTER.

Concernant les correspondances :

OF (Feuille MASTER) = Work Order (Feuille TMP)
Item Number (Feuille MASTER) = Item Number (Feuille TMP)
Désignation (Feuille MASTER) : = Description 2 (Feuille FAMILLE)
Famille (Feuille MASTER) : = Famille (Feuille FAMILLE)
Run Time (Feuille MASTER) = Run Time (Feuille FAMILLE)
Week (Feuille MASTER) = la fonction => NO.SEMAINE (Colonne H ‘’ Release Date’’)
Year (Feuille MASTER) = la fonction => ANNEE (Colonne H ‘’ Release Date’’)
Release Date (Feuille MASTER) = Release Date (Feuille TMP)
WO statut (Feuille MASTER) = Work Order Status (Feuille TMP)
KITS (Feuille MASTER) = Location (Feuille TMP)

Merci d'avance

Le 10/05/2017 à 05:01

Il te reste à renseigner les autres colonnes

16c-pro.xlsm (202.82 Ko)

Le 12/05/2017 à 23:53

Steelson a écrit :
Il te reste à renseigner les autres colonnes

Merci infiniment à vous. C'est vraiment ce que je cherche depuis longtemps.

Pourtant lorsque j'ai rempli le fichier et je clique sur ''METTRE A JOUR'', l'opération de la mise à jour est très lente. Est-ce que ça est normal ?

Je met à votre disposition un fichier rempli pour tester l'action. Si possible de la rendre plus rapide.

Merci encore une fois pour votre aide.

11c-prod.rar (841.94 Ko)

Le 13/05/2017 à 05:57

Désolé, je ne peux pas lire les .rar

Le 13/05/2017 à 10:59

Steelson a écrit :
Désolé, je ne peux pas lire les .rar

Je peux po vous communiquer le fichier Excel car sa taille dépasse 1 MO

Qu'est ce que je dois faire !!

Le 13/05/2017 à 11:33

en .zip ?

Le 13/05/2017 à 12:01

Steelson a écrit :
en .zip ?

Encore le fichier .zip > à 1 Mo. Vous pouvez pas ouvrir un fichier .rar avec 7-Zip/WinZip.

Sinn pourriez-vous me communiquer votre Mail pour vous envoyer le fichier. Merci

Le 13/05/2017 à 21:07

Merci infiniment à vous "STEELSON" , Merci pour votre aide, c'été trop gentil.

Problème résolu, merci encore une fois.

Sincères Salutations.

8c-pro-final.xlsm (399.57 Ko)

Le 17/05/2017 à 06:03

Bonjour,

ATTENTION ...

tu dois ensuite ajouter les informations sur les autres colonnes

Steelson a écrit :
Il te reste à renseigner les autres colonnes,

voir commentaire dans la macro, soit par RECHERCHEV soit par macro

    Set C = master.Columns("A").Find(tmp.Cells(i, 4).Value, master.[A1].End(xlDown), xlValues, xlWhole)
    If C Is Nothing Then
        master.Cells(newL, 1).Value = tmp.Cells(i, 4).Value
        ' ajouter autres valeurs ici
        newL = newL + 1
    End If

Le 17/05/2017 à 18:34

Steelson a écrit :
Bonjour,
ATTENTION ...
tu dois ensuite ajouter les informations sur les autres colonnes
Steelson a écrit :
Il te reste à renseigner les autres colonnes,
voir commentaire dans la macro, soit par RECHERCHEV soit par macro
    Set C = master.Columns("A").Find(tmp.Cells(i, 4).Value, master.[A1].End(xlDown), xlValues, xlWhole)
    If C Is Nothing Then
        master.Cells(newL, 1).Value = tmp.Cells(i, 4).Value
        ' ajouter autres valeurs ici
        newL = newL + 1
    End If

Bonjour,

Vraiment j'ai pas compris ce que je doi faire mnt.

ce code déjà inclus dans la macro, quesque je dois faire pour etre applicable

Merci.

Le 17/05/2017 à 18:54

ok, je vais me dégager du temps pour t'expliquer, mais pas dans l'immédiat

Le 19/05/2017 à 09:22

Steelson a écrit :
ok, je vais me dégager du temps pour t'expliquer, mais pas dans l'immédiat

D'accord, j'attend vos explications

Merci infiniment. Cordialement

Le 19/05/2017 à 18:31

Une première partie à réaliser toi même :

tu ouvres l'explorateur de macro (Alt + F11)

tu vas dans le module

tu verras ceci :

    Set C = master.Columns("A").Find(tmp.Cells(i, 4).Value, master.[A1].End(xlDown), xlValues, xlWhole)
    If C Is Nothing Then
        master.Cells(newL, 1).Value = tmp.Cells(i, 4).Value
        ' ajouter autres valeurs ici
        newL = newL + 1
    End If

tu remplaces' ajouter autres valeurs ici en enlevant l'apostrophe par autant de lignes que de valeurs à importer de TMP vers MASTER comme suit :

master.Cells(newL, XXXX).Value = tmp.Cells(i, YYYY).Value

avec XXXX le n° de colonne (chiffre) de MASTER (destination) et YYYY le n° de colonne où est prise l'information dans TMP

Bon courage !