请问怎么实现在指定单元格输入整数,自动添加小数点
这个表格的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
蹲大佬们,非常感谢。
页:
[1]