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

Вход

Регистрация

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

 

= Мир MS Excel/Дни рождения этого месяца - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Дни рождения этого месяца (Макросы/Sub)
Дни рождения этого месяца
Otter Дата: Вторник, 09.06.2015, 14:49 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Доброе время суток.

Как сделать формулы или можно макросами, чтобы в нижней таблице дни рождения текущего месяца были всегда вверху. Пустые строчки таблицы удалять нельзя. Они должны всегда заполняться актуальными данными из верхней таблицы.

P.S. Если вопрос написал не в той теме тогда поправьте.
К сообщению приложен файл: 30_.xlsm (18.6 Kb) · 9066426.jpg (35.4 Kb)


Сообщение отредактировал Otter - Вторник, 09.06.2015, 14:54
 
Ответить
СообщениеДоброе время суток.

Как сделать формулы или можно макросами, чтобы в нижней таблице дни рождения текущего месяца были всегда вверху. Пустые строчки таблицы удалять нельзя. Они должны всегда заполняться актуальными данными из верхней таблицы.

P.S. Если вопрос написал не в той теме тогда поправьте.
Автор - Otter
Дата добавления - 09.06.2015 в 14:49
Pelena Дата: Вторник, 09.06.2015, 16:43 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19197
Репутация: 4423 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
Формула массива
Код
=ЕСЛИОШИБКА(ИНДЕКС($A$2:$F$8;НАИМЕНЬШИЙ(ЕСЛИ($E$2:$E$8=$J$1;СТРОКА($A$2:$A$8)-1);СТРОКА(A1));СТОЛБЕЦ(A1));"")
К сообщению приложен файл: 3740196.xlsm (18.3 Kb)

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
Формула массива
Код
=ЕСЛИОШИБКА(ИНДЕКС($A$2:$F$8;НАИМЕНЬШИЙ(ЕСЛИ($E$2:$E$8=$J$1;СТРОКА($A$2:$A$8)-1);СТРОКА(A1));СТОЛБЕЦ(A1));"")
Автор - Pelena
Дата добавления - 09.06.2015 в 16:43
Otter Дата: Вторник, 09.06.2015, 17:32 | Сообщение № 3
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Спасибо большое. С массивами еще не имел дела и возникли затруднения.
Поясните пожалуйста как пользоваться этой формулой массива.


Сообщение отредактировал Otter - Среда, 10.06.2015, 11:18
 
Ответить
СообщениеСпасибо большое. С массивами еще не имел дела и возникли затруднения.
Поясните пожалуйста как пользоваться этой формулой массива.
Автор - Otter
Дата добавления - 09.06.2015 в 17:32
Otter Дата: Среда, 10.06.2015, 11:19 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Пробовал вставлять CTRL+SHIFT+ENTER, но видимо надо как то по другому.
К сообщению приложен файл: 2037529.jpg (39.2 Kb)
 
Ответить
СообщениеПробовал вставлять CTRL+SHIFT+ENTER, но видимо надо как то по другому.
Автор - Otter
Дата добавления - 10.06.2015 в 11:19
Pelena Дата: Среда, 10.06.2015, 11:39 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 19197
Репутация: 4423 ±
Замечаний: ±

Excel 365 & Mac Excel
На Вашей картинке формулы не видно.
Перед тем, как нажимать CTRL+SHIFT+ENTER, поставьте курсор в строку формул. После нажатия CTRL+SHIFT+ENTER вокруг формулы должны появиться фигурные скобки

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеНа Вашей картинке формулы не видно.
Перед тем, как нажимать CTRL+SHIFT+ENTER, поставьте курсор в строку формул. После нажатия CTRL+SHIFT+ENTER вокруг формулы должны появиться фигурные скобки
Автор - Pelena
Дата добавления - 10.06.2015 в 11:39
Otter Дата: Среда, 10.06.2015, 12:33 | Сообщение № 6
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Формула массива эта
Код
=ЕСЛИОШИБКА(ИНДЕКС($A$2:$F$8;НАИМЕНЬШИЙ(ЕСЛИ($E$2:$E$8=$J$1;СТРОКА($A$2:$A$8)-1);СТРОКА(A1));СТОЛБЕЦ(A1));"")
У вас она меняется в массиве как относительные ссылки, а у меня получается одна формула на весь массив. В ячейке В13 у Вас данные меняются с А1 на B1. У меня на весь массив А1 не меняется, поэтому и копирует неправильно. Работаю с файлом со второго сообщения.
К сообщению приложен файл: 8951548.jpg (20.2 Kb) · 1742825.jpg (19.9 Kb)


Сообщение отредактировал Otter - Среда, 10.06.2015, 12:36
 
Ответить
СообщениеФормула массива эта
Код
=ЕСЛИОШИБКА(ИНДЕКС($A$2:$F$8;НАИМЕНЬШИЙ(ЕСЛИ($E$2:$E$8=$J$1;СТРОКА($A$2:$A$8)-1);СТРОКА(A1));СТОЛБЕЦ(A1));"")
У вас она меняется в массиве как относительные ссылки, а у меня получается одна формула на весь массив. В ячейке В13 у Вас данные меняются с А1 на B1. У меня на весь массив А1 не меняется, поэтому и копирует неправильно. Работаю с файлом со второго сообщения.
Автор - Otter
Дата добавления - 10.06.2015 в 12:33
Pelena Дата: Среда, 10.06.2015, 12:41 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 19197
Репутация: 4423 ±
Замечаний: ±

Excel 365 & Mac Excel
Вы должны ввести формулу массива в ОДНУ ячейку, а потом как обычно протянуть её вниз и вправо.
На картинках всё правильно, прикладывайте тогда кусок файла

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеВы должны ввести формулу массива в ОДНУ ячейку, а потом как обычно протянуть её вниз и вправо.
На картинках всё правильно, прикладывайте тогда кусок файла
Автор - Pelena
Дата добавления - 10.06.2015 в 12:41
Otter Дата: Среда, 10.06.2015, 12:42 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Вот мой файл с ошибкой. Делал по правилам массива.
К сообщению приложен файл: 30_1.xlsm (17.8 Kb)
 
Ответить
СообщениеВот мой файл с ошибкой. Делал по правилам массива.
Автор - Otter
Дата добавления - 10.06.2015 в 12:42
Otter Дата: Среда, 10.06.2015, 12:55 | Сообщение № 9
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Цитата Pelena, 10.06.2015 в 12:41, в сообщении № 7
Вы должны ввести формулу массива в ОДНУ ячейку, а потом как обычно протянуть её вниз и вправо.
Так формула копируется правильно, но тогда как в фигурные скобки все загнать, чтобы теперь эти формулы были в массиве.

У меня получается правильные формулы , но без массива или массив с постоянной формулой во всем диапазоне. Что то где то я не так делаю, даже обидно с такой ерундой мучаюсь.


Сообщение отредактировал Otter - Среда, 10.06.2015, 13:07
 
Ответить
Сообщение
Цитата Pelena, 10.06.2015 в 12:41, в сообщении № 7
Вы должны ввести формулу массива в ОДНУ ячейку, а потом как обычно протянуть её вниз и вправо.
Так формула копируется правильно, но тогда как в фигурные скобки все загнать, чтобы теперь эти формулы были в массиве.

У меня получается правильные формулы , но без массива или массив с постоянной формулой во всем диапазоне. Что то где то я не так делаю, даже обидно с такой ерундой мучаюсь.
Автор - Otter
Дата добавления - 10.06.2015 в 12:55
Pelena Дата: Среда, 10.06.2015, 13:27 | Сообщение № 10
Группа: Админы
Ранг: Местный житель
Сообщений: 19197
Репутация: 4423 ±
Замечаний: ±

Excel 365 & Mac Excel
Сейчас выделяете диапазон F13:F19 и нажимаете DELETE.
Встаете в ячейку А13 и вводите Вашу формулу как формулу массива (Ctrl+Shift+Enter), после этого фигурные скобки уже появятся.
Дальше копируете эту формулу вниз и вправо

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеСейчас выделяете диапазон F13:F19 и нажимаете DELETE.
Встаете в ячейку А13 и вводите Вашу формулу как формулу массива (Ctrl+Shift+Enter), после этого фигурные скобки уже появятся.
Дальше копируете эту формулу вниз и вправо
Автор - Pelena
Дата добавления - 10.06.2015 в 13:27
Otter Дата: Среда, 10.06.2015, 14:01 | Сообщение № 11
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Все получилось. Спасибо
Цитата
Встаете в ячейку А13 и вводите Вашу формулу как формулу массива (Ctrl+Shift+Enter), после этого фигурные скобки уже появятся.
Это получился как бы массив в одной ячейке. Когда сделал копирование этой ячейки на весь диапазон A13:F19 все заработало.


Сообщение отредактировал Otter - Среда, 10.06.2015, 14:07
 
Ответить
СообщениеВсе получилось. Спасибо
Цитата
Встаете в ячейку А13 и вводите Вашу формулу как формулу массива (Ctrl+Shift+Enter), после этого фигурные скобки уже появятся.
Это получился как бы массив в одной ячейке. Когда сделал копирование этой ячейки на весь диапазон A13:F19 все заработало.
Автор - Otter
Дата добавления - 10.06.2015 в 14:01
Pelena Дата: Среда, 10.06.2015, 14:03 | Сообщение № 12
Группа: Админы
Ранг: Местный житель
Сообщений: 19197
Репутация: 4423 ±
Замечаний: ±

Excel 365 & Mac Excel
Да, конечно А13:F19

Может, у Вас включен ручной пересчёт формул? Нажмите F9. Пересчиталось?

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеДа, конечно А13:F19

Может, у Вас включен ручной пересчёт формул? Нажмите F9. Пересчиталось?
Автор - Pelena
Дата добавления - 10.06.2015 в 14:03
Otter Дата: Среда, 10.06.2015, 14:09 | Сообщение № 13
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 174
Репутация: 0 ±
Замечаний: 0% ±

Excel 2019, Word 2019
Спасибо за помощь. Подправил свой предыдущий пост.
 
Ответить
СообщениеСпасибо за помощь. Подправил свой предыдущий пост.
Автор - Otter
Дата добавления - 10.06.2015 в 14:09
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Дни рождения этого месяца (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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