Bonjour,
Le but est d'intégrer "impact centre" sur la page "planning cust exp" lorsque sur la page "customer group" il y a le "yes" puis insérer "impact centre" à la colonne associé au "x" - 23. Or le problème est que tous les "impact centre" sont sur la même colonne et ne change pas... on dirait que ma partie en rouge ne tourne pas dans la boucle... merci d'avance !
Sub Calendrier()
Dim n As Integer
Dim x As Integer
Dim NbLignes As Integer
Dim rg As Range
Dim y As Integer
NbLignes = Sheets("Customer Group").Range("T12").End(xlDown).Row
n = 12
x = 4
For n = 12 To NbLignes
If Sheets("Customer Group").Cells(n, 21) = "Yes" Then
Set rg = Range(Sheets("Customer Group").Cells(n, "X"), Sheets("Customer Group").Cells(n, "AI")).Find("x", After:=Cells(n, "X"))
y = rg.Column - 23
Sheets("Planning Cust Exp").Cells(x, y) = "Impact Centre"
x = x + 1
Else
End If
Next
End Sub