Recherche d'une valeur dans une autre feuille, pour recopier la valeur

Bonjour,

J'ai un fichier avec 2 onglets (Backup_Dashboard et raw_data).

Dans le 1er onglet (backup_dashboard) j'ai ma liste d'élément (unique) et une colonne par jour (à partir de la colonne D), et en cellule A1 la date du jour.

Dans le 2nd onglet (raw_data), j'ai les valeurs des résultats pour tous les jours du mois (à partir de la colonne P pour le 1, Q pour le 2, ...) que je souhaite reporter dans le 1er onglet.

J'ai un pb sur mon match/index pour récupérer la valeur de ma recherche dans le 2nd onglet et ensuite la copier dans la bonne cellule du 1er onglet.

Voici le code que j'ai commencé à écrire :

Sub test()
Sheets("Backup_Dashboard").Select
' DateOfTheDay contains the value of day that has to be compilated
DateOfTheDay = Range("A1").Value
' DayIntheMonth contains the number of the day in the current month : Example 23 or 18
DayInTheMonth = Day(DateOfTheDay)
Dim CheckClient As String
Dim Value_Backup As String
Sheets("Backup_Dashboard").Select
TotalRow = Range("A100000").End(xlUp).Offset(0, 1).Row

For Line = 3 To TotalRow
Sheets("Backup_Dashboard").Select
CheckClient = Cells(Line, 2).Value
Sheets("raw_data").Select
Set Control = Range("F:F").Find(What:=CheckClient)

If Control Is Nothing Then
Sheets("Backup_Dashboard").Select
Cells(Line, DayInTheMonth + 3).Value = "NOT"
Else
If Not (IsError(Application.Match(Control, Range("F:F"), 0))) Then
Value_Backup = Application.Index(DayInTheMonth + 16, Application.Match(Control, Range("F:F"), 0))

Else
Value_Backup = "KO"
End If

End If

Next Line

End Sub

Le message d'erreur est que j'ai est "type mistach sur Value_Backup.

Merci de votre aide à tous par avance.

Bonjour et bienvenue sur e forum

Tu devrais joindre ton fichier...

Bye !

Effectivement, ça sera beaucoup plus simple ;-)

J'ai isolé la macro, c'est la "test" dans le module 3

Mon but du jeu est qu'en fonction de la date que j'indique en A1, ça va regarder la valeur de chaque ligne dans l'autre onglet et ça recopie la valeur dans la colonne du jour souhaité.

Rechercher des sujets similaires à "recherche valeur feuille recopier"