Visual Basic - macro da valor a una celda dependiendo de la hora de otra celda

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 1
Ha aumentado su posición en 2 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

macro da valor a una celda dependiendo de la hora de otra celda

Publicado por josue (4 intervenciones) el 30/08/2018 17:25:43
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub tiempos()
Set datos = Range("g1").CurrentRegion
With datos
    r = .Rows.Count
    For i = 1 To r
        tiempo = Second(.Cells(i, 1))
        If tiempo <= 10 Then numero = 1
        If tiempo >= 11 And tiempo <= 30 Then numero = 2
        If tiempo > 30 Then numero = 3
        .Cells(i, 3) = numero
    Next i
End With
Set datos = Nothing
End Sub


este es el codigo


usa el conteido de la columna g y muetras el valor 1,2 o 3 dependiendo de los segundos de la celdas en G
el problema es que solo toma el ultimo nunero por ejemplo 00:01:50 seria 3 y 00:01:20 tambien pero me indica 2 cuando deberia ser 3 porque esta tomando el 20 y no el 01:20 que puedo hacer? gracias de ante mano por la respueta
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: 3.785
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

macro da valor a una celda dependiendo de la hora de otra celda

Publicado por Andres Leonardo (1557 intervenciones) el 30/08/2018 18:57:01
Puedes hacerlo con formula
pero en la macro dices una cosa y en texto otra ....


l problema es que solo toma el ultimo nunero por ejemplo 00:01:50 seria 3 y 00:01:20 tambien pero me indica 2 cuando deberia ser 3 porque esta tomando el 20 y no el 01:20 que puedo hacer? gracias de ante mano por la respueta

1
2
3
4
5
If tiempo <= 10 Then numero = 1
'si le dices 20 va a ser 2 no 3 como dices en el textyo
If tiempo >= 11 And tiempo <= 30 Then numero = 2
'si es 50 es correcto que sea  3 
If tiempo > 30 Then numero = 3
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

macro da valor a una celda dependiendo de la hora de otra celda

Publicado por josue (4 intervenciones) el 30/08/2018 20:42:50
ya pude resolver el problema gracias, hice una conversión de tiempo y realiza bien la operación
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