Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado

Uso de With para dar formato a celdas con texto, numero y formulas

| Sin comentarios

Uso de With para dar formato a celdas especiales: texto, número y formula:

Este macro nos permite seleccionar automáticamente las celdas que contienen texto, número y formulas  y darles un formato correspondiente.

1.- Tenemos un tabla estadística con Fuerza laboral de un año:

El cual nos muestra la cantidad de trabajadores tanto de empleados como obreros en los meses del año

2.- Tenemos un botón el cual nos indica que presionemos para dar el formato

3.- Aplicamos el macro:

'Seleccionamos las celdas que contienen Texto
Selection.SpecialCells(xlCellTypeConstants, 2).Select
With Selection.Font '
.FontStyle = "Bold" 'Negrita
.ColorIndex = 13 'Color violeta
End With
With Selection.Interior '
.ColorIndex = 15 'Fondo Color
End With'Seleccionamos las celdas que contienen Numeros

Selection.SpecialCells(xlCellTypeConstants, 1).Select

With Selection.Font
.FontStyle = "Regular"
.ColorIndex = 5 'azul
End With

'Seleccionamos las celdas que contienen Formulas

Selection.SpecialCells(xlCellTypeFormulas, 23).Select

With Selection.Font
.FontStyle = "bold"
.ColorIndex = 3  'rojo
End With

With Selection.Interior '
.ColorIndex = 8     'Fondo Color celeste
End With

4.- Con esto logramos que los textos tengan un color violeta, los números un color azul y los número un color rojo.

Aquí el archivo excel:

Seleccion_y_formato_texto_numero_y_formula

 

Deja una respuesta

Los campos requeridos estan marcados con *.