Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Работа с MS Office > как найти символ * в Exel

Автор: DEER 27.7.2005, 13:50

Господа, попросили меня поудалять из некоей книги Exel все символы * в заданном столбце...
Поиском и заменой это не удалось сделать, т.к. этот поиск понимает под * любой символ....
Не подскажите, может есть какой служебный сивол, или код какой нить, который обозначает *???

Вручную сдохну всё там удалять - 3000 строк.. smile

Автор: likhobory 27.7.2005, 13:57

Код


Worksheets("Sheet1").Columns("A").Replace What:="*", Replacement:="!",  _
 LookAt:=xlPart, SearchOrder:=xlByColumns

Автор: DEER 27.7.2005, 14:00

Цитата(likhobory @ 27.7.2005, 13:57)

Код


Worksheets("Sheet1")

это название страницы?
Добавлено @ 14:05
не пошло, он мне весь столбец в ! переделал
Добавлено @ 14:07
А в ячейках не только * написаны, там ещё и цыфорки есть типа так

Цитата

P035_14**
P035_1490

вот надо от этих * и избавиться

Автор: polosatij 27.7.2005, 14:35

Цитата(DEER @ 27.7.2005, 13:50)

В Excel-е есть "импорт".. можешь свою базу данных сохранить как *.txt..
потом открываешь Notepad-ом.. и говоришь "replase".. затем назад импортируешь..
всё дело 2-ух минут.. smile

Автор: likhobory 27.7.2005, 16:26

Код


Dim cc  As Range
For Each cc In Worksheets(1).Range("A1:A100").Cells
 cc = Replace(cc, "*", vbNullString)
Next

Автор: Гость_pashulka 27.7.2005, 18:12

1. Выделяем нужный столбец или любой другой диапазон ячеек (при этом мы можем выделить даже несмежные ячейки)
2. В меню Правка выбираем команду Заменить (CTRL+H)
3. В появившемся стандартном диалоговом окне, в поле Что : вводим ~* и нажимаем на кнопку Заменить все

Автор: DEER 28.7.2005, 11:13

Большое спасибо господа