Sub tt()
Sheets("sort").Select
endd = Sheets("sort").Range("A65536").End(xlUp).Row
For a = 2 To 6
voila j'ai fait la macro suivante
je tombe sur une erreur format de chaine incorrect sur la ligne: if .......
For b = 2 To endd
If Sheets("favorites").Cells(a, 1) = Sheets("sort").Cells(b, 1).Value Or Sheets("favorites").Cells(a, 1).Value Like "*" & Sheets("sort").Cells(b, 3).Value & "*" Then
Sheets("queue").Cells(a + 6, 6) = Sheets("sort").Cells(b, 3)
End If
Next
Next
End Sub
sur d'autres projets cette macro fonctionne mais pas ce coup ci
pouvez vous m'aider?
Merci
Sheets("sort").Select
endd = Sheets("sort").Range("A65536").End(xlUp).Row
For a = 2 To 6
voila j'ai fait la macro suivante
je tombe sur une erreur format de chaine incorrect sur la ligne: if .......
For b = 2 To endd
If Sheets("favorites").Cells(a, 1) = Sheets("sort").Cells(b, 1).Value Or Sheets("favorites").Cells(a, 1).Value Like "*" & Sheets("sort").Cells(b, 3).Value & "*" Then
Sheets("queue").Cells(a + 6, 6) = Sheets("sort").Cells(b, 3)
End If
Next
Next
End Sub
sur d'autres projets cette macro fonctionne mais pas ce coup ci
pouvez vous m'aider?
Merci