Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Сложить несколько слов в одну строку - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сложить несколько слов в одну строку (Макросы/Sub)
Сложить несколько слов в одну строку
lopuxi Дата: Четверг, 19.11.2015, 11:44 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 142
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007, 2013
Добрый день.

Подскажите пожалуйста, как сложить несколько слов в одну строку, через запятую.
У меня есть в отдельной книге ексель, есть перечисления месяцев (там отдельная тема с этим в общем) и мне бы хотелось в конце выполнения макроса вывести Msgbox с сообщение какие месяца в файле присутствовали.
Для этого у меня есть цикл что по этим месяцам пробегает, мне бы как то в одну переменную их сложить и в конце ее выдать.

Спасибо.

О_о ...и так можно было?
 
Ответить
СообщениеДобрый день.

Подскажите пожалуйста, как сложить несколько слов в одну строку, через запятую.
У меня есть в отдельной книге ексель, есть перечисления месяцев (там отдельная тема с этим в общем) и мне бы хотелось в конце выполнения макроса вывести Msgbox с сообщение какие месяца в файле присутствовали.
Для этого у меня есть цикл что по этим месяцам пробегает, мне бы как то в одну переменную их сложить и в конце ее выдать.

Спасибо.
Автор - lopuxi
Дата добавления - 19.11.2015 в 11:44
Manyasha Дата: Четверг, 19.11.2015, 11:54 | Сообщение № 2
Группа: Модераторы
Ранг: Старожил
Сообщений: 2198
Репутация: 902 ±
Замечаний: 0% ±

Excel 2010, 2016
lopuxi, примерно так:
[vba]
Код
    For i = 1 To 12
        myStr = myStr & ", " & Cells(i, 1).Value
    Next i
    myStr = Mid(myStr, 3)
    MsgBox myStr
[/vba]

ЯД: 410013299366744 WM: R193491431804
 
Ответить
Сообщениеlopuxi, примерно так:
[vba]
Код
    For i = 1 To 12
        myStr = myStr & ", " & Cells(i, 1).Value
    Next i
    myStr = Mid(myStr, 3)
    MsgBox myStr
[/vba]
Автор - Manyasha
Дата добавления - 19.11.2015 в 11:54
lopuxi Дата: Четверг, 19.11.2015, 12:16 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 142
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007, 2013
Супер, то что надо.
Спасибо! )

О_о ...и так можно было?
 
Ответить
СообщениеСупер, то что надо.
Спасибо! )
Автор - lopuxi
Дата добавления - 19.11.2015 в 12:16
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Сложить несколько слов в одну строку (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2026 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!