One cell incorporating offset in existing sub

[handric]

Hi,

I need to incorporate this one offset in code bellow. It is marked bold.
The issue is after the page on worksheet is done with input data cell K55, active cell goes to F56.
If it is possible I need to move it to next page in sheet, and then continue data input according to sub.






Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
With Target

'declare condition to exit sub: single cell + value>0

If .Count > 1 Then Exit Sub
If Not IsNumeric(Target) Then Exit Sub
If .Value <= 0 Then Exit Sub
If .Row > 150 Then Exit Sub
' If do not want trigger change from row n (i.e, from row 10).
'If .Count > 1 Or Not IsNumeric(Target) Or .Value <= 0 Or .Row > 10 Then Exit Sub

Select Case .Column
Case 7, 9 'column F or H
.Offset(0, 2).Select
Case 11 'column I
.Offset(1, -4).Select
Case Else

Exit Sub
End Select


End With

' On error resolving type mismatch error 13

' If Range("K55").Value > 0 Then Range("F56").Offset(13, 1).Select


End Sub

 

[handric]

Hi all.

Can you please help . I need to move from cell F56 BEFORE NEXT SET OF MEASUREMENTS.
The cell F56 is the last active cell where I am after finishing first set of measurements.


I tried this : If Range("K55").Value > 0 Then Range("F56").Offset(13, 1).Select based of the last entered value K55

but this dont work.

Please help.





Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
With Target

'declare condition to exit sub: single cell + value>0

If .Count > 1 Then Exit Sub
If Not IsNumeric(Target) Then Exit Sub
If .Value <= 0 Then Exit Sub
If .Row > 150 Then Exit Sub
' If do not want trigger change from row n (i.e, from row 10).
'If .Count > 1 Or Not IsNumeric(Target) Or .Value <= 0 Or .Row > 10 Then Exit Sub

Select Case .Column
Case 7, 9 'column F or H
.Offset(0, 2).Select
Case 11 'column I
.Offset(1, -4).Select
Case Else

Exit Sub
End Select


End With

 

[Joe4]

Duplicate to: Including cell offset into known parameters.

In future, please do not post the same question multiple times. Per Forum Rules (#12), posts of a duplicate nature will be locked or deleted.

In relation to your question here, I have closed this thread so please continue in the linked thread. If you do not receive a response, you can "bump" it by replying to it yourself, though we advise you to wait 24 hours before doing so, and not to bump a thread more than once a day.