j'ai un petit problème (fichier c-joint). je voudrai enlever les guillemets dans les cellules dans le fichier ci-joint. Mon problème c'est que les textes ne sont pas toujours de la même longueur.
Sub retirer()
Dim i&, fin&
fin = Feuil1.Range("F65536").End(xlUp).Row
For i = 12 To fin
Cells(i, 7) = Mid(Cells(i, 6), 2, Len(Cells(i, 6)) - 2)
Next i
End Sub