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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 02.02.2009, 23:10   #1
Апчхи
Пользователь
 
Регистрация: 02.02.2009
Сообщений: 15
По умолчанию Ввод текста и ссылки в одну ячейку

Господа, подскажите, есть ли в Excel способ внести текст (постоянный) с ссылкой на ячейку (или формулой) посреди текста? Напримет "Стоимость (ссылка на ячейку) крупы" и все это в одной ячейке?
Проблема в том, что есть достаточно объемный текст в которы надобы вставить ссылку на ячейку и функцию. Разделить на ячейки не представляется возможным по причине сильного разброса в длине подставляемых данных.
Если уж совсем конкретно, то надо реализовать ввод следующего текста:
"Общая стоимость оказыннах услуг составила 1 232 423,00 (Один миллион двести тридцать две тысячи четыреста двадцать три рубля 00 копеек), в т.ч НДС 18% - 187 996,73 (Сто восемьдесят семь тысяч девятьсот девяносто шесть тысяч 73 копейки)."
Соответственно требуется, чтобы вместо чисел стояла ссылка на необходимую ячейку, а всемсто суммы прописью была функция перевода числа в текст. Такая функция у меня уже есть, осталось дело за малым - смочь ее подставить.
Поможите люди добрые!
Апчхи вне форума Ответить с цитированием
Старый 03.02.2009, 08:14   #2
Юнлинг
Форумчанин
 
Регистрация: 17.10.2008
Сообщений: 239
По умолчанию

Цитата:
Сообщение от Апчхи Посмотреть сообщение
Господа, подскажите, есть ли в Excel способ внести текст (постоянный) с ссылкой на ячейку (или формулой) посреди текста? Напримет "Стоимость (ссылка на ячейку) крупы" и все это в одной ячейке?
Проблема в том, что есть достаточно объемный текст в которы надобы вставить ссылку на ячейку и функцию. Разделить на ячейки не представляется возможным по причине сильного разброса в длине подставляемых данных.
Если уж совсем конкретно, то надо реализовать ввод следующего текста:
"Общая стоимость оказыннах услуг составила 1 232 423,00 (Один миллион двести тридцать две тысячи четыреста двадцать три рубля 00 копеек), в т.ч НДС 18% - 187 996,73 (Сто восемьдесят семь тысяч девятьсот девяносто шесть тысяч 73 копейки)."
Соответственно требуется, чтобы вместо чисел стояла ссылка на необходимую ячейку, а всемсто суммы прописью была функция перевода числа в текст. Такая функция у меня уже есть, осталось дело за малым - смочь ее подставить.
Поможите люди добрые!
По моему просто
например сумма распологается в ячейке B2 а внести нужно в ячейку A1
В A1 пишем
Код:
= "Общая стоимость оказыннах услуг составила " &B2& ""& _Функциясуммыпрописью(b2)&"), в т.ч НДС 18% - "&B2/1.18& ""& _Функциясуммыпрописью(b2/18)&
Извените
Код:
= "Общая стоимость оказыннах услуг составила " &B2& ""& _Функциясуммыпрописью(b2)&"), в т.ч НДС 18% - "&B2*0,18/1.18& ""& _Функциясуммыпрописью(b2*0,18/18)&

Последний раз редактировалось Юнлинг; 03.02.2009 в 08:45. Причина: Ошибка расчета НДС
Юнлинг вне форума Ответить с цитированием
Старый 03.02.2009, 08:20   #3
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Допустим, в ячейке A1 надо получить требуемый текст, в ячейке B1 находится сумма, в ячейке D1 вычисляется НДС (формулой =B1*18%), Ваша функция преобразования называется ПРЕОБР.

Тогда введите в ячейку A1 формулу типа:

Код:
="Общая стоимость оказанных услуг составила " & B1 & ПРЕОБР(B1) & ", в т.ч НДС 18% - " & D1 & ПРЕОБР(D1)
(добавлено)
2 Юнлинг
не увидел Ваш ответ вовремя
EducatedFool вне форума Ответить с цитированием
Старый 03.02.2009, 10:07   #4
Апчхи
Пользователь
 
Регистрация: 02.02.2009
Сообщений: 15
По умолчанию

Огромное спасибо за помощь! Смысл понял и подкорректировал под себя.
Получилось следующее:

=" Общая стоимость оказанных услуг составила "&ФИКСИРОВАННЫЙ(H13;2)&" ("&СуммаПрописью(H13)&"), включая налог на добавленную стоимость – 18% - "&ФИКСИРОВАННЫЙ(H15;2)&" ("&СуммаПрописью(H15)&").
Работы выполнены в полном объеме, стороны претензий друг к другу не имеют."

Теперь еще такой вопрос. Можно ли эту "формулу" как-нибудь сохранить в функциях или еще где, чтобы каждый раз не копировать ее из другого файла и не потерять в случае чего совсем?
Апчхи вне форума Ответить с цитированием
Старый 03.02.2009, 10:19   #5
Юнлинг
Форумчанин
 
Регистрация: 17.10.2008
Сообщений: 239
По умолчанию

Цитата:
Сообщение от Апчхи Посмотреть сообщение
Огромное спасибо за помощь! Смысл понял и подкорректировал под себя.
Получилось следующее:

=" Общая стоимость оказанных услуг составила "&ФИКСИРОВАННЫЙ(H13;2)&" ("&СуммаПрописью(H13)&"), включая налог на добавленную стоимость – 18% - "&ФИКСИРОВАННЫЙ(H15;2)&" ("&СуммаПрописью(H15)&").
Работы выполнены в полном объеме, стороны претензий друг к другу не имеют."

Теперь еще такой вопрос. Можно ли эту "формулу" как-нибудь сохранить в функциях или еще где, чтобы каждый раз не копировать ее из другого файла и не потерять в случае чего совсем?
Не понял.
Если желаете сохарнить отдельно то откройте блокнот и сохрани в текстовом файле
Например так
Вложения
Тип файла: txt formula.txt (203 байт, 239 просмотров)
Юнлинг вне форума Ответить с цитированием
Старый 03.02.2009, 10:44   #6
WIC
Форумчанин Подтвердите свой е-майл
 
Регистрация: 21.09.2007
Сообщений: 138
По умолчанию

Я отдельном файле Excel такое храню. Как текст в ячейках.
Потом копирую куда надо, ставлю впереди знак "="
WIC вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ввод сложных формул в ячейку NikolayGVB Microsoft Office Excel 4 22.01.2009 18:05
Ввод текста pali4ev Общие вопросы Delphi 1 18.12.2008 01:01
Вставка в одну ячейку ivkoa Microsoft Office Excel 9 22.08.2008 14:16
Извлечь в одну ячейку несколько значений из строки которые удовлетворяют заданному условию. Dorvir Microsoft Office Excel 5 08.04.2008 16:12
TStringGrid - изначально мы видим одну ячейку в конце должно быть столько сколько заполнили. Ensoph Компоненты Delphi 5 18.10.2007 22:24