Страницы: 1
RSS
Склонение (день/дня/дней) из функции передать в форму, Как передать правильно из функции в форму
 
Добрый день знатоки!
Помогите с задачей:
На просторах форума нашёл и переделал "напоминалку", а так-же функцию склонения (день/дня/дней).
Но вот совместить их не получается.
Нужно, чтобы в строке:
Сообщение1 = "До дня Рождения осталось " & Разница & " дн."
вместо дн.  ставилось дня, дней и т.д., в зависимости от числа.

Заранее благодарю за помощь.
 
ТУТ
Лень двигатель прогресса, доказано!!!
 
с помощью моей Пропис мне удавалось прописать даже слонов, не то что дни
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
Цитата
Сергей написал:
ТУТ
Сергей, спасибо. Я смотрел эту тему. В моём примере - это сообщение передается в форму, и формула не подходит.
 
Цитата
Ігор Гончаренко написал:
с помощью моей Пропис мне удавалось прописать даже слонов, не то что дни
Игорь, в принципе, то-же самое, что и выше. Хотя, пример хороший для рассмотрения.

Но как просклонять в моём примере? И передать в переменную Сообщение1.
Сама функция Dney есть в Модуль1 в примере.
Изменено: pitby - 29.01.2018 16:52:25
 
Первая строка функции
Код
1
2
' Склонение слова "день"
Public Function Dney(IRange) As String
Строка кода, формирующая сообщение
Код
1
Сообщение1 = "До дня Рождения осталось " & Разница & Dney(Разница) ' !!!!! Вставить функцию склонения!!!!
Согласие есть продукт при полном непротивлении сторон
 
Цитата
Sanja написал: Строка кода, формирующая сообщение...
Выдало ошибку. Compile error: ByRef argument type mismatch.
(Почти так я и делал. Да что-то эксперименты неудачные без знаний или подсказки.)
Изменено: pitby - 29.01.2018 16:56:09
 
Вы первую строку ФУНКЦИИ поменяли? Я же написал как она должна выглядеть  
Согласие есть продукт при полном непротивлении сторон
 
СПАСИБО ОГРОМНОЕ! Всё получилось. И как всегда - всё просто. Привести в соответствие аргументы!
 
Спасибо ЗНАТОКИ!
Тема закрыта.
Страницы: 1
Читают тему
Loading...