Bonjour tout le monde,

J'ai un emploi du temps sous Excel complètement illisible, je souhaite créer une macro pour refaire sa mise en forme. J'ai donc deux feuilles, l'emploi du temps illisible ("Workplan") et le nouveau ("Resource Assignement").
Pour ceci j'ai besoin du nom de la personne, de sa tâche à accomplir et de son projet.

J'ai pensé à ceci :
On va sur la nouvelle feuille pour récupérer le nom, la tâche et le projet, on calle ces derniers dans des variables qu'on va chercher sur l'autre feuille.
Une fois la ligne trouvé, on va copier cette ligne de telle colonne à telle colonne, pour la coller, dans la nouvelle feuille, de telle colonne à telle colonne.
Tout ça dans une boucle, histoire d'automatisé la macro.


Voilà ce que j'ai commencé, le principe est de passer ligne par ligne pour les valeurs recherchés, enfin c'est une idée :
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
Sub replace()
 
Dim REF As Integer, PHASE As String, RESSOURCE As String, NB_LIGNE As Integer
 
 NB_LIGNE = 2
    Sheets("Resource Assignement").Select
    While Not Range("A" & NB_LIGNE & "").Value = ""
        REF = Range("A" & NB_LIGNE & "").Value
        PHASE = Range("F" & NB_LIGNE & "").Value
        RESSOURCE = Range("G" & NB_LIGNE & "").Value
        MsgBox "REF : " & REF & Chr(10) & _
               "PHASE : " & PHASE & Chr(10) & _
               "RESSOURCE : " & RESSOURCE
        NB_LIGNE = NB_LIGNE + 1
    Wend
 
 
 
End Sub
Pensez-vous que je suis sur la bonne voie ?