Saltar al contenido

Crear horas en formato texto a formato horas y minutos


Recommended Posts

Buenos días amigos de la comunidad,

Tengo un fichero que extraigo todos los meses de nuestra plataforma de fichajes y es formato csv.

Yo lo convierto a xlsb y genero una tabla para poder explotar los datos.

 

Mi problema como podeis observar es que el campo duración me lo saca en texto 9h 32m, me gustaría poder convertirlos a formato hora para que me aparezca 09:30.  

Subo el fichero

 

Alguien me puede ayudar?

 

Gracias anticipadas. 

Histórico01-01-202131-01-2021 2.csv

Enlace a comentario
Compartir con otras webs

Mira a ver si te vale esta macro. No me deja adjuntar el archivo.

Sub SustituirStrings()
    Dim rHoras As Range, rTabla As Range, rDatos As Range
    Dim sh As Worksheet
    
    Set sh = ActiveSheet
    
    Set rTabla = sh.UsedRange
    
    Set rDatos = rTabla.Offset(1).Resize(rTabla.Rows.Count - 1)
    
    With rDatos
        Set rHoras = Union(.Columns(14), .Columns(15), .Columns(16), .Columns(18), .Columns(19))
        
        With rHoras
            .Replace "h ", ":", xlPart
            .Replace "m", "", xlPart
            
            .NumberFormat = "hh:mm"
        End With
    End With
End Sub

 

Enlace a comentario
Compartir con otras webs

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.