protect number format

[pecosvil]

I have a column (A) that can contain wither text or numbers.
I have set the number format to be with four decimals and % (ie. 12 would be 12.0000%).

I want to protect that number format. The column is already protected, but if people copy a number from another column X (say, the copy the number 15) and paste it on A it will show 15, not 15.0000%

I have already disabled cut and paste with a macro, but I would like to leave "copy and paste" available. Any suggestion?

Thanks!!

 

[dscg]

You could use the worksheet change event like so:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Not Application.Intersect(Target, Columns(1)) Is Nothing Then
    Columns(1).NumberFormat = "0.0000%"
End If
Application.EnableEvents = True
End Sub