Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Другие темы раздела
VBA Дана последовательность из М чисел. Подсчитать, сколько в ней отрицательных, положительных и нулевых элементов https://www.cyberforum.ru/ vba/ thread890926.html
Дана последовательность из М чисел. Подсчитать, сколько в ней отрицательных, положительных и нулевых элементов. Добавлено через 41 секунду помогите пожалуйста
VBA Сохранение книги по указанному пути
Здравствуйте, нужна помощь. Нужен макрос, который бы сохранял книгу в папку, заранее прописанную в коде макроса. И интересует почти такой же макрос, но который сохранял бы не всю книгу, а...
Как определить, является ли строка правильным скобочным выражением VBA
Дана строка символов до точки. Определить, является ли она правильным скобочным выражением? Рассматривать только круглые скобки.
VBA Как выяснить, есть ли в строке все буквы, входящие в слово "шина" Дана строка символов. Выяснить, есть ли в ней все буквы, входящие в слово "шина"? https://www.cyberforum.ru/ vba/ thread890769.html
VBA Подсчёт максимального количества символов, стоящих подряд https://www.cyberforum.ru/ vba/ thread890493.html
День добрый. Можете ли помочь в решении такой задачи? Дана символьная строка. Посчитать максимальное количество подряд стоящих букв "А" во всей строке.
Как уменьшить время работы макроса? VBA
Добрый вечер! Суть проблемы: Открыто две книги, в одной макрос, делаем активной ту в которой нет макроса, запускаем макрос. Макрос создает новую книгу в формате csv, присваивает ей имя,...
переход по формуле к источнику VBA
Добрый день! Как то раз видел макрос который позволяет по формуле переходит к источнику, но не смог найти, кто-нибудь может подскажет. Суть работы у неё следующий, при нажатии комбинации клавиш,...
VBA Условный оператор и оператор выбора Дано квадратное уравнение Ax^2 + Bx + C = 0. Числа A, B, C вводятся в поля ввода. Найти корни уравнения, предусмотреть вариант отсутствия корней. https://www.cyberforum.ru/ vba/ thread890046.html
VBA Excel.Pomogite ispravit oshibku https://www.cyberforum.ru/ vba/ thread890019.html
Здравствуйте.Дан список Excel сотрудников, в форме добавления строки вылезает ошибка ("Необходимо заполнить все поля").Помогите,пожалуйста,исправить ошибку.
VBA Области, описываемые логическими выражениями: принадлежит ли точка области? Для данных областей составить линейную программу, которая печатает true, если точка с координатами (х, у) принадлежит закрашенной области, и false — в противном случае: https://www.cyberforum.ru/ vba/ thread890017.html
3201 / 952 / 221
Регистрация: 29.05.2010
Сообщений: 2,068
04.06.2013, 20:33 0

Ввести текст.Отредактировать текст,удаляя из него лишние пробеоы,оставляя только по одному пробелу между словами

04.06.2013, 20:33. Просмотров 1453. Ответов 3
Метки (Все метки)

Ответ


Примерно так:
Visual Basic
1
2
3
4
5
Sub pr3()
    Dim s$
    s = "Äàíà  ñòðîêà ñèìâîëîâ.   Âûÿñíèòü, åñòü ëè â íåé âñå  áóêâû, âõîäÿùèå  â ñëîâî"
    MsgBox ("Îòðåäàêòèðîâàííàÿ ñòðîêà - " & Application.Trim(s))
End Sub


Вернуться к обсуждению:
Ввести текст.Отредактировать текст,удаляя из него лишние пробеоы,оставляя только по одному пробелу между словами
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.06.2013, 20:33
Готовые ответы и решения:

Убрать все лишние пробелы между словами (оставить только по одному пробелу)
Dim St As String, Stl As String Dim P As String * 10, Sym As String * 1 Dim KR As Long, KN As...

Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между словами
Отредактировать предложение, удаляя из него лишние пробелы, оставляя только по одному пробелу между...

Отредактировать предложение, удаляя из него лишние пробелы, оставляя по одному пробелу между словами
Отредактировать предложение, удаляя из него лишние пробелы, оставляя по одному пробелу между...

Удалить из строки лишние пробелы, оставляя между словами только по одному пробелу
Удалить из строки лишние пробелы, оставляя между словами только по одному пробелу

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