Negative entry
Hi,
Not with a format because that will make the number look negative when in
fact it would not change the underlying value. This may help. Right click the
sheet tab, view code and paste this in:-
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Cells.Count 1 Or IsEmpty(Target) Then Exit Sub
If Not Intersect(Target, Range("A1:B10")) Is Nothing Then ' Change to suit
If IsNumeric(Target) Then
Application.EnableEvents = False
Target.Value = Target.Value * -1
Application.EnableEvents = True
End If
End If
End Sub
Mike
"GeeTee" wrote:
Can I format cells so that any number entered into it is shown as negative
automatically ie not having to make the entry with a minus sign
Thanks
|