Tengo una hoja en la que tengo datos de dos fuentes diferentes. Tengo una fila en blanco entre ellos. Quiero hacer que esta fila en blanco sea mi delimitador . ¿Cómo puedo saber si toda la fila está en blanco o no?Cómo saber si una fila completa está en blanco en excel a fondo vba
12
A
Respuesta
15
Si estamos hablando de una fila entera literal a continuación un código similar a esto debería funcionar (siempre y cuando no hay fórmulas o espacios presentes en cualquiera de las células, así):
If Application.CountA(ActiveCell.EntireRow)=0 Then
MsgBox "Row Empty"
Exit Sub
End If
lo contrario, para un rango de una fila:
Dim neValues As Range, neFormulas As Range, MyRange As Range
Set MyRange = Columns("C:AA")
On Error Resume Next
Set neValues = Intersect(ActiveCell.EntireRow.SpecialCells(xlConstants), MyRange)
Set neFormulas = Intersect(ActiveCell.EntireRow.SpecialCells(xlFormulas), MyRange)
On Error GoTo 0
If neValues Is Nothing And neFormulas Is Nothing Then
MsgBox "Nothing There"
Else
MsgBox "Something's There"
End If
(Fuente: http://www.ozgrid.com/forum/showthread.php?t=26509&page=1)
8
WorksheetFunction.CountA()
, como se demuestra a continuación:
Dim row As Range
Dim sheet As Worksheet
Set sheet = ActiveSheet
For i = 1 To sheet.UsedRange.Rows.Count
Set row = sheet.Rows(i)
If WorksheetFunction.CountA(row) = 0 Then
MsgBox "row " & i & " is empty"
End If
Next i
Cuestiones relacionadas
- 1. ¿Cómo saber si el componente VBA de Office está instalado?
- 2. primera fila en blanco en excel
- 3. Seleccionar celdas no en blanco en Excel con VBA
- 4. VBA - ¿Cómo copiar una fila en Excel de un libro de trabajo a otro?
- 5. Última celda no vacía en la fila; Excel VBA
- 6. matriz en Excel VBA
- 7. OnClick en Excel VBA
- 8. Servidor SQL: cómo saber si una fila hace referencia a la fila para eliminar
- 9. Encontrar el número de columnas no en blanco en una hoja de Excel usando VBA
- 10. VBA Comprobar si la variable está vacía
- 11. Excel VBA: obtener la fila del botón presionado
- 12. ¿Cómo saber si se está ejecutando una aplicación de pantalla completa?
- 13. Cómo saber si el dispositivo está durmiendo
- 14. Excel VBA - xlDown
- 15. Prueba VBA si la celda está en un rango
- 16. ¿Cómo saber si una NSWindow es a pantalla completa en Mac OS X Lion?
- 17. Aplicar un color de fondo a una fila de cuadrícula completa en XAML Silverlight
- 18. Excel VBA Si WorkSheet ("wsName") Existe
- 19. Cómo saber si un actor está inactivo
- 20. ¿Cómo convierto un entero en una cadena en Excel VBA?
- 21. ¿Cómo saber si actualmente se encuentra en la última fila de una tabla HTML?
- 22. Actualizar una fila completa en MySQL
- 23. ¿Cómo puedo congelar programáticamente la fila superior de una hoja de cálculo de Excel en Excel 2007 VBA?
- 24. Barra de progreso en VBA Excel
- 25. ¿Debo tirar ArgumentNullException si una cadena está en blanco?
- 26. Cómo acceder a Checkbox desde VBA en Excel 2007
- 27. ¿Cómo acceder a los grupos de contacto en Excel VBA?
- 28. ¿Cómo programar código una función 'deshacer' en Excel-Vba?
- 29. pueblan valores únicos en una matriz de VBA desde Excel
- 30. ¿Cómo verifica si la lista está en blanco?