Repeat formula
Solved/Closed
Related:
- Repeat formula
- 1st, 2nd, 3rd position formula in excel ✓ - Office Software Forum
- Logitech formula vibration feedback wheel driver - Download - Drivers
- Number to words in excel formula - Guide
- Credit summation formula - Guide
- Position formula in excel - Excel Forum
1 reply
rizvisa1
Posts
4479
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
767
Mar 17, 2010 at 04:42 PM
Mar 17, 2010 at 04:42 PM
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column <> 1 then exit sub
myrow = target.row
if myrow>446 then exit sub
Application.EnableEvents = False
if (target.value >=40) then
cells(myrow+2, "A").select
else
cells(myrow+1, "A").select
End If
Application.EnableEvents = true
End Sub
If Target.Column <> 1 then exit sub
myrow = target.row
if myrow>446 then exit sub
Application.EnableEvents = False
if (target.value >=40) then
cells(myrow+2, "A").select
else
cells(myrow+1, "A").select
End If
Application.EnableEvents = true
End Sub
Mar 17, 2010 at 08:16 PM