这个表格的C4,C8,C12,C16,E4,E8,E12,E16需要输入数字自动添加两位的小数点，比如3→0.03，45→0.45。
C5,C6,E5,C9,C10,E9,C13,C14,E13,C17,C18,E17需要输入数字自动添加四位小数点，比如4→0.0004，12345→1.2345。
这两种单元格都定义了名称jj（C4,C8,C12,C16,E4,E8,E12,E16），ss（C5,C6,E5,C9,C10,E9,C13,C14,E13,C17,C18,E17）。
找到一些函数，奈何学的东西都还给了大佬，抄作业都抄不了。。。
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
For Each c In Target.Cells
With c
If .Column > 1 And .Column < 4 And .Row > 1 And .Row < 11 Then .Value = .Value / 100
End With
Next c
Application.EnableEvents = True
End Sub
蹲大佬们，非常感谢。
明细.zip
(16.39 KB, 下载次数: 30)
|
