Форум программистов, компьютерный форум, киберфорум
MS Office Excel
Войти
Регистрация
Восстановить пароль
Другие темы раздела
MS Excel Ошибка в части содержимого книги https://www.cyberforum.ru/ ms-excel/ thread2881013.html
При открытии файла excel, неожиданно вылезла ошибка содержимого книги, при этом буквально 3 минуты назад все работало нормально. В файле 525 строк, заполнялся он весь, посредством питона. Также...
Ответы на тест VBA MS Excel
Здравствуйте. Помогите как найти ответы на тест Пароль файла 241255, пароль VBA - 1
MS Excel Макрос для подстановки значений в формулу и копирования результата вычисления Доброго дня, во вложении файл с примером. Записью макроса обойтись не могу, т.к. нужно задавать диапазон для таблицы с исходными числами для подстановки в макрос. Есть формула, результат на... https://www.cyberforum.ru/ ms-excel/ thread2880272.html MS Excel фильтрация или другой способ убрать текст(цифры) выделенные жирным Здравствуйте, скажите можно убрать - скрыть текст(цифры) выделенные жирным. Фильтрацией такой функции не нашел, ей можно убрать пустые строки часть шапки, именно часть (вторую и послед строки). Если... https://www.cyberforum.ru/ ms-excel/ thread2880172.html
Вставка картинки формулой MS Excel
Всем доброго времени суток. Помогите с вставкой картинки: на листе 1 имеются 2 картинки. Как сделать вставку этих картинок формулой? Если поле "значение" = 1 на листе 1, то на лист 2 в поле...
MS Excel Вывод названия группы ячеек https://www.cyberforum.ru/ ms-excel/ thread2880021.html
Приветствую всех. Не могу понять, как реализовать следующую задачу. Есть две группы данных Рога и Копыта. В каждой из них есть список наименований товаров со стоимостью (столбики 11 и 51) для...
MS Excel Excel 2007 Разность дат Помогите новичку в Excel! Нужно найти разницу между датами в Excel 2007, предлагается ф-ция DATEDIF() По информации в сети, эта ф-ция есть, но скрыта и ее просто надо активировать(доустановить),... https://www.cyberforum.ru/ ms-excel/ thread2879836.html разнос данных по таблицам MS Excel
Друзья, всем привет Никак не могу понять как реализовать следующую задачу. И поэтому ОЧЕНЬ прошу Вашей помощи В общем есть общая таблица, в которой каждый день считаются данные по разным...
MS Excel Нормализация Выполнить нормализацию таблиц в Excel. №1 – отношение «Морские перевозки» https://www.cyberforum.ru/ ms-excel/ thread2879708.html MS Excel Подстановка данных из других ячеек по значению из другой Всем привет! Никак не могу понять, как решить проблему. Есть таблица: В столбце A2:A5 из списка выбираем из какого столбца взять данные и они должны появится в столбце B2:B5 Как пример, я... https://www.cyberforum.ru/ ms-excel/ thread2879602.html
Как протянуть формулу на листе пропуская строку MS Excel
Здравствуйте, эксперты экселя. Нужна Ваша помощь в протягивании формулы. Нужно протянуть формулу так чтобы, данные А2:G2, кроме ячейки B1 скопировались на А2:G2 Затем данные А3:G3 перетянуть на...
MS Excel Всевозможные варианты подкидывания монетки https://www.cyberforum.ru/ ms-excel/ thread2879225.html
Возможно ли в эксель вывести таблицу со всевозможными вариантами подкидывания монетки 6 раз. Если да, то как? Получается, что их будет 64 (2^6).
2038 / 1393 / 654
Регистрация: 23.03.2015
Сообщений: 4,526
08.10.2021, 01:31 0

Вырезать текст до русских символов - MS Excel - Ответ 15756731

08.10.2021, 01:31. Показов 743. Ответов 7
Метки (Все метки)

Лучший ответ Сообщение было отмечено Nacu27 как решение

Решение

Nacu27,
Цитата Сообщение от AlexOld Посмотреть сообщение
Это можно сделать макросом
Для данных в столбце А разделение по столбцам В и С
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub MMM()
Application.ScreenUpdating = False
LR = Cells(Rows.Count, 1).End(xlUp).Row
    With CreateObject("VBScript.RegExp")
        .Pattern = "[A-Za-z0-9 ]+"
        For i = 1 To LR
            If .Test(Cells(i, 1).Value) Then
             Cells(i, 2).Value = .Execute(Cells(i, 1).Value).Item(0)
             Cells(i, 3).Value = .Replace(Cells(i, 1).Value, "")
            End If
        Next
    End With
Application.ScreenUpdating = True
 
MsgBox "job Complete"
End Sub
В прикрепленном файле нажмите на кнопку

Вернуться к обсуждению:
Вырезать текст до русских символов MS Excel
Вложения
Тип файла: rar Book1_santechnika.rar (15.1 Кб, 16 просмотров)
2
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.10.2021, 01:31
Готовые ответы и решения:

Как настроить ввод русских символов и в дальнейшем вывод этих символов
Подскажите как в этом коде настроить ввод русских символов и в дальнейшем вывод этих символов....

Чтение русских символов. Отрицательные значения у символов
Добрый вечер. Считую файл .txt. Но русские буквы получают отрицательное значение. И в итоге при...

Вырезать текст
Код, извлекает все между скобками () , при условии что в тексте, между скобками, имеется знак +. ...

Вырезать текст
Даны два многострочных текст бокса. Из textbox1 нужно вырезать весь текст начиная с 4 строки и...

7
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.10.2021, 01:31

Вырезать текст
Подскажите, как можно реализовать такое, Есть 2 файла в первом файле текст, в нём находится...

Множества.Задача 5. Дан текст из строчных русских букв, за которым следует точка. Напечатать в алфавитном порядке все буквы, входящие в текст не менее
Множества.Задача 5. Дан текст из строчных русских букв, за которым следует точка. Напечатать в...

Вырезать текст с тегов
Как вырезать текст по тегам? А именно, пример: <h3>Текст текст текст</h3> другой текст Какие...

Вырезать текст (preg_match)
Всем привет. preg_match('/\<!--rightblock--\>(.+)\<!--\/rightblock--\>/is', $this->templates,...

вырезать часть символов из строки
из переменной типа string нужно забрать часть символов раньше использовал result "123 -...

Вырезать кавычки и обрезать текст
Всем здрасте. Помогите разобраться. В общем вывожу из бд текст и сразу обрезаю его до 300...

Вырезать текст внутри div-ов
Как на notepad++(можно и на php) реализовать такое: 1) Есть html-файлы вида: Код: <div...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.