Microsoft Excel Functions & Formulas

Use a user-defined function to delete all

numbers in specified cells

Similar to the previous tip, this task deletes all numbers in speci-

fied cells. Again, without the help of a user-defined function or a

special macro, this would be a difficult job and take a lot of time. A

more convenient way to perform this task is with a user-defined

function.

4

To delete all numbers in specified cells:

1. Press <Alt+F11> to open the Visual Basic Editor.

2. From the Insert menu, click Module.

3. Type the following function:

Function NumberOut(rng As Range)

Dim i As Integer

Fori=1ToLen(rng)

Select Case Asc (Mid(rng.Value, i, 1))

Case 0 To 64, 123 To 197

Case Else

NumberOut ...