Seguimos con las estructuras de control ya que el capitulo anterior era bastante extenso en el que vimos las diferentes formas de usar If's y la estructura Select Case así como el anidamiento. Estructura End … End With Esta estructura se usa casi siempre para no tener que repetir tantas veces el nombre de objetos cuando hacemos referencia a sus propiedades y así simplificamos su código. La estructura tiene el siguiente aspecto: With objeto . instrucciones ….. End With Veamos un ejemplo: Queremos que las lineas 1 a 3 de nuestra hoja tengan el texto en negrita de tipo Comic Sans MS, tamaño de letra 14 puntos, color de letra rojo Si no usáramos esto las ordenes serían: Sub Procedimiento() Range("1:3").Font.bold= True Range("1:3").Font. Name="Comic Sans MS" Range("1:3").Font.Size=14 Range("1:3").Font.Color = vbRed End Sub Pero si usamos el With podemos hacer lo siguiente: ...