用你的代码之后,其它单元格的公式就全部失效了...
我知道 工具 选项 编辑 自动设置小数点 如果设为1，输入20会显示2，但这是针对工作表中所有单元格的,此功能无法用于部分单元格。 。
如何将此功能通过别的方法用于Excel部分单元格？
问题补充 2010-08-31 19:46 或者给个代码,教一下怎用,谢谢啊!区域为E5:L16 问题补充 2010-08-31 22:33 只保留一位小数右键点该工作表的名字（在工作簿左下方），查看代码，粘贴如下代码：
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Line1
If Target.Range("A1").Column >= 5 And Target.Range("A1").Column <= 12 And Target.Range("A1").Row >= 5 And Target.Range("A1").Row <= 16 Then
Application.EnableEvents = False
Target.Range("A1").Value = Target.Range("A1").Value / 10
End If
Line1: Application.EnableEvents = True
End Sub
粗体的5、12代表E和L列，5、16代表5、12行，即在E5:L16这个区域实现你要的。
回到Excel，试试吧。
我的追问 2010-08-31 22:31
不行啊....大哥..我要在这个区域里,自动设置小数点:1
回答人的补充 2010-08-31 22:35你一开始说的功能，就是输入一数字，自动除以10啊。
你按步骤执行，回到Excel，在该区域内任意单元格输入 20，显示2。输入 214，显示21.4。
回答人的补充 2010-08-31 22:39
是这样，你在E5输入 303，自动变成30.3