Excel - makro til bevægelse af cursor
I forbindelse med input af data i Excel fra et analyseapparat har jeg brug for en makro der kan dirigere cursorens bevægelse.Jeg har allerede en fungerende makro der flytter cursoren fra fx. B1 til C1 og videre til B2 osv... Men denne tager højde for om der allerede findes data i kolonnerne. Er der nogen der kan hjælpe med en makro der flytter cursoren, men ikke kontrollerer for fyldte felter?
Min nuværende makro er:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B:C")) Is Nothing Then
With Target
If .Column = 2 Then Cells(Rows.Count, .Column).End(xlUp).Offset(0, 1).Select
If .Column = 3 Then Cells(Rows.Count, .Column).End(xlUp).Offset(1, -1).Select
End With
End If
If Not Intersect(Target, Range("D:E")) Is Nothing Then
With Target
If .Column = 4 Then Cells(Rows.Count, .Column).End(xlUp).Offset(0, 1).Select
If .Column = 5 Then Cells(Rows.Count, .Column).End(xlUp).Offset(1, -1).Select
End With
End If
End Sub