Visual Basic - validar datos de coordenadas quitando signos extraños

Life is soft - evento anual de software empresarial
 
Vista:
Imágen de perfil de ivan
Val: 16
Ha aumentado 1 puesto en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

validar datos de coordenadas quitando signos extraños

Publicado por ivan (5 intervenciones) el 11/03/2020 22:08:10
Hola estoy validando datos de coordenadas y el formato ideal es el siguiente:
30 37 58.52
30 35 58.52
30 48 41.15
30 1 6.36
30 2 12.41

les aplico formula (
1
=EXTRAE(H2,1,ENCONTRAR(" ",H2,2)-1)+EXTRAE(H2,ENCONTRAR
) :

Pero puedo tener datos asi

30° 37' 58.52"
30° 35° 58.52°
30. 48. 41.15'
30° 1' 6.36"
30° 2' 12.41"

aplico las siguientes instrucciones:

1
2
3
4
5
6
7
8
9
10
11
12
Selection.Replace What:="°", Replacement:=" ", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.Replace What:="'", Replacement:=" ", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.Replace What:="""", Replacement:=" ", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
    Selection.Replace What:=".", Replacement:="", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False

lo malo que el punto decimal si lo requiero en los últimos números y se pueden presentar a la izquierda o derecha de la cadena entonces las instrucciones de remplazar punto por espacio no me funciona tendría que remplazarlo solo si esta después del primer par de datos o después del segundo par de datos 30. 37. 58.52 y que me respete el punto antes del último par de números 30 37 58.52.

Espero no ser muy redundante y que se pueda solucionar
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Andres Leonardo
Val: 4.017
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

validar datos de coordenadas quitando signos extraños

Publicado por Andres Leonardo (1672 intervenciones) el 12/03/2020 15:04:29
Primero Separa los valores en celdas diferentes y luego haces el replace a las que necesites..

SAludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar
Imágen de perfil de ivan
Val: 16
Ha aumentado 1 puesto en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

validar datos de coordenadas quitando signos extraños

Publicado por ivan (5 intervenciones) el 13/03/2020 17:20:41
Gracias! lo pude solucionar como me comentaste
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar