Visual Basic - RESTAR VALORES CON MACROS

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

RESTAR VALORES CON MACROS

Publicado por Eduardo (3 intervenciones) el 30/11/2020 13:40:12
Hola muy buenos días
Tengo una una consulta, saben si hay alguna manera de realizar una resta y que muestre el resultado, solamente si se han ingresado o estén escritos los dos valores en las celdas y no antes. imagen

img

Estimados se que a través de la función SI de excel lo puedo llevar acabo con un =SI(C9="";"";SI(B9="";"";B9-C9&" día")) pero requiero encontrar la manera de hacerlo con una macros.

les dejo el código y adjunto el archivo por si me pueden ayudar por favor.

1
2
3
4
5
6
7
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
 
 For i = 2 To Range("B" & Rows.Count).End(xlUp).Row
    Cells(i, "D") = Cells(i, "B") - Cells(i, "C")
 Next
 
End Sub
.

Desde ya muchas gracias por su tiempo y ayuda.
Saludos Cordiales.
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.863
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RESTAR VALORES CON MACROS

Publicado por Andres Leonardo (1759 intervenciones) el 30/11/2020 14:58:20
mira si te sirve....


1
2
3
4
5
if range("C9").value =  "" or range("b9").value =  "" then
             range("Celdadondevalarespuesta").value = ""
else
             range("Celdadondevalarespuesta").value =  range("C9").value - range("b9").value & " día"
end if
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
sin imagen de perfil
Val: 10
Ha aumentado su posición en 11 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RESTAR VALORES CON MACROS

Publicado por Eduardo (3 intervenciones) el 30/11/2020 20:23:47
Andres Leonardo, muchas gracias por la respuesta y tu tiempo.
Hay alguna manera que la respuesta la entregue en cada una de las filas, en este caso en toda la columna D, debido a que son restas entre la columna B y C por separado entregando la respuesta en la columna D.
Saludos
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
Imágen de perfil de Andres Leonardo
Val: 3.863
Oro
Ha mantenido su posición en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RESTAR VALORES CON MACROS

Publicado por Andres Leonardo (1759 intervenciones) el 30/11/2020 23:25:54
1
2
3
4
5
6
7
For i = 2 To Range("B" & Rows.Count).End(xlUp).Row
    if range("C"&i).value =  "" or range("b"&i).value =  "" then
             range("d"&i).value = ""
else
              range("d"&i).value =  range("C"&i).value - range("b"& i).value & " día"
end if
 Next
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
sin imagen de perfil
Val: 10
Ha aumentado su posición en 11 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

RESTAR VALORES CON MACROS

Publicado por Eduardo (3 intervenciones) el 02/12/2020 00:33:26
Andres Leonardo, muchas gracias por tu tiempo.
Funciona a la perfección tu código.

Gracias por todo.
Saludos cordiales
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