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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 16.05.2012, 16:11   #1
Roleg
Новичок
Джуниор
 
Регистрация: 14.05.2012
Сообщений: 6
По умолчанию Определить квартал и год

Из массива данных в столбце:
01.01.2010
02.01.2010
...
31.12.2010

необходимо сделать следующее:
1 квартал 2010
1 квартал 2010
...
4 квартал 2010

помогите, пожалуйста

Последний раз редактировалось Roleg; 16.05.2012 в 16:14.
Roleg вне форума Ответить с цитированием
Старый 16.05.2012, 16:21   #2
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

A1 - исходная дата
Код:
=целое((месяц(A1)-1)/3)+1 & " квартал " & текст(A1;"ГГГГ")
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете
IgorGO вне форума Ответить с цитированием
Старый 16.05.2012, 18:02   #3
Roleg
Новичок
Джуниор
 
Регистрация: 14.05.2012
Сообщений: 6
По умолчанию

Спасибо, а так чтобы изменить саму ячейку (маркосом)
Roleg вне форума Ответить с цитированием
Старый 16.05.2012, 21:32   #4
MCH
Форумчанин
 
Регистрация: 21.11.2010
Сообщений: 326
По умолчанию

Цитата:
Сообщение от IgorGO Посмотреть сообщение
Код:
=целое((месяц(A1)-1)/3)+1 & " квартал " & текст(A1;"ГГГГ")
Код:
=ЦЕЛОЕ((МЕСЯЦ(A1)+2)/3) & " квартал " & ГОД(A1)

Последний раз редактировалось MCH; 16.05.2012 в 21:41.
MCH вне форума Ответить с цитированием
Старый 17.05.2012, 00:37   #5
DV68
Форумчанин
 
Регистрация: 05.08.2009
Сообщений: 465
По умолчанию

Цитата:
Сообщение от Roleg Посмотреть сообщение
Спасибо, а так чтобы изменить саму ячейку (маркосом)
Зачем сразу макрос, в 2007-2010 можно с помощью условного форматирования сделать:
Формула для первого квартала в УФ:
=И(A1<>"";ОКРВВЕРХ(МЕСЯЦ(A1)/3;1)=1)
формат ячейки В УФ:
"1 квартал "ГГГГ
"Все следует делать настолько простым, насколько это возможно, но не проще." Альберт Эйнштейн

Последний раз редактировалось DV68; 17.05.2012 в 00:47.
DV68 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
по дате рождения и текущей дате (день, месяц, год) определить сколько дней до дня рождения (код на ПАСКАЛЕ) Николай1 Помощь студентам 1 16.02.2012 09:07
Квартал по текущей дате kuzjaca Microsoft Office Access 3 18.07.2011 14:36
ПОЛЬЗОВАТЕЛЬ ВВОДИТ ГОД СВОЕГО РОЖДЕНИЯ, НЕОБХОДИМО ОПРЕДЕЛИТЬ КТО ОНО ПО ВОСТОЧНОМУ КАЛЕНДАРЮ LION7777 Общие вопросы C/C++ 1 09.06.2010 12:20
Дан файл, содержащий различные даты. Каждая дата – это число, месяц и год. Найти год с наименьшим номе Figushkin Помощь студентам 2 04.06.2010 23:16
Среди 20 введёных чисел определить чётные, распечатать их, определить min Spade Помощь студентам 4 15.06.2008 18:39