Para dante cursor que al llegar al final se posicione en la celda de abajo
Hola dante ahí te mando el archivo dan 7 para agregar que cuando llegue a la columna cotización baje una fila y se posicione en la columna A gracias
1 Respuesta
Respuesta de Dante Amor
1
El código completo es este:
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Range("C3:C4")) Is Nothing Then
totales
End If
'
If Not Intersect(Target, Range("E:E")) Is Nothing Then
If Target.Row > 13 Then
Cells(Target.Row, "G") = Cells(Target.Row, "D") * Cells(Target.Row, "E") * -1
End If
End If
'
If Not Intersect(Target, Range("B:E")) Is Nothing Then
If Target.Row > 13 Then
Target.Offset(0, 1).Select
End If
End If
'
If Not Intersect(Target, Range("E:E")) Is Nothing Then
If Target.Row > 13 Then
Cells(Target.Row + 1, "A").Select
End If
End If
End SubAgregué esta parte para que baje a la columna A
If Not Intersect(Target, Range("E:E")) Is Nothing Then
If Target.Row > 13 Then
Cells(Target.Row + 1, "A").Select
End If
End If
