que variable tengo que ponerle al codigo para que me elimine todas las columnas que no contengan Bebere
Sub borracolumnacriterios()
'
' Macro1 Macro
'
'
Rows("1:1").Select
Cells.Find(What:="Bebere").EntireColumn.Delete
End Sub
Mar, 07/12/2010 - 19:21
#1
Borrar columnas que no contengan un texto
Si busca algo y no lo encuentra, devolverá como resultado Nothing, así que puedes probar algo parecido a esto:
If Columna.Find("Bebere") Is Nothing Then...he llamado Columna a una columna donde buscar, tú deberás recorrer las columnas donde quieras hacer la comprobación
------
Ya sé Excel, pero necesito más ahora en pdf
------
Ya sé Excel, pero necesito más.