Al poner "si" copie y pegue una fecha en otra celda
Hola amigo, tengo una hoja de excel 2007 que controla la entradas de cajas de trailer, en las celdas tengo, FECHA DE ARRIBO, DÍAS TRANSCURRIDOS, ALERTA, SALIO, FECHA DE SALIDA. Al poner la fecha de arribo, automáticamente sale los días transcurridos, en alerta cambia de color al pasar 7 días, lo que quiero es que al poner en la celda de SALIO el texto "si" en la celda FECHA DE SALIDA salga automáticamente la fecha actual y en las celdas DÍAS TRANSCURRIDOS se quede el día grabado y cambie de color esa celda y la celda de ALERTA también cambie de color
Les agradecería mucho su ayuda ya que yo lo intente y no me salio y ya tengo que hacer funcionar esa joa de excel en mi trabajo
Les agradecería mucho su ayuda ya que yo lo intente y no me salio y ya tengo que hacer funcionar esa joa de excel en mi trabajo
1 respuesta
Respuesta de bacter582
1
Como estas amigo, con este código colocado en thisworkbook en el editor de visual basic
Se logra que cada vez que en la columna 3 escribas un "si", en la columna 4 coloca la fecha actual.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = "si" Then
If Target.Column = 3 Then
Target.Offset(0, 1).Value = Now()
End If
End If
End Sub
Se logra que cada vez que en la columna 3 escribas un "si", en la columna 4 coloca la fecha actual.
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Value = "si" Then
If Target.Column = 3 Then
Target.Offset(0, 1).Value = Now()
End If
End If
End Sub
