J'ai un document texte avec délimiteur ";".
J'ai importé les valeurs dans un fichier Excel. Certains champs ont des valeurs vides uniquement avec un seul espace.
J'ai essayé le code ci-dessous pour supprimer la cellule vide mais cela ne prend pas car il y a un espace dans les cellules.
Comment puis-je supprimer la ligne entière avec les cellules vides avec un seul espace via des macros?
Réponses:
1 pour la réponse № 1Voir le code par exemple :)
Sub DeleteRowIfSpace()
For Each Sht In ActiveWorkbook.Worksheets
Set rng = Sht.UsedRange
Set MyRange = rng
For Each mycol In MyRange.Columns
For Each mycell In mycol.Cells
If mycell.Value = " " Then
mycell.EntireRow.Delete
End If
Next
Next
Next
End Sub
Ce code parcourt toutes les feuilles d'un classeur à la recherche de "" et supprime la ligne.