Code:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range
Set rng = Range("C43:E43")
On Error GoTo ws_exit:
If Not Intersect(Target, rng) Is Nothing Then
Application.EnableEvents = False
Target.Value = Target.Value / .50
End If
ws_exit:
Application.EnableEvents = True
End Sub
I've read about decimals and I've tried to do ".50" and "1/ 2" - When I run this code, it just deletes what I have in my cell. PLEASE HELP! I have to do one cell divided by .50 and one divided by .30. I don't really know what I'm doing at all (obviously) but this is code that I used on a cell I needed to multiply by 1.25. I just changed the * to a /.