Ejemplos de With en VBA

La estructura With en Vba nos permite ejecutar un conjunto de instrucciones sin tener que volver a hacer referencia al mismo objeto, esta estructura es entregada con frecuencia por el grabador de macros, la sintaxis de With en VBA es como sigue:

With object
[ Instrucciones ]
End With

De esta forma podríamos emplear esta instrucción como sigue:

Sub WithVBA()
With Cells(1, 1)
.Value = "Hola Excel-Avanzado.com"
.Font.Bold = True
End With
End Sub

Como se puede observar, en este caso se está utilizando With en Vba para lograr que la celda A1 tenga el texto indicado y ese texto se encuentre en negritas.

La siguiente macro sería equivalente al código anteriormente mostrado:

Sub WithenVBA()
Cells(1, 1).Value = "Hola Excel-Avanzado.com"
Cells(1, 1).Font.Bold = True
end sub

Descubra en los siguientes ejemplos una diversidad de ideas de cómo se puede emplear el With en VBA

1. Manipular Formatos en VBA
2. Range.PasteSpecial en VBA
3. 5 ejemplos de macros con With
4. WITH aplicado a definir la situación crediticia de un crédito
5. Generación de Reportes Para Compras de Insumos
6. Uso de With para análisis de inventarios
7. Uso de With para el registro de datos en una orden de trabajo
8. VBA uso de WITH para determinar formato y estado de notas
9. Uso de With para dar formato a celdas con texto, numero y formulas
10. Ejemplo de la Funcion With para la Aprobacion de Creditos
11. Ejemplo de With - Registro de retenciones
12. VBA uso de With aplicado a Descarga de Series de Precios
13. With - Gastos por centro de costo
14. Uso de With para dar formato a un registro de facturas
15. For ...Calcular Puntaje Promotor
16. With en BVA para mostrar alertas sobre el retraso en las tareas programadas
17. Carrera de Caballos: Uso del With y también el For, Do y el While Wend
18. Evaluacion de Status con With
19. Estructura With...End With para determinar el mejor método de pronóstico
20. Función With Formato para presentación de cuadros estadísticos
21. Función With aplicada a una tabla
22. Ejemplo de With aplicado al registro de Horas de Trabajo de Equipos
23. Ejemplo de With aplicado a dar formato a una base de datos de colegios
24. Ejemplo de With aplicado a formato de cabecera de una tabla
25. Ejemplo de With aplicado para formato de notas
26. Ejemplo de With aplicado a dar formato a un registro de promedios finales
27. Ejemplo de With aplicado al ordenamiento y formato de datos
28. Ejemplo de With aplicado al formato de notas y promedio de notas
29. Ejemplo de With-end With aplicado a formato de celdas
30. Función With aplicada a modificar un gráfico
31. Ejemplo de uso de With- end With aplicado a dar Formato a Reportes