Конференция VBStreets

**alex77777** » 29.12.2004 (Ср) 10:48

Здравствуйте!

Существует столбец в Excell с Фамилиями пример:

12Иванов
33Петров

Вопрос: Как убрать цифры !???

**Чудик** » 29.12.2004 (Ср) 11:09

Перед фамилией всегда будет две цифры?

**Tuco** » 29.12.2004 (Ср) 11:13

Код: Выделить всё: dim a as string a="12Иванов" 'или значение нужной ячейки mid(a, 1, 2)=" " trim(a)

Работает, только если перед фамилией две цифры

**alibek** » 29.12.2004 (Ср) 11:13

Как убрать цифры?
Выделяешь нужный столбец, выполняешь команду меню "Найти и заменить". В поле "Искать" вводишь "0", поле "Заменить" оставляешь пустым. Нажимаешь "Заменить все". Повторяешь еще 9 раз.

**alex77777** » 29.12.2004 (Ср) 11:24

да перед Фамилией всегда будут две цифры.

**Чудик** » 29.12.2004 (Ср) 11:30

Тогда Tuco указал верно, только из константы "а" сделай переменную, куда будут автоматически поочередно подставляться все значения из нужного столбца.

**Tuco** » 29.12.2004 (Ср) 11:42

а - и есть переменная, это я для примера сразу поставил конкретное значение. В идеале нужно запустить цикл, который пройдёт по колонке и всё переделает...

**alex77777** » 29.12.2004 (Ср) 12:17

а можно пример ?

**GSerg** » 29.12.2004 (Ср) 12:21

dim c as range
for each c in columns("A").cells
c.value=mid(c.value,3) 'именно variant-версия, поскольку value variant.
next

А можно просто формулой...
=ПРАВСИМВ(A1, ДЛСТР(A1)-2)

Конференция VBStreets

как удалить в столбце

как удалить в столбце

Кто сейчас на конференции