Изменение всего массива

[RedStorm]

Доброе время суток.
Задача такая: есть массив (буквенных значений) заполнен он не равномерно (есть пустые ячейки) нужно дописать к каждому значению в этом массиве определенное слово (скажем ".x"), так что бы пустые ячейки остались пустыми. как можно это реализовать в экселе?

условие:
1 2
4 5 6

Решение
1.x 2.x
4.x 5.x 6.x

[kuklp]

Sub www()
    Dim c As Range
    For Each c In Selection.SpecialCells(xlCellTypeConstants, 3)
        c = c & ".x"
    Next
End Sub

[RedStorm]

оу, именно то что было нужно! спасибо.