Tengo un documento de texto con delimitador ";".
He importado los valores en un archivo de Excel. Algunos de los campos tienen valores en blanco solo con un solo espacio.
He intentado el código de abajo para eliminar una celda en blanco pero no se selecciona porque hay un espacio en las celdas.
¿Cómo elimino toda la fila con las celdas en blanco con un solo espacio a través de macros?
Respuestas
1 para la respuesta № 1Ver código por ejemplo :)
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
Este código recorre todas las hojas de un libro de trabajo en busca de "" y elimina la fila.