Macro de formato numérico

Los usuarios de Excel suelen dedicar mucho tiempo a aplicar el mismo formato a las celdas numéricas. Algunos números son valores almacenados y otros se calculan con fórmulas. La tarea de aplicar manualmente el mismo formato a todos los números de la hoja de cálculo, especialmente cuando los números no están en un rango continuo, puede parecer bastante repetitiva. Y cuando hay muchos números, esta tarea puede llevar tiempo. Dado que nuestro objetivo es realizar nuestro trabajo rápidamente y seguir adelante con nuestra vida, esta publicación le mostrará cómo configurar una macro para formatear todos los números almacenados y calculados en una hoja de trabajo. ¡Gracias Amanda por publicar la pregunta para este tema!

Objetivo

Antes de llegar demasiado lejos, confirmemos nuestro objetivo. Digamos que hemos terminado de configurar nuestra hoja de trabajo y ahora solo necesitamos aplicar un formato a las celdas que contienen números. Necesitamos incluir celdas que almacenen números y aquellas con fórmulas que devuelvan números. No queremos cambiar el formato de ninguna otra celda. En lugar de realizar todo este formato manualmente, crearemos una macro para ayudar.

Grabando la macro

Podemos grabar la macro básica y luego modificarla según sea necesario. Estos son los pasos que seguiremos:

• Iniciar grabadora
• Seleccione A1
• Seleccionar números almacenados
• Aplicar el formato deseado
• Seleccione A1
• Seleccionar números calculados
• Aplicar el formato deseado
• Seleccione A1
• detener la grabadora

Puede grabar la macro usando cualquier hoja de trabajo, por lo tanto, cree una nueva hoja de trabajo o use una existente. Asegúrese de que esta hoja de trabajo incluya tanto los números almacenados como los números calculados. Una vez grabada la macro, podrá ejecutarla en cualquier otra hoja de trabajo.

Iniciar la grabadora: Comience encendiendo la grabadora de macros de la siguiente manera:

• Ver Macros Grabar macro

Asigne a la macro un nombre descriptivo, sin utilizar espacios ni caracteres extravagantes. Algo como NumberFormat estaría bien.

Guarde la macro donde desee y anote la ubicación para poder editarla más tarde. Hemos discutido el Libro de macros personal y la idea de la Caja de herramientas de macros anteriormente, por lo que, en lugar de repasar todos esos detalles nuevamente aquí, publiqué los enlaces a continuación.

Seleccione A1: queremos que la macro funcione en todas las celdas de la hoja de trabajo, independientemente del rango que esté seleccionado actualmente. Entonces, comience seleccionando la celda A1.

Seleccionar números almacenados: para seleccionar todas las celdas de la hoja de trabajo que contienen un número almacenado, usamos el comando Ir a especial (Inicio Buscar y seleccionar Ir a especial). En el cuadro de diálogo Ir a especial resultante, seleccionamos Constantes y luego marcamos la casilla Números, como se muestra a continuación.

Presione Aceptar y ahora debería ver que Excel ha seleccionado las celdas que contienen números almacenados.

Aplicar el formato deseado: Ahora, simplemente aplique el formato deseado a las celdas seleccionadas. Puede hacer esto usando los comandos de la cinta o el cuadro de diálogo Formato de celdas (Ctrl+1).

Seleccione A1: Ahora, necesitamos repetir el proceso nuevamente para las fórmulas, por lo que seleccionaremos una vez más la celda A1 para asegurarnos de que la macro continúe funcionando en toda la hoja de trabajo.

Seleccionar números calculados: para seleccionar todas las celdas de la hoja de cálculo que contienen números calculados, abriremos nuevamente el cuadro de diálogo Ir a especial. Esta vez, seleccionaremos Fórmulas y luego marcaremos la casilla de verificación Números, como se muestra a continuación.

Presione Aceptar y Excel seleccionará cualquier celda que tenga una fórmula que devuelva un número.

Aplicar formato deseado: Aplicar el formato deseado.

Seleccione A1: seleccione A1 solo para terminar en la parte superior de la hoja de trabajo.

Detener la grabadora: Ahora, detenga la grabadora:

• Ver Macros Detener grabación

Bien, ya casi hemos terminado. Nuestra macro debería funcionar bien, pero generará un mensaje de error si la hoja de trabajo no contiene números almacenados y calculados. Entonces, podemos editar la macro para ocultar el mensaje de error.

Editar la macro

Podemos editar la macro usando el siguiente comando:

• Ver Macros

Seleccione la macro en el cuadro de diálogo Macro resultante y haga clic en el botón Editar.

Nota: si guardó la macro en el Libro de macros personal, primero deberá mostrarla con el comando Ver Mostrar.

Actualmente, la macro se parece a esto:

Formato de número secundario()  Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeConstants, 1).Seleccionar  Selección.NumberFormat = "#,###"  Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeFormulas, 1).Seleccionar  Selección.NumberFormat = "#,###"  Rango("A1").Seleccionar Subtítulo final

No queremos que Excel muestre una alerta si los números almacenados o calculados no se encuentran en la hoja de trabajo, por lo que le indicaremos que continúe. Hacemos esto agregando la línea On Error Resume Next al principio. La versión actualizada de nuestra macro aparece a continuación.

Formato de número secundario()  En caso de error Continuar siguiente  Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeConstants, 1).Seleccionar  Selección.NumberFormat = "#,###"  Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeFormulas, 1).Seleccionar  Selección.NumberFormat = "#,###"  Rango("A1").SeleccionarSubtítulo final

Ahora viene la gran prueba. Abrimos una hoja de trabajo y ejecutamos la macro. Confirmamos que la macro aplicó el formato deseado a las celdas numéricas almacenadas y calculadas como se deseaba… ¡genial!

Una nota sobre el rango

La macro anterior comienza seleccionando A1. Esto hace que la macro formatee todos los números de la hoja, independientemente del rango seleccionado inicialmente. Si desea que la macro solo funcione dentro del rango seleccionado inicialmente, entonces el archivo de muestra tiene una versión de la macro que hace esto. Se llama NumberFormatSelection. Se muestra a continuación como referencia.

SubNúmeroFormatoSelección() En caso de error Continuar siguiente Dim rSelección como rango Establecer rSelection = Selección rSelección.Seleccionar Selección.SpecialCells(xlCellTypeConstants, 1).Seleccionar Selección.NumberFormat = "#,###" rSelección.Seleccionar Selección.SpecialCells(xlCellTypeFormulas, 1).Seleccionar Selección.NumberFormat = "#,###" rSelección.Seleccionar Establecer rSelection = NadaSubtítulo final

Una nota sobre las fechas

Para Excel, un valor de fecha almacenado en una celda es un número. Entonces, la macro presentada anteriormente incluye celdas de fecha almacenadas en el formato. Si su hoja de cálculo contiene una combinación de fechas y números y desea excluir fechas del formato, entonces el archivo de Excel de muestra incluye una versión de la macro que excluirá fechas. Se llama NumberFormatNoDates y se muestra a continuación como referencia.

SubnúmeroFormatoNoFechas()  En caso de error Continuar siguiente    Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeConstants, 1).Seleccionar  Para cada c en la selección    Si no (IsDate(c)) Entonces c.NumberFormat = "#,###"  Siguiente c    Rango("A1").Seleccionar  Selección.SpecialCells(xlCellTypeFormulas, 1).Seleccionar  Para cada c en la selección    Si no (IsDate(c)) Entonces c.NumberFormat = "#,###"  Siguiente c    Rango("A1").SeleccionarSubtítulo final

Artículos Relacionados

Hay varias formas de almacenar e iniciar la macro y, en lugar de repetir los detalles nuevamente aquí, simplemente lo remitiré a las publicaciones relacionadas que contienen los detalles.

• Libro de macros personal y QAT: https://www.excel-university.com/subtotal-macro/
• Caja de herramientas de macros: https://www.excel-university.com/macro-toolbox/

Recursos

Descarga del archivo Excel: FormatNumberMacro