Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.04.2013, 17:29   #1
PDiddy
Новичок
Джуниор
 
Регистрация: 28.04.2013
Сообщений: 3
По умолчанию Оставить Только Первые Буквы Слов В Предложении

Задача такая:
Есть файл с вопросами и ответами по некоторым предметам.
Нужно оставить только первые буквы слов в предложении и после каждой буквы нужно поставить точку.

Например:
Самая большая страна на Земле? - Россия
С. б. с. н. З. - Р.

За ранее спасибо за ответ.

Пробовал функцию,

Function First_Symbol(stroka As String) As String
For Each a In Split(stroka, " ")
strok = strok & " " & Left(a, 1)
Next
First_Symbol = Mid(strok, 2)
End Function

но это отрабатывает только для одной строки.
Мне нужно весь лист сразу отформатировать.
PDiddy вне форума Ответить с цитированием
Старый 28.04.2013, 18:11   #2
Казанский
Старожил
 
Аватар для Казанский
 
Регистрация: 31.12.2010
Сообщений: 2,133
По умолчанию

Отрабатывает? И точки ставит?
"Растяните" формулу по столбцу, скопируйте, спец. вставка - значения.
exceleved@yandex.ru Яндекс.Деньги: 410011500007619
Казанский вне форума Ответить с цитированием
Старый 28.04.2013, 18:31   #3
PDiddy
Новичок
Джуниор
 
Регистрация: 28.04.2013
Сообщений: 3
По умолчанию

Цитата:
Отрабатывает? И точки ставит?
Эту функцию я с интернета нашел.
Отрабатывает только для одной строки, но точки не ставит ((

Цитата:
"Растяните" формулу по столбцу, скопируйте, спец. вставка - значения.
Этот вариант тоже пробовал, не получилось.

Если Вы знаете, можете написать макрос или формулу для полного решения задачи? Помогите, пожалуйста!
PDiddy вне форума Ответить с цитированием
Старый 29.04.2013, 04:55   #4
ShAM66
Форумчанин
 
Регистрация: 24.02.2012
Сообщений: 160
По умолчанию

Кросс:
http://forum.msexcel.ru/index.php/topic,9291.0.html
ShAM66 вне форума Ответить с цитированием
Старый 29.04.2013, 16:52   #5
PDiddy
Новичок
Джуниор
 
Регистрация: 28.04.2013
Сообщений: 3
По умолчанию Ответили УРААА

Администратор, пожалуйста, удалите тему.

Извините за беспокойство
PDiddy вне форума Ответить с цитированием
Старый 30.04.2013, 07:17   #6
ShAM66
Форумчанин
 
Регистрация: 24.02.2012
Сообщений: 160
По умолчанию

Зачем же удалять? Может другим пригодится.
Лучше было написать, что по вышеприведенной ссылке получено решение.
ShAM66 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как получить первые буквы из слов в предложении? artemavd Общие вопросы Delphi 18 23.12.2012 00:01
Удалить в нём лишние пробелы, оставить только по одному пробелу между слов linnik Помощь студентам 1 10.11.2012 14:56
Найдите все слова в предложении, которые содержат только заданные буквы. Для определения буквенного состава используйте процедуру. avizer Помощь студентам 3 27.03.2012 21:07
Оставить в переменной только латинские буквы Delphinchik PHP 2 31.03.2011 14:41
В заданной строке символов заменить все первые буквы слов на заглавные NV-salt Общие вопросы C/C++ 4 05.04.2009 18:41