Corregir Nombre Propio , Espacios y Formatos con VBA

En este ejemplo la programación en VBA la utilizamos para seleccionar un rango y corregirlo como nombre propio, es decir con la primera palabra en mayúscula y eliminar los espacios.

vbanompropio

En el caso de los espacios entre palabras deja uno sólo y los espacios por la derecha los elimina.

‘Aplicamos función NOMBREPORPIO a la selección
        celda.Value = Application.WorksheetFunction.Proper(celda.Value)
 ‘Aplicamos función ESPACIOS a la selección
        celda.Value = Application.WorksheetFunction.Trim(celda.Value)

También en el ejemplo se corrigen los códigos postales aplicando formato con código VBA, de forma que aparezca con 5 dígitos, si el código aparece como 8023 pasa a ser 08023.

 Selection.NumberFormat = “00000”

Como ejemplo corregimos los códigos de las celdas Range(Cells(2, 7), Cells(26, 7)) recuerda que en el post:

https://exceltrucos.com/2013/04/26/macro-como-conocer-de-una-tabla-la-primera-y-ultima-celdas-rellenas-fila-o-columna/

,puedes conocer como averiguar la última celda rellena de una columna.

Puedes copiar el código y pegarlo en un módulo dentro del editor VBA y ejecutar la macro, obtendremos la corrección de la hoja.

Sub ConviertePropias()

Dim celda As Range
   
   For Each celda In Selection
        ‘Aplicamos función NOMBREPORPIO a la selección
        celda.Value = Application.WorksheetFunction.Proper(celda.Value)
        ‘Aplicamos función ESPACIOS a la selección
        celda.Value = Application.WorksheetFunction.Trim(celda.Value)
    Next
        ‘ A la columna CP de códigos postales le damos formato para que aparzca con 5 dígitos siempre
    Range(Cells(2, 7), Cells(26, 7)).Select
    Selection.NumberFormat = “00000”

End Sub

vbanompropio 2

Anuncios

Un comentario en “Corregir Nombre Propio , Espacios y Formatos con VBA

  1. Pingback: Depurar código VBA en Excel – Ejecutar una macro paso a paso « Excel Trucos

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión / Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión / Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión / Cambiar )

Google+ photo

Estás comentando usando tu cuenta de Google+. Cerrar sesión / Cambiar )

Conectando a %s