¿Es posible seleccionar todas las celdas del banco en una hoja de Excel y poner el mismo valor en todas las celdas?Excel cómo completar todas las celdas en blanco seleccionadas con el texto
sólo quiero llenarlos con "nula"
tengo estudiante Excel 2010
bien, lo que puede intentar es
Cntrl + H (Buscar y reemplazar), deje encontró lo que en blanco y cambiar Reemplazar con a NULL.
Eso debe reemplazar todas las celdas en blanco en el rango utilizado con NULL
no creo búsqueda y reemplazo lo hará por usted (no funciona para mí en Excel 2010 Casa). ¿Estás seguro de que quieres poner "nulo" en CADA celda de la hoja? Eso es millones de células, en cuyo caso no hay forma de que una búsqueda y reemplazo sea capaz de manejarlo en memoria (corrígeme si estoy equivocado).
En el caso estoy en lo cierto y no quieres millones de celdas "nulas", entonces aquí hay una macro. Le pide que seleccione el rango y luego ponga "nulo" dentro de cada celda que estaba en blanco.
Sub FillWithNull()
Dim cell As range
Dim myRange As range
Set myRange = Application.InputBox("Select the range", Type:=8)
Application.ScreenUpdating = False
For Each cell In myRange
If Len(cell) = 0 Then
cell.Value = "Null"
End If
Next
Application.ScreenUpdating = True
End Sub
Si usted quiere hacer esto en VBA, entonces este es un método más corto:
Sub FillBlanksWithNull()
'This macro will fill all "blank" cells with the text "Null"
'When no range is selected, it starts at A1 until the last used row/column
'When a range is selected prior, only the blank cell in the range will be used.
On Error GoTo ErrHandler:
Selection.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "Null"
Exit Sub
ErrHandler:
MsgBox "No blank cells found", vbDefaultButton1, Error
Resume Next
End Sub
Saludos,
Robert Ilbrink
Aún más pequeño en una línea: Selection.SpecialCells (xlCellTypeBlanks) .FormulaR1C1 = "Null" –
esto es muy eficiente, pero 'SpecialCells' se usa mejor después 'On Error Resume Next' (luego 'On Error Goto 0' como el código error error si SpecialCells es Nothing. SpecialCells (xlBlanks) no recogerá una fórmula que evalúa a "". +1 byt – brettdj
Brett, Gracias por su idea de mejora con la adición On Error. Estaba demasiado centrado en reducir la código –
Aquí hay una manera complicada de hacerlo: seleccione las celdas que desea reemplazar y en Excel 2010 seleccione F5 para que aparezca el cuadro "Ir a". Presiona el botón "especial". Seleccione "espacios en blanco": esto debería seleccionar todas las celdas que están en blanco. Ingrese NULL o lo que quiera en el cuadro de fórmula y presione ctrl + enter para aplicar a todas las celdas seleccionadas. ¡Fácil!
En mi opinión, esta es la mejor respuesta a esta pregunta. La respuesta aceptada hará lo que OP solicite en la hoja o el libro de trabajo, pero no tiene la granularidad para trabajar en una sola columna (que era mi caso de uso aquí). – brandwaffle
Esto parece estar aún más afinado que las respuestas anteriores. – algorithmic
poner el mismo texto en un cierto número de células haga lo siguiente:
Usted encontrará que todas las celdas resaltadas ahora tienen los mismos datos en ellos. Que tengas un buen día.
No es ideal para lo que el OP está buscando, pero muy útil de lo contrario. – bdeniker
gracias por este brillante consejo! –
¡Respuesta impresionante! –
Si todas las celdas están debajo de una columna, podría simplemente filtrar la columna y luego seleccionar "(blanco)" y luego insertar cualquier valor en las celdas. Pero ten cuidado, presiona "alt + 4" para asegurarte de estar insertando valor solo en las celdas visibles.
Cntrl + H (Buscar y reemplazar), deje 'Buscar' en blanco y cambie 'Reemplazar con' a NULO.Eso debería reemplazar todas las celdas en blanco en el rango USADO con NULL –
Excelente gracias mucho –
@astander, sugiero que publique esto como una respuesta – brettdj