其实，使用VBA也能够实现上述功能且更灵活和强大。例如，我们想要限定用户在单元格区域B2:D6中仅能输入数字。在VBE中，双击单元格区域所在的工作表模块，输入下面的代码：

Private Sub Worksheet_Change(ByVal Target As Range)

Dim rng As Range

Application.EnableEvents = False

For Each rng In Target

‘限定程序执行在单元格区域B2:D6

If Not Application.Intersect(rng,Range(“B2:D6”)) Is Nothing Then

‘判断是否为数字

‘如果不是数字则清空

If Not IsNumeric(rng.Value) Then

rng.Value = vbNullString

End If

End If

Next rng

Application.EnableEvents = True

End Sub

这样，在该工作 表单 元格区域B2:D6中，如果输入的是非数字，则会自动清空。并且，这个单元格区域可以输入整数或小数。