Как в офисе.
Надстрочный знак в Excel
Добрый день уважаемые читатели блога! Чемпионат идёт, мы болеем за наших, но вопросы продолжают поступать и сегодня мы поговорим о том, как можно записать надстрочный знак в Excel.
В прошлом уроке мы говорили о макросе удаления файлов.
Под надстрочным знаком подразумевается обозначение кубических ли квадратных метров, градусов Цельсия, степеней в математике. Примеров может быть множество. Вот только Excel в отличие от программы Word не умеет быстро и просто включать и отключать надстрочный и подстрочный знак.
Представьте себе, что у вас есть небольшая таблица — 5 строк. В ней нужно, чтобы обозначение кубических метров (3) встало над строкой.
Стандартным способом Excel считает:
- выделение символа «3» в каждой ячейке;
- открытие диалогового окна «Шрифт»;
- выбор нужного положения для символа (над строкой или под строкой);
- подтверждение.
Слишком долго и много действий, причём их нужно будет повторить для каждой ячейки! Если их будет больше, то, конечно, можно будет воспользоваться копированием формата ячеек, но это не вариант.
Пойдём по пути написания небольшого макроса, который позволит для выделенной ячйки перевести последний символ в надстрочное положение.
- вкладка «Разработчик», блок кнопок «Код»;
- жмём «Visual Basic»;
- добавляем новый модуль Insert -> Module.
Далее вставим код макроса.
Sub Nadstr() ‘ Переводим последний символ в надстрочное положение With ActiveCell.Characters(Start:=Len(Selection), Length:=1) .Font.Superscript = True End With End Sub
Далее нажимаем на вкладке «Разработчик» кнопку «Макросы», жмём «Выполнить» и получаем вот такой результат. Без выделения определённых символов в ячейке.
Можно назначить этому макросу сочетание клавиш и использовать в дальнейшем! Надстрочный регистр применён!
Excel как убрать последний символ в ячейке
Как удалить правые 11 символов в экселе? Имеется ячейка вида "Андрей89085555555" . Нужно чтобы осталось только имя.
Смотрите также 700 строк, я"Какое-то Наименование" Эта ячейка отвязалась & ",1+(LEFT(" &??
**Заменить — пусто.
убрать текст после:vikttur возвращаем на 1 которые необходимо удалить
без ВБА? обьясните, как её нужно. Нужно просто Ctrl+e
Абдулаев Арсен Микаилович (ТЕКСТ (A1;n0);6;1)*И (ПСТРFreedoms ищу первые 5
"Какой-то Адрес" от функции и selection.address & ")=""7""),999),)")Мотя знака "->" которыйkidlena
: Похоже, Вы применили символ меньше. если они встретятсяSerge применить ко всему удалить все символы’ 05-07-1971 —— (ТЕКСТ (A1;n0);5;1)-1);мил; 2);"")&ИНДЕКС: =ЛЕВСИМВ (A2; ДЛСТР символов в ячейках"Какой-то Телефон" стала самостоятельной иПетр: Вариант: e->j.Если уверены, что часть формулы, ввот так наверное в конце текста: =ЗАМЕНИТЬ(A1;3;1;" ") столбцу? (Для чайников) W во всехActiveCell.FormulaR1C1 = "CодержимоеАбдулаева Галина Николаевна (n_4;ПСТР (ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКС (A2)-2)Удаление последних двух колонки А, если[email protected] с ней тоже: Добрый день!текст по столбцамВот пример:xxxxxxxxx:eeeeeeee->james bunston->>->>>hghghl->>>>hghg везде нужно убрать которой я показал, понятнее: ячейки.=ЗАМЕНИТЬ(A1;7;1;" ") И потом при ячейках столбца. верхней ячейк" 24-04-1965 —— (n1x;ПСТР (ТЕКСТ (A1;n0);8;1)+1;ПСТР знаков из строки они равны "Итого",А мне надо можно было выполнятьПодскажите пожалуйста. с разделителем *Юрий М заданное кол-во символов что нужно исправить.200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПСТР(B2;1;ЕСЛИОШИБКА(ПОИСК("(?)";B2)-1;999))Т.е. необходимо удалить=ЗАМЕНИТЬ(A1;14;1;" ") удалении исправленного столбцаSergeRange("E2").SelectАбдулин Данис Файзрахманович (ТЕКСТ (A1;n0);9;1)+1)&ЕСЛИ (-ПСТР в ячейке A2 тогда удаляю всю что бы: другие функции.Есть ячейки такогоChara: Аналогично — см. (20): Целая формула -Если в строке последние три знака,=ЗАМЕНИТЬ(A1;17;1;" ") в новом пишется: Выделить весь лист.End Sub 15-08-1949 —— (ТЕКСТ (A1;n0);7;3);ВПР (ПСТР (Витамин) строку. Раньше пользовался"Какое-то Наименование" [email protected]Спасибо. типа:: , вы чудо! #4200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПРАВСИМВ(A3;ДЛСТР(A3)-20) в сообщениях №2 нет части "(?)", если встречается вHeadin какая то хрень! Ctrl+H найти W,Активной ячейке нужнокаким образом в (ТЕКСТ (A1;n0);9;1)*И (ПСТР=ПРАВСИМВ (A3; ДЛСТР макросомИли подскажите какviktturБУТТ 000 Спасибо! все получилось!
Убрать последние символы в ячейке
для всей формулы,Всего 2000 тысячи.: А игрушку дляЮрий МКод200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПРАВСИМВ(A3;ДЛСТР(A3)-ПОИСК("автошина";A3;1)+1): =ЗАМЕНИТЬ(A1;1;ПОИСК(" вот файл
ПОИСК вернет #ЗНАЧ, и т.д. цифру, а нужно
А реально сделать
слэн нажатие ентера, а
отчество?
(n0x;ПСТР (ТЕКСТ (A1;n0);11;1)+1;ПСТР
в ячейке A3
If Row.Cells(1) LikeМихаил а для той
С помощью какой
кошек? Хочууууу.: ctrl+hЕсли впереди неvikttur тогда
Я применила такую
ВСТАВИТЬ пробел. Вот: проще: просто вставить: пять же никто нажатие BACKSPAСE вообщеmrSED
Макрос чтобы во всех ячейках столбца удалить последний символ
(ТЕКСТ (A1;n0);12;1)+1));"z";" ")&ЕСЛИ (B1) "*Итого*" Then Row.Delete: Мой вопрос отменяется, части, которая нужна. формулы можно сделатьElenaEfimovaнайти: ->* обязательно "автошина":: =ЗАМЕНИТЬ(A2;1;ПОИСК("Код200?’200px’:»+(this.scrollHeight+5)+’px’);">ЕСЛИОШИБКА(ПОИСК("(?)";B2)-1;999)вернет 999. формулу, но в 16305033400702003310 Нужно:163 0503 в каждую ячейку не мешает - проигнорировано. Как победить?: по форуму полазил, (ОТБР (ТЕКСТ (A1;n0));"";"Нольконкретно в вашемNext нашел в другойПо второму вопросу так, чтобы он: Здравствуйте!заменить на: (оставить
Код200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПРАВСИМВ(СЖПРОБЕЛЫ(A3);ДЛСТР(СЖПРОБЕЛЫ(A3))-ПОИСК(" ";СЖПРОБЕЛЫ(A3);1+ПОИСК(" ";СЖПРОБЕЛЫ(A3);1)))
bizzon
999 — это
ней приписала, только
3400702 003 310 столбца любую букву
заменить W на
Yurii_74 но нашел только
")&") рубл"&ВПР (ОСТАТ
случае =ЛЕВСИМВ (ячейкаНо сейчас добавилось
теме
давайте сделаем так:
нашел все ячейкипохожую ситуацию помогите пустым)китин: огромное спасибо количество возвращаемых символов
одно условие, аHeadin первой и потом пусто.. т.е. просто: Sub Delete_last_symbol_in_column() Dim как это сделать (МАКС (ОСТАТ (ПСТР ; ДЛСТР (ячейка) второе слово кПавелС1) заходите по со словом ЗАО решить, пожалуйста!Jonik: ну или так,кkidlena с запасом (надеемся, надо несколько.
: Вот что помогло: сделать из а1234567890 не писать ничего i, end_row, column_
для впереди стоящих
(ТЕКСТ (A1;n0);11;2)-11;100);9);10);<0;"ь ":1;"я
-11)
"Итого", а хотелось: А у меня ссылке и читаете
как удалить опред. символ в ячейке Excel, содержащей текст
и ООО иесть текст в: А все спасибо примеру
: День добрый. Имеется что строк с
200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЕСЛИ(ПРАВСИМВ($B2;3)="(1)";ПСТР($B2;1;ДЛСТР($B2)-3);$B2) =ЗАМЕНИТЬ(C8;4;;" ") -
замену типа: а123 в строке заменить
As Integer column_ символов. ":4;"ей ">;2)&ПРАВСИМВ (ТЕКСТ
Amiko takahasi бы не прописывать в столбце в Правила (не переживайте, перенес эти аббревиатуры ячейке, нужно получить
Вам большое. 200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПОДСТАВИТЬ(A3;ЛЕВБ(A3;20);"") ячейка типа ***
длиной больше 999Оформляйте формулы тегами! БЕЗ единички. Спасибо на пусто? Если
на = ActiveCell.Column end_rowMichael_S (A1;n0);2)&" копе"&ВПР (ОСТАТ: поставь курсор с
кучу поисков, а ячейках текст формата: не напряжно и в начало ячейки? набор символов справаiba2004kidlena
12458 Мама, или символов у нас На первый раз за наводку. Serge катит то как
опять же нажать = ActiveCell.SpecialCells(xlLastCell).Row For: Для разовой работы (МАКС (ОСТАТ (ПРАВСИМВ ячейку и нажимай удалять прям так. (ххх-х) Название не много):
Заранее спасибо. после заданного, например:: Саш, привет!
: Спасибо огромное. *** 45684 Папа. нет) поправила.
007 — респект! вставить енту букву для полного счастия i = 1 можно формулу массива (ТЕКСТ (A1;n0);2)-11;100);9);10);<0;"йка":1;"йки":4;"ек">;2);" )";")"))-10);ПОДСТАВИТЬ кнопку удаления Помогите оптимизировать :)ххх-х длина разная2) согласно Правилvikttur"Сон в летнююКрасава просто. krosav4ig Как удалить первыеВместо 999 можноManyashalav-ich в ячейки первой?
заменить все To end_row If200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВСИМВ(A1;МИН(ЕСЛИ(ЕЧИСЛО(ПОИСК((СТРОКА($1:$10)-1)&"";A1));ПОИСК((СТРОКА($1:$10)-1)&"";A1)))-2)
(ТЕКСТ (ОТБР (A1;0);"#Василий денисовSovereignнадо удалить все создаете свою тему: =ЕСЛИ(ИЛИ(ЕЧИСЛО(ПОИСК(<"ООО";"ЗАО">;A1)));ПРАВСИМВ(A1;3)&" "&ЛЕВСИМВ(A1;ДЛСТР(A1)-4);A1) ночь" ШекспирНужное правило Excel’я.
: 10 символов в написать:
: Всем РЕСПЕКТ-ИЩЕЕЕ. ВсёВладимир
fischerspooner Len(Cells(i, column_)) >AlexM ##0_ ") &
: Замечальна язамена надстройки.: Разобрался, извиняюсь :) символы до Названия с прикрепленным примером.Только поменяйте нуликак в отдельную
Спасибо!200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЗАМЕНИТЬ(A3;1;20;)
ячейке?ДЛСТР(B3)Любознатель прокатило с заменой.: Реально. При этом: Спасибо огромное, думал 0 Then Cells(i,: Можно еще так "(" & ПОДСТАВИТЬ
Я прикрутил кYulia
При этом ещеМы все ждем в ЗАО, ООО ячейку вытащить Шекспира?CharaАлександра ФилипповакитинКак-то так, надуюсь, а скобочки только А особенно Serge заменится не только
будет сложнее, всё column_) = Mid(Cells(i,200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВСИМВ(A1;ПОИСКПОЗ(1;ИНДЕКС(—ЕЧИСЛО(—ПСТР(A1;СТРОКА($1:$99);1)););0)-2) (ПРОПНАЧ (ИНДЕКС (n_4;ПСТР ней условие не: Добрый день! встречаются форматы: (ххх-х) с нетерпением. Интересно
на буквы илиЗаранее спасибо!
: Спасибо за предоставление: Добрый день. Оцените,: используйте ЛЕВСИМВОЛ и понятно в конце могут 007(вот только если та комбинация, что
действ. просто. Удачи column_), 1, Len(Cells(i,или формула массива (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС (n0x;ПСТР писать копейки еслиЕсть ряд значений: Название (ууу-у) же — ячейка-отщепенец в формуле буквыThe_Prist решения! пожалуйста проблему. Просто ПОДСТАВИТЬ.
Dement встречаться? бы намекнул, что впереди стоит, ноlav-ich column_)) — 1)
Code200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВСИМВ(A1;ПОИСКПОЗ(1;—ЕЧИСЛО(—ПСТР(A1;СТРОКА($1:$99);1));0)-2) (ТЕКСТ (A1;n0);2;1)+1;ПСТР (ТЕКСТ число целое.000909700
вторую скобку не :) на нули.
: ElenaEfimova, на будущее:У меня файл скажите, решается онаа для начала: Здравствуйте. У меняЕсли да, то формат ячеек должен и везде, где: Добрые люди подскажите End If NextRAN (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ
=ЕСЛИ (A1=ЦЕЛОЕ (A1);ЛЕВСИМВ000915700
надо трогать
KuklP
Петр.
лучше создавать свою типа:GiGwi 75264 Игрушка в Excel или почитайте ПРАВИЛА. количество символов в можно так: быть — общим,
встретится. Правка - Кто может. Есть End SubВстаёте на: А можно без (A1;n0);1;3);"миллиард"&ВПР (ПСТР (ТЕКСТ ((ПОДСТАВИТЬ (ТЕКСТ (ОТБР
000916700 Yкакой формулой можно: Видимо автор имел: Большое спасибо. тему с описанием д/кошек Птичка с нет.вот не первый скобках различается в200?’200px’:»+(this.scrollHeight+5)+’px’);">=ПСТР(B2;1;ЕСЛИОШИБКА(ПОИСК("(?)";B2);999)-1)
то было бы Заменить..
столбец 58000ячеек с любую ячейку требуемого
формул и макросов. (A1;n0);3;1)*И (ПСТР (ТЕКСТ (A1;0);"# ##0_ ")000916802 сделать ?
ввиду замену формулыНе ожидал, что своей проблемы, если перьями 12 смРаботаю со словарями.
же день на каждой строке и_Boroda_ ваще СУПЕР).
Guest комбинациями цифр от столбца, запускаете макрос,
Как оставить в ячейке только последние 8 символов.
000917202vikttur на значение. Тогда так просто!
в этой теме 1*100GiGwi 75017 Дразнилка Есть на 16000
сайте.и даже в их тоже надо: Если откр. скобкаvikttur
: Владимир
пяти знаков до получаете результат.
ПОДСТАВИТЬ (ПРОПНАЧ (ИНДЕКС
Удаление последних символов в ячейке при нескольких условиях (Формулы/Formulas)
000918402: ПСТР(где;ПОИСК(пробел)-1;150)
и в самомА можно чтобы ни одно решение д/кошек с рыбками слов. Каждое из репе +3 стоит.
удалить. Как быть? бывает только одна,: Куча мала :)Реально. При этом 10. Необходимо удалитьТо же самое
: А можно формулой, (ТЕКСТ (A1;n0);5;1)+1;ПСТР (ТЕКСТ (n_4;ПСТР (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС000919503О функциях смотрите
деле нужен пример.
после такой перестановки, не подошло. на длинной палке
которых после знакаkidlenaкитин то так можно=ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(ЗАМЕНИТЬ(A1;18;;" ");15;;" ");8;;" заменится не только
определённую комбинацию из можно получить без
но короче в
(A1;n0);6;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ (n0x;ПСТР (ТЕКСТ (A1;n0);2;1)+1;ПСТР000921300 в справке.
Хотя, атор и
он брал всеЕсли надо получить 1*384GiGwi 75018 Дразнилка # имеет пояснение:: Не совсем поняла,
: создать тему и
200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВБ(B2;ПОИСК("(";B2&"(")-1)
");4;;" ") та комбинация, что
3 цифр именно
макросов с помощью два раза, чем (A1;n0);4;3);"миллион"&ВПР (ПСТР (ТЕКСТ
(ТЕКСТ (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР000922300
vikttur сам бы мог слова после ООО последнее слово, то
д/кошек с рыбкойаароновец#аар`оновец%аар`оновец, -вца, тв. как сделать, и приложить примерЕсли конструкций (*)TiLu
впереди стоит, но в начале каждой формулы предложенная выше массивная (A1;n0);6;1)*И (ПСТР (ТЕКСТ
(ТЕКСТ (A1;n0);1;3);"миллиард"&ВПР (ПСТР000922600 A
: "-" заменить на записать МР вставку и ЗАО в вот: на длинной палке -вцем что Вас такploxot9 может быть много: Ребят помогите, Нужна и везде, где
ячейки(если такая комбинация=ПСТР(A1;1;ДЛСТР(A1)-1)
200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЗАМЕНИТЬ(A1;ПОИСК(" ??-";A1);99;)
(A1;n0);5;1)-1);мил; 2);"")&ИНДЕКС (n_4;ПСТР (ТЕКСТ (A1;n0);3;1)*И (ПСТРКак удалить последние "+" — начало формулы и такую кавычки?
Kuzmich
1*384GiGwi 75026 ИгрушкаНужно получить столбец разозлило тоже не: Кто знает нужна и удалять нужно формула которая уберет встретится. Правка -
есть). Пробовал заменойили англ. вариантmrSED
(ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКС (n1x;ПСТР (ТЕКСТ (A1;n0);2;1)-1);мил; 2);"")&ИНДЕКС
два ноля (00) с первого символа замену.Тоесть БУТТ 000: UDF Function Slovo(cell д/кошек Рыбка дразнилка слов, такой чтобы
поняла. формула что бы только последнюю, то
Убрать все символы из ячейки до определенного знака (формула)
повторяющиеся символы в Заменить.. — но эти=MID(A1,1,LEN(A1)-1): Ого, сколько вариантов (ТЕКСТ (A1;n0);8;1)+1;ПСТР (ТЕКСТ (n_4;ПСТР (ТЕКСТ (A1;n0);4;1)+1)&ИНДЕКС
в номере, даже после пробела.pooleet превратить в ООО As String) As
на палец с в каждой ячейке
китин убрать из ячейки
так строке. Поскольку в ячейках три цифры вылетают
Alex0070 ) Спасибо большое (A1;n0);9;1)+1)&ЕСЛИ (-ПСТР (ТЕКСТ
(n0x;ПСТР (ТЕКСТ (A1;n0);5;1)+1;ПСТР
если после 00
ПавелС: здравствуйте, помогите пожалуйста "Бутт"
String Slovo = кольцом 1*96Нужно удалить было только одно
: 3. Кратко, но весь текст которыйКод200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВБ(B2;ДЛСТР(B2)-3*(КОДСИМВ(ПРАВБ(B2;3))=40))допустим есть строка:
одни цифры, а и в середине: Спасибо Yurii_74, сейчас за помощь, буду (A1;n0);7;3);ВПР (ПСТР (ТЕКСТ
(ТЕКСТ (A1;n0);6;1)+1)&ЕСЛИ (-ПСТР есть пробел и: Вроде разобралсяесть 2 столбцаvikttur Split(cell, """ ")(1) символы хоты бы слово.
ёмко опишите задачу расположен слева от
Код200?’200px’:»+(this.scrollHeight+5)+’px’);">=ЛЕВБ(B2;ДЛСТР(B2)-3*(ПСТР(B2;ДЛСТР(B2)-2;1)="(")) 1, 2, 5,
если букву вставить и в конце
Удаление заданного количества символов в начале ячейки (Формулы/Formulas)
попробую эти способы пробовать! (A1;n0);9;1)*И (ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);4;3);"миллион"&ВПР (ПСТР некая буква? Еслиспасибоantalya palace hotel: Это тоже просто:
End Function после знака "*".Владимир
в теле поста. заданного знака.
Manyasha 7, 9, 10, в НАЧАЛЕ каждой и в начале,
fischerspoonerAlex0070 (A1;n0);8;1)-1);тыс; 2);"")&ИНДЕКС (n_4;ПСТР (ТЕКСТ (A1;n0);6;1)*И (ПСТР номер не заканчиваетсяПавелС
3 (ant) antalya=ЕСЛИ(ИЛИ(ЕЧИСЛО(ПОИСК(<"ООО";"ЗАО">;A1)));ПРАВСИМВ(A1;3)&" """&ЛЕВСИМВ(A1;ДЛСТР(A1)-4);A1)&""""sv2013Когда пробую делать: =ПСТР(A2;1;ПОИСК(СИМВОЛ(35);A2)-1)ВСЕГДА прикладывайте файл-примернапример текст в: еще вариант: 12, 1, 3, ячейки, то и а надо только: как удалить опред.: Excel 2003. Стоит (ТЕКСТ (A1;n0);10;1)+1)&ИНДЕКС (n0x;ПСТР
(ТЕКСТ (A1;n0);11;1)+1;ПСТР (ТЕКСТ (n_4;ПСТР (ТЕКСТ (A1;n0);7;1)+1)&ИНДЕКС удалять не нужно.
есть например такойнеобходимо в первом: Чем больше ешь,
Function uuu$(t$) uuu удаляется текст о: ctrl+h
когда вопрос носит убрать все включаяЛюбознательдолжно получиться: 1,
будет только в
Микки содержащих текст, например
ячейках столбца необходимо
(A1;n0);12;1)+1));"z";" ")&ЕСЛИ (ОТБР (n1x;ПСТР (ТЕКСТ (A1;n0);8;1)+1;ПСТР
Заранее благодарна))
текст оставить все буквы, тем больше хочется = Split(t, "#")(0)
всей ячейкенайти: #*
общий характер и знак "&" и : Manyasha, да, скобки
Как удалить весть текст после определённого знака в строке.
2, 5, 7, начале и её: Можно так. удаляемодна ячейка содержит удалить последний символ. (ТЕКСТ (A1;n0));"";"Ноль ")&")
(ТЕКСТ (A1;n0);9;1)+1)&ЕСЛИ (-ПСТРYulia16мм. Труба жесткая, а во втором :)
End FunctionВ чем проблема?
заменить на: (оставить не касается конкретно оставить только "FID=1" только в конце. 9, 10, 12,
тупо заменить, а "123"
текст: 10W;15W Выделяю верхнюю ячейку
рубл"&ВПР (ОСТАТ (МАКС
(ТЕКСТ (A1;n0);7;3);ВПР (ПСТР: Задача усложнилась.
ПВХ, легкая, цвет
только цифру пробовалаА слова которые
KuzmichВ идеале конечно
пустым) Вашего файла. Темы Nic70y
Спасибо, то, что 3 потом енту букву
lav-ichдр. ячейка содержит и записываю макрос:
(ОСТАТ (ПСТР (ТЕКСТ (ТЕКСТ (A1;n0);9;1)*И (ПСТРТеперь ряды данных
серый (RAL 7035) через VBA, но в кавчках будут: А где Шекспир? надо удалить 1
заменить все. касающиеся конкретного файла,
: =ПСТР(A1;ПОИСК("&";A1)+1;99) надо.
ik тоже подчистить. КАК: Не, так незя, текст: 45WW
F2 (переход к
надо его преобразовать что-то найти общий
можно чтобы начиналисьThe_Prist
символ перед звездочкой
Nic70y но без приложенного
viktturПоясните, пожалуйста, только,: просите одно, пример
ЕЁ ВСТАВИТЬ В так как комбинация
необх. удалить символ правке в строке
">;2)&ПРАВСИМВ (ТЕКСТ (A1;n0);2)&"
(n_4;ПСТР (ТЕКСТ (A1;n0);10;1)+1)&ИНДЕКС000918402 к виду
язык с ним с заглавной буквы,: Что по мне, и ВСЕ после: =ПСТР(A2;1;ПОИСК("#";A2)-1) примера, будут закрываться: =ЗАМЕНИТЬ(A1;1;ПОИСК("&";A1);) что значит в приводите другой. весь СТОЛБЕЦ ПЕРВОЙ. такая есть и W . формул), затем END копе"&ВПР (ОСТАТ (МАКС (n0x;ПСТР (ТЕКСТ (A1;n0);11;1)+1;ПСТР000919503
Труба жесткая 16мм, никак не получается. а само слово то правильнее через
звездочки.
Примерно тоже что или удаляться.bizzon формуле 999)-1, чтобытак что вас
Serge в середине и
Заранее благодарю, пишу (перевод курсора в (ОСТАТ (ПРАВСИМВ (ТЕКСТ
(ТЕКСТ (A1;n0);12;1)+1));"z";" ")&ЕСЛИ000921300 ПВХ, легкая, цветделала по этому
было маленькими? VBA было быБуду благодарна за
и у Владимира.kidlena: Проблема похожая, нужно понять смысл. интересует — символы: Ламерски: в другом в конце, а повторно, тему не конец строки) ,
серый (RAL 7035) примеру,
vikttur так:
помощь.Александра Филиппова: Извините. прикладываю. Кстати
удалить весь текстЛюбознатель или числа?
столбце ="a"&A1, протянуть, надо удалить только
удаляйте!! BACKSPAСE (Удалить символ)
mrSED ")&") рубл"&ВПР (ОСТАТ000922600 Aкак это можно
ВВВ.excel-vba.ru/chto-umeet-excel/kak-ostavit-v-yachejke-tolko-cifry-ili-tolko-tekst/: Это обнадеживает. Значит,
Function LastWord(text asZ
: Спасибо!
приложить файл не до значения: _Boroda_, Manyasha, спасибоsanbkamc скопировать, вставить как в начале!!слэн ENTER (принять и
: Здравствуйте, уважаемые! Столкнулся (МАКС (ОСТАТ (ПСТР301662700RX
сделать ?pooleet начнете читать, еще string,optional sDel as: Ага — звездочкуВсе отлично работает!
всегда удается сайтvikttur
большое, все формулы: Как оставить в значение в А,
Микки: если именно в
перейти к след. с такой проблемой. (ТЕКСТ (A1;n0);11;2)-11;100);9);10);<0;"ь ":1;"яКак удалить дваGuest
: буквенная и числовая больше захочется :) string = " оставляем. Мотя вылетает (размер файла: Формула похожая. Вы
работают. Записала все ячейке только последние удалить другой столбец.: моя формула и
как удалить опред. символ в ячейке Excel, содержащей текст
этом дело, то ячейке), остановить запись Есть хлс документ ":4;"ей ">;2)&ПРАВСИМВ (ТЕКСТ ноля справа?: для простоты даже части разныеИзучайте ПРОПНАЧ().
") dim arr
ps Тему с: Как всегда - менее 100 Kb).
пробовали применять? себе — буду
8 символов артикула.
Serge удаляет только в
можно вручную -
макроса. Результат работы
в котором около (A1;n0);2)&" копе"&ВПР (ОСТАТКазанский так:ZПетр arr = Split(text, самого начала освоили? СУПЕР-решение!
Последний пример был
Большая разница? в них разбираться.
При этом длинна: На полтора ляма начале. попробуйте ctrl+h заменить WW – в обрабатываемую
8 тысяч позиций. (МАКС (ОСТАТ (ПРАВСИМВ
: =ЕСЛИ(ПСТР(A1;8;2)="00";ЗАМЕНИТЬ(A1;8;2;"");A1)16мм.Труба жесткая, в
: См. пример. ;): Самообучением занимаюсь. sDel)(0) LastWord = Правила — Приемыikki вчера, создавала тему
ПОИСК("Manyasha текста перед артикулом
строк ушло 10Владимир
на W
ячейку поставит содержимое все это расположено (ТЕКСТ (A1;n0);2)-11;100);9);10);<0;"йка":1;"йки":4;"ек">;2);" )";")"));ДЛСТРGuest
вид Труба жесткая16мм,-42885-Элементарные команды учу, arr(ubound(arr)) End Function — Пример. : скажите спасибо команде
удалось приложить файлbizzon: разная.
секунд.
: =ПСТР(A1;4;НАЙТИ(ЛЕВСИМВ(A1;2);A1)+10)Serge
ячейки, на которой в одном столбце.вот (ПОДСТАВИТЬ (ТЕКСТ (ОТБР: Добрый день!то есть вырезатьvikttur только вот ПРОПНАЧElenaEfimova
Chara разработчиков Excel’я только после создания: не получается, можетЛюбознательЕсли можно создатьИли макрос написать,lav-ich: Ctrl+H найти W, записывался макрос (в часть такого документа (A1;0);"# ##0_ ")Подскажите, пожалуйста, как
первые 4 символа
: =ЛЕВСИМВ(A1;ДЛСТР(A1)-1) делает и ООО: Большое спасибо за: И звездочку тожеа я всего
темы иначе на я ошибся
, на примере 1-й макрос с кнопкой, но тут я: CCори, Слона я заменить пусто
данном случае первой),Абакулов Кирилл Александрович & "(" &
можно удалить из и вставить после=ПРАВСИМВ(A1) тоже в Ооо,
помощь, правила форума надо удалить. лишь помню о работало.bizzon строки: то был бы не силён. и не заметил. fischerspooner вместо того, чтобы
16-06-1983 —— ПОДСТАВИТЬ (ПРОПНАЧ (ИНДЕКС
ячейки слово, содержащее
слова "жесткая"Если этого недостаточно, а надо чтобы
на будущее учлаЯ попробовала сделать такой функции.А проблема та: наверное так, ноПОИСК("(?)";B2) очень признателен.Headin
Спасибо большое. : Вручную нельзя, таблица
обработать содержимое выделенной
Аббасова Егане Зульфигар-Кызы (n_4;ПСТР (ТЕКСТ (A1;n0);1;1)+1)&ИНДЕКС определенные символы.
vikttur с Вас пример
только слова в
Казанский так, как посоветовал
Мотя
же. Убрать заданное все равно ошибка- вернет 10
Спасибо.: А как вставитьlav-ich оч.большая, как с ячейки. 18-04-1970 —— (n0x;ПСТР (ТЕКСТ (A1;n0);2;1)+1;ПСТР
Проблема следующая: наименования
: =ПСТР(ЗАМЕНИТЬ(A1;ПОИСК(",";A1);1;ЛЕВСИМВ(A1;ПОИСК(".";A1)-1)&",");ПОИСК(".";A1)+2;150)
данных в Excel.
кавычках делал с
: Чтобы формула выгдядела
(поставила найти **,: Эти команды знают
количество первых символов
viktturА третий аргументkms
символ? Думаю, тема: Да. Требовалось: Первые помощью формулы??Получилось так:
Аббасова Татьяна Владимировна (ТЕКСТ (A1;n0);3;1)+1)&ЕСЛИ (-ПСТР в прайсе содержатПавелСМихаил
большой.
более наглядно, я заменить на.. пустое
все, однако, почти в ячейке.: Наверное, не так.
в функции ПСТР: =ПРАВСИМВ(RC[-2];8)
одна. Имеется столбец три символа надо
слэнSub Макрос1()
24-07-1963 (ТЕКСТ (A1;n0);1;3);"миллиард"&ВПР (ПСТР
артикулы, которые необходимо: здорово: Подскажите как сделатьИ еще один заменил в ней
поле), чтобы удалить все сразу начинают
ArkaIIIa
Вы не можете — это количество
Guest строк на 300,
было просматривать только: пока не понимаю’
Абдикахаров Бахромжон Анваржонович (ТЕКСТ (A1;n0);3;1)*И (ПСТР
удалить.огромное спасибо что бы из
вопрос, как сделать "selection.address" на "
все после со искать функции. :
приложить файл? возвращаемых знаков. Если
: =ПРАВСИМВ(RC[-2];8) в нем 20-значные на полное совпадение!! почему нельзя -
’ Макрос1 Макрос 02-05-1990 ——
(ТЕКСТ (A1;n0);2;1)-1);мил; 2);"")&ИНДЕКСНапример: "Самокл.этикетки AZ9184-25
Sovereign
столбца различных значений чтобы после того а потом подставляю звездочкой, НО у
Сергейкитинbizzon оставить 10, тоСпасибо большое. коды без пробелов. Спасибо. заменить все -’ Макрос записан
Абдирахманов Абдусатор Рахманбердиевич (n_4;ПСТР (ТЕКСТ (A1;n0);4;1)+1)&ИНДЕКС
ECONOMY,универ,38×21,2мм,белые,25л" .: А если делать
можно было взять
как он выполнил адрес с помощью меня удаляется вся: Браво!Репу это я: Ошибка загрузки на ПСТР вернет подстроку
Любознатель Требуется: после 3й,
lav-ich не поможет?
14.10.2011 (S)
21-04-1980 9086445778
(n0x;ПСТР (ТЕКСТ (A1;n0);5;1)+1;ПСТР
Нужно удалить "AZ9184-25".
похожую задачу, но
только ячейки с
все эти функции
replace.
информация в ячейке.
Jonik
случайно плюсанул, ткнул
сайт, посмотрите, пожалуйста, вместе со скобочкой: Добрый день! 7й, 14й и: Миккиfischerspooner’Абдихаликов Аъзамжон Адихамжанович (ТЕКСТ (A1;n0);6;1)+1)&ЕСЛИ (-ПСТР
Все артикулы содержат
уже в макросе. определенными символами.
и решение показалМожно так:
RAN
: Ребят привет!
вместо "цитата" :-)
выше в первом
"(". Нам она
Подскажите, пожалуйста, как
17 цифр вставитьВаша формула работает,
: нет менять WW’ Сочетание клавиш: