View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.misc
Mark Mark is offline
external usenet poster
 
Posts: 989
Default Plus or minus help

In my formula I would like:

column M4:M100 to be the +/- of the numbers down I4:I100
Column N4:N100 to be the +/- of the numbers down J4:J100
Column O4:O100 to be the +/- of the numbers down K4:K100

Is this formula or code?

Can u help.

If it is formula ok.. If it is code, where doe s it fit in this?

Private Sub Worksheet_Change(ByVal Target As Range)
Const WS_RANGE As String = "B4:B100, H4:H100"


On Error GoTo ws_exit:
Application.EnableEvents = False
If Intersect(Target, Me.Range(WS_RANGE)) Is Nothing Or _
IsEmpty(Target) Or _
Not IsNumeric(Target) Then
GoTo ws_exit
End If
If MsgBox("Use the new value " & Target & _
" as new Daily Entry?", vbYesNo + vbDefaultButton1 _
+ vbInformation, "Verify Entry") < vbYes Then

GoTo ws_exit


End If

Target.Resize(1, 3).Copy Target.Offset(0, 1)
Target.Clear


ws_exit:
Application.EnableEvents = True
End Sub


THANKS mark