¿Cómo formatear un cuadro de texto como porcentaje en Excel?
En un artículo anterior, cubrimos cómo formatear números en un cuadro de texto como moneda en Excel. Esta vez, exploraremos cómo formatear números en un cuadro de texto como porcentajes. Usando VBA, puedes asegurarte de que cualquier número ingresado en el cuadro de texto se formatee automáticamente como un porcentaje para una presentación de datos consistente.
Formatea las entradas del cuadro de texto como porcentajes con código VBA
Formatea las entradas del cuadro de texto como porcentajes con código VBA
Sigue estos pasos para formatear un cuadro de texto como porcentaje usando código VBA.
1. Haz clic en "Desarrollador" > "Insertar" > "Cuadro de Texto (Control ActiveX)" para insertar un cuadro de texto en la hoja de cálculo. Ver captura de pantalla:
2. Haz clic derecho en el cuadro de texto y luego haz clic en "Ver Código" desde el menú contextual.
3. En la ventana "Microsoft Visual Basic for Applications" que se abre, reemplaza el código original en la ventana de Código con el siguiente código VBA.
Código VBA: formatear un cuadro de texto como porcentaje en Excel
Private Sub TextBox1_LostFocus()
Dim xReg As New RegExp
Dim xMatches As MatchCollection
Dim xMatch As Match
Dim xText As String
Dim xReplace As String
On Error Resume Next
Application.ScreenUpdating = False
xText = Me.TextBox1.Text
xText = Replace(xText, "%", "")
With xReg
.Global = True
.Pattern = "([^0-9]+\d+)|(\d{1,})"
Set xMatches = .Execute(xText)
For Each xMatch In xMatches
xReplace = xReplace & xMatch.Value & "%"
Next
End With
xText = xReplace & Mid(xText, Len(xReplace) - xMatches.Count + 1)
Me.TextBox1.Text = xText
Application.ScreenUpdating = True
End SubNota: Reemplaza "TextBox1" con el nombre del cuadro de texto que estás utilizando.
4. Haz clic en "Herramientas" > "Referencias". Luego marca la casilla "Microsoft VBScript Regular Expressions" en el cuadro de diálogo "Referencias – VBAProject" y haz clic en el botón "Aceptar". Ver captura de pantalla:
5. Presiona las teclas "Alt" + "Q" para salir de la ventana "Microsoft Visual Basic for Applications".
6. Cuando regreses a la hoja de cálculo, haz clic en "Desarrollador" > "Modo Diseño" nuevamente para desactivar el Modo Diseño.
A partir de ahora, cuando ingreses números en el cuadro de texto y muevas el cursor fuera de él para hacer clic en cualquier celda, los números se formatearán automáticamente como porcentajes.
Artículos relacionados:
- ¿Cómo formatear un cuadro de texto como moneda en Excel?
- ¿Cómo seleccionar automáticamente el texto de un cuadro de texto cuando está seleccionado en Excel?
- ¿Cómo autocompletar un cuadro de texto al escribir en Excel?
- ¿Cómo concatenar textos de varias celdas en un cuadro de texto en Excel?
- ¿Cómo deshabilitar la edición en un cuadro de texto para evitar que el usuario ingrese datos en Excel?
Las mejores herramientas de productividad para Office
Mejora tu dominio de Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab incorpora la interfaz de pestañas en Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!
Todos los complementos de Kutools. Un solo instalador
El paquete Kutools for Office agrupa complementos para Excel, Word, Outlook y PowerPoint junto con Office Tab Pro, ideal para equipos que trabajan en varias aplicaciones de Office.
- Suite todo en uno: complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un solo instalador, una licencia: configuración en minutos (compatible con MSI)
- Mejor juntos: productividad optimizada en todas las aplicaciones de Office
- Prueba completa de30 días: sin registro ni tarjeta de crédito
- La mejor relación calidad-precio: ahorra en comparación con la compra individual de complementos