Excel Avanzado

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

Excel Avanzado

Ejemplo de With aplicado al formato de notas y promedio de notas

| 0 comments

La función With nos permite poder hacer una variedad de modificaciones, ya sea para las celdas, formatos, imágenes, etc. El objetivo de ésta función es minimizar el trabajo de copiar el mismo texto (para las modificaciones) una y otra vez, por ejemplo, para la aplicación del with al formato de notas y promedio de notas hacemos lo siguiente:

En lugar de copiar:

Sub seleccionycambio()
Selection.Font.Name = “verdana”
Selection.Font.FontStyle = “bold italic”
Selection.Font.Size = 16
Selection.Font.Underline = xlSingle
Selection.Font.ColorIndex = 14
End Sub

Se busca ahorrar todo el trabajo de copiar repetidamente (en éste caso) “Selection.Font” y se coloca:

Sub seleccionycambio()
With Selection.Font
.Name = “verdana”
.FontStyle = “bold italic”
.Size = 16
.Underline = xlSingle
.ColorIndex = 14
End With
End Sub

Además, poniendo un número determinado de notas, nuestra tabla halla el promedio de las notas y nos envía un mensaje donde muestra el promedio total de las notas.

Excel avanzado-Ejemplo de With

Elaborado por: Cinthya Pando

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5