Veux-tu dire par là que tu as beaucoup de feuilles ?oui mais vue le volume du fichier,je vais m'amuser un certain temp
Sub test()
Dim Feuille As Worksheet
For Each Feuille In ThisWorkbook.Worksheets
Feuille.Cells.Replace "#", "", lookat:=xlPart
Next
End Sub