I'm using a old computer with 2000 will this work with that? Gov computers
pfft ;)

"Gord Dibben" wrote:

You cannot format a cell to divide and entered number by 12

You can use a helper cell with a formula =A1/12 in B1 or event code to
divide when you enter the number.

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Me.Range("A1:A10")) Is Nothing Then Exit Sub
On Error GoTo CleanUp
Application.EnableEvents = False
With Target
If IsNumeric(.Value) Then
.Value = .Value / 12
End If
End With
CleanUp:
Application.EnableEvents = True
End Sub

This is sheet event code. Right-click on the sheet tab and "View Code"

Copy/paste into that module.

Edit the range to suit then Alt + q to return to the Excel window.


Gord Dibben MS Excel MVP

On Fri, 17 Oct 2008 14:51:00 -0700, Jrmy wrote:

I'm trying to format or use a formula that when i put a value in a cell to
divide by 12.