Ejemplos de Macros

*Ejemplo 1:


Macro para cambiar todo el texto en un rango a mayúsculas:


        Sub mayúsculas ()   
             'Bucle para recorrer cada celda en el rango especificado.   
              Para cada x de Range ("A1: A5")      
                   "Cambiar el texto en el rango de letras mayúsculas.  
           x.Value = UCase (x.value)
   próximo
 End Sub




*Ejemplo 2:


Macro para cambiar todo el texto en un rango de letras en minúscula




Minúsculas () Sub   
    'Bucle para recorrer cada celda en el rango especificado.   
     Para cada x de Range ("B1: B5")    
         x.Value = LCase (x.Value)   
  próximo
End Sub




*Ejemplo 3:


Macro para cambiar todo el texto en un rango de celdas a mayúsculas
iniciales


Sub Proper_Case () 
    'Bucle para recorrer cada celda en el rango especificado.   
    Para cada x de Range ("C1: C5")      
"No hay un funcionamiento correcto en Visual Basic para Aplicaciones.      
   "Por lo tanto, debe utilizar la función de hoja de cálculo en la forma
siguiente:      
      x.Value = Application.Proper (x.Value)   
  próximo
End Sub




* Estos son ejemplos de macros en VBA


OTROS EJEMPLOS: