Bonjour à tous,
Je me trouve confronté à un pb :
J'ai créé une boucle dans laquelle je souhaite savoir si une valeur est présente dans une cellule. Cependant cette valeur va varier sur une liste. J'ai écris le code suivant avec peu d'espoir et visiblement j'ai vu juste:
For i = 1 To nblignedashboard
For j = 2 To nbligneWINFRA
If BDashboard(i, 1) = BWINFRA(j, 3) Then
If BDashboard(i, 4).Value Like """ & " * " & BWINFRA(j, 3).Value & " * " & """ Then
BDashboard(i, 1) = BDashboard(i, 1)
End If
If Not BDashboard(i, 4).Value Like """ & " * " & BWINFRA(j, 3).Value & " * " & """ Then
BDashboard(i, 1) = BDashboard(i, 1) & " (" & BWINFRA(j, 3).Value & BWINFRA(j, 4).Value & ")"
End If
End If
Next j
Next i
L'erreur se trouve sur la 4eme ligne.
Auriez vous une idée afin de corriger ce problème?
Merci d'avance pour votre aide.
Cordialement
Pierro26