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

Вход

Регистрация

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

 

= Мир MS Excel/Перенос части выводимого текста в другую ячейку - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Перенос части выводимого текста в другую ячейку (Формулы/Formulas)
Перенос части выводимого текста в другую ячейку
AlexLest2099 Дата: Пятница, 10.05.2019, 16:03 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 1
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Здравствуйте, необходимо из ячейки AV11 "УТВЕРЖДАЮ отчет в сумме" текст разделить и перенести на следующую строчку AN12, чтобы было удобно прочитать пользователю.Сумма должна быть прописью, например: сто тысяч двести, а следующие слова : восемьдесят шесть, уже в другой ячейке.
P.S. для вывода суммы прописью использую надстройку MulTEx.
Есть небольшой набросок, как вариант, подправьте и объясните, кто может, очень хочется разобраться в этом разрыве текста и его переносе:
Txt = Range("A1").Value
Arr = Split(Txt, " ")

For i = 0 To UBound(Arr)
If i <= 2 Then
Range("AV11").Value = Range("AV11").Value & " " & Arr(i)
Else
Range("AH12").Value = Range("AH12").Value & " " & Arr(i)
End If
Next
К сообщению приложен файл: 1277712.rar(27.7 Kb)


Сообщение отредактировал AlexLest2099 - Пятница, 10.05.2019, 21:35
 
Ответить
СообщениеЗдравствуйте, необходимо из ячейки AV11 "УТВЕРЖДАЮ отчет в сумме" текст разделить и перенести на следующую строчку AN12, чтобы было удобно прочитать пользователю.Сумма должна быть прописью, например: сто тысяч двести, а следующие слова : восемьдесят шесть, уже в другой ячейке.
P.S. для вывода суммы прописью использую надстройку MulTEx.
Есть небольшой набросок, как вариант, подправьте и объясните, кто может, очень хочется разобраться в этом разрыве текста и его переносе:
Txt = Range("A1").Value
Arr = Split(Txt, " ")

For i = 0 To UBound(Arr)
If i <= 2 Then
Range("AV11").Value = Range("AV11").Value & " " & Arr(i)
Else
Range("AH12").Value = Range("AH12").Value & " " & Arr(i)
End If
Next

Автор - AlexLest2099
Дата добавления - 10.05.2019 в 16:03
Pelena Дата: Суббота, 11.05.2019, 15:56 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 14329
Репутация: 3132 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
AlexLest2099, оформите код тегами с помощью кнопки # в режиме правки поста


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеAlexLest2099, оформите код тегами с помощью кнопки # в режиме правки поста

Автор - Pelena
Дата добавления - 11.05.2019 в 15:56
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Перенос части выводимого текста в другую ячейку (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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