Можно ли сократить данную формулу. - Microsoft Office Excel - Страница 2

DiemonStar · 26.04.2012, 14:09

Цитата:

Сообщение от АННА-ЕАО

DiemonStar ЕЩЁ РАЗ СПАСИБО

.
А Вы можите пояснить по данной формуле: =МесяцП(ячейка)? Как Вы это сделали?

обычная самописная функция. небольшой макрос) кстати, в обновлённом файле есть более удобная версия...

Цитата:

Код:

ВЫБОР(МЕСЯЦ(A3);"";"";" марта";" апреля")

под вашу конкретную лучше было бы сделать так:

Код:

ВЫБОР(МЕСЯЦ(A3) - 2 ;" марта";" апреля")

АННА-ЕАО · 26.04.2012, 14:26

DiemonStar Посмотрела обновленный файл , спасибо. А это то тоже "обычная самописная функция. небольшой макрос)" =ДатаФормат(A20;"dd mmmm") ?
И все же где то можно поподробней почитать о "обычных самописных функциях"? Хочу то же научиться.

А это просто замечательно: ВЫБОР(МЕСЯЦ(A3)- 2;" марта";" апреля")

Serge 007 · 26.04.2012, 14:30

Цитата:

Сообщение от IgorGO

Сережа, до 0 символов - никак нельзя))

Ну почему же?
Если форматом, да на исходных данных...

Ещё вариантик, без массива констант (перечисления месяцев):

Код:

=ТЕКСТ(ДЕНЬ(A3);"ДД")&" "&ЕСЛИ(ПРАВСИМВ(ТЕКСТ(A3;"ММММ");1)="т";ТЕКСТ(A3;"ММММ")&"а";ЗАМЕНИТЬ(ТЕКСТ(A3;"ММММ");ДЛСТР(ТЕКСТ(A3;"ММММ"));1;"я"))

АННА-ЕАО · 26.04.2012, 14:51

Цитата:

Сообщение от Serge 007

Код:

=ТЕКСТ(ДЕНЬ(A3);"ДД")&" "&ЕСЛИ(ПРАВСИМВ(ТЕКСТ(A3;"ММММ");1)="т";ТЕКСТ(A3;"ММММ")&"а";ЗАМЕНИТЬ(ТЕКСТ(A3;"ММММ");ДЛСТР(ТЕКСТ(A3;"ММММ"));1;"я"))

Спасибо, особенно за

Код:

=ТЕКСТ(ДЕНЬ(A3);"ДД")

т.к. через мой ЛЕВСИМВ(A20;2) при изменении даты не всегда правельно срабатывал.

IgorGO · 26.04.2012, 15:01

ну, если без формулы никак... тогда

Код:

=ТЕКСТ(A3; "[$-FC19]Д ММММ")

АННА-ЕАО · 26.04.2012, 15:17

Цитата:

Сообщение от IgorGO

ну, если без формулы никак... тогда

Код:

=ТЕКСТ(A3; "[$-FC19]Д ММММ")

ГЕНИАЛЬНО

нет слов

26.04.2012, 15:01	#15
IgorGO Новичок СтарожилДжуниор Регистрация: 05.02.2008 Сообщений: 9,487	ну, если без формулы никак... тогда Код: `=ТЕКСТ(A3; "[$-FC19]Д ММММ")` Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как грамотно сократить формулу	JKA	Microsoft Office Excel	3	06.04.2012 16:19
можно ли заменить данную формулу на другую, или упростить?	АННА-ЕАО	Microsoft Office Excel	8	24.11.2011 10:59
Сократить Формулу	Adrenalin_N	Microsoft Office Excel	2	03.07.2011 17:28
Как сократить формулу	ruavia3	Microsoft Office Excel	18	22.04.2009 16:11
Как можно сократить код	jocry	Общие вопросы Delphi	2	20.01.2009 08:35

26.04.2012, 14:26	#12
АННА-ЕАО Форумчанин Регистрация: 24.08.2011 Сообщений: 193	DiemonStar Посмотрела обновленный файл , спасибо. А это то тоже "обычная самописная функция. небольшой макрос)" =ДатаФормат(A20;"dd mmmm") ? И все же где то можно поподробней почитать о "обычных самописных функциях"? Хочу то же научиться. А это просто замечательно: ВЫБОР(МЕСЯЦ(A3)- 2;" марта";" апреля")