Bonjour,
Dans ma macro je demande de mettre un texte dans une cellule selon la reponse a deux conditions. Ca j'ai reussi a faire mais je ne parviens pas a faire en sorte que ce texte soit dupliqué sur toutes les lignes qui correspondent a une cellule fusionnés sur une colonne precedente.
Je vous explique:
Si la cellule cells (J,10) a un texte de couleur rouge et que la valeur de la cells (J,6) est egale à zero alors la cels(J,14) doit avoir comme text "Unauthorized Deposit" mais ce text doit etre duppliquée sur toutes les lignes ou la cells(J,10) est fusionée
Voici mon code:
Auriez vous une idee de comment faire?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Workbooks("Reporting Global.xlsx").Sheets("Reporting").Activate Range("A1").Select For J = Range("A60000").End(xlUp).Row To 1 Step -1 If Cells(J, 10).Font.Color = vbRed And Cells(J, 6).Value = 0 Then Cells(J, 14).Value = " Unauthorized Deposit" End If Next J For J = Range("A60000").End(xlUp).Row To 1 Step -1 If Cells(J, 10).Font.Color = vbRed And Cells(J, 6).Value > 0 Then Cells(J, 14).Value = "Deposit in Excess" End If Next J
Merci beaucoup
Partager