|
mari Пользователь Сообщений: 18 |
Нужна формула, определяющая по дате рождения какой это знак зодиака. |
|
mazayZR  Пользователь Сообщений: 950 |
|
|
Видимо и астрологам без Excel никак… |
|
|
mari Пользователь Сообщений: 18 |
{quote}{login=mazayZR}{date=06.06.2008 11:40}{thema=}{post}можно так Здесь дело не только в месяце но и в дате. В периоде дат. |
|
mari Пользователь Сообщений: 18 |
А можно в впр засунуть два искомых значения? |
|
mazayZR Пользователь Сообщений: 950 |
все можно |
|
mari Пользователь Сообщений: 18 |
{quote}{login=mazayZR}{date=06.06.2008 12:57}{thema=}{post}все можно Пожалуйста, вот табличка. |
|
Igor67  Пользователь Сообщений: 3726 |
Марина, не могу пока качать файлф, но ЕСЛИ можно рассширить используя несколько столбцов и в крайнем условии указывая ссылку на следующий столбец. |
|
mazayZR Пользователь Сообщений: 950 |
вот, сегодня добрался до вашего шаманства с днями рождения. |
|
Urfin Пользователь Сообщений: 51 |
Всем доброго времени суток! |
|
Что-то в таком духе: =ПРОСМОТР(ДАТА(1900;МЕСЯЦ(A1);ДЕНЬ(A1));{1;21;50;81;112;143;174;205;217;268;298;328;357};{«Козерог»;»Водолей»;»Рыбы»;»Овен»;»Телец»;»Близнецы»;»Рак»;»Лев»;»Дева»;»Весы»;»Скорпион»;»Стрелец»;»Козерог»}) где A1 содержит искомую дату. |
|
|
Urfin Пользователь Сообщений: 51 |
#13 13.05.2010 07:20:29 Огромное спасибо ребята!!! |
Формулировка задачи:
По введенной дате рождения определить знак задиака.
Овен 21.03 — 20.04
Телец 21.04 — 20.05
Близнецы 21.05 — 21.06
Рак 22.06 — 22. 07
Лев 23.07 — 23.08
Дева 24.08 — 23.09
Весы 24.09 — 23.10
Скорпион 24.10 — 22.11
Стрелец 23.11 — 21.12
Козерог 22.12 — 20.01
Водолей 21.01 — 19.02
Рыбы 20.02— 20 .03
Код к задаче: «По введенной дате рождения определить знак задиака»
textual
Option Explicit
Sub Зодиак()
Dim d As Date
d = InputBox("Дату!")
MsgBox Z(d)
End Sub
'****************************
Function Z(t As Date)
Dim m As Byte, d As Byte
m = Month(t): d = Day(t)
Select Case m
Case 1: If d <= 20 Then Z = "Козерог" Else Z = "Водолей"
Case 2: If d <= 19 Then Z = "Водолей" Else Z = "Рыбы"
Case 3: If d <= 20 Then Z = "Рыбы" Else Z = "Овен"
Case 4: If d <= 20 Then Z = "Овен" Else Z = "Телец"
Case 5: If d <= 20 Then Z = "Телец" Else Z = "Близнецы"
Case 6: If d <= 21 Then Z = "Близнецы" Else Z = "Рак"
Case 7: If d <= 22 Then Z = "Рак" Else Z = "Лев"
Case 8: If d <= 23 Then Z = "Лев" Else Z = "Дева"
Case 9: If d <= 23 Then Z = "Дева" Else Z = "Весы"
Case 10: If d <= 23 Then Z = "Весы" Else Z = "Скорпион"
Case 11: If d <= 22 Then Z = "Скорпион" Else Z = "Стрелец"
Case 12: If d <= 21 Then Z = "Стрелец" Else Z = "Козерог"
End Select
End Function
Полезно ли:
15 голосов , оценка 4.133 из 5
РЕЦЕНЗИЯ
Название
работы — «Составление гороскопов в Microsoft
Office»
Ф.И.О.
—
Место учебы
автора — 5 Б класс МОУ СОШ
Предметная
область — информатика
Данная
работа представляет собой электронный продукт в виде презентации,
подготовленной с использованием информационной технологии PowerPoint, и программы, составленной в Excel, для расчета
личного гороскопа.
Для
создания гороскопов использованы программы пакета Microsoft
Office – программа презентаций
Power Point и программа Excel, которые
автор самостоятельно освоил. Выдержаны все этапы создания презентации. Слайды
насыщены анимационными эффектами. Рисунки, цифры, текст очень красочные, яркие.
Для поиска необходимых картинок автор использовал Интернет. Автор изучил и
грамотно использует в практике составление формул для расчета гороскопов,
использующих сложные стандартные функции в большом количестве.
Составление гороскопа – это деятельность, которая мотивируется
не результатами: автор получил удовольствие от самого процесса работы. А это
важное условие формирования полноценной учебной деятельности.
Очевидный
результат данной работы – это деятельность автора, позволяющая проявить себя,
попробовать свои силы, приложить свои знания, показать публично достигнутый
результат, который носит практический характер, имеет прикладное значение, и,
самое важное, интересен и значит, полезен для автора.
Результаты данной
работы демонстрируют самостоятельное приобретение знаний, использование их для творчества,
отработки практических навыков.
Считаю,
что данная работа достойна быть представленной на научно-практической
конференции школьников.
Рецензент ______________
ПРЕДСТАВЛЕНИЕ
учебно-исследовательской работы
Название
работы — «Составление гороскопов в Microsoft
Office»
Ф.И.О.
—
Место учебы
автора — 5 Б класс МОУ
Ф.И.О.
консультанта —
Предметная
область — информатика
Гипотеза
С помощью
компьютерных программ пакета Microsoft Office можно
наглядно и интересно представлять гороскопы различных видов.
Методика и
материал
—
подбор и систематизация теоретического материала;
—
знакомство с программой Power Point, Excel;
—
поиск и подбор рисунков к презентации;
—
разработка презентации, в которой отражены этапы реализации проекта;
—
разработка вычислений для составления гороскопа в программе Excel.
Результаты
Создание презентации,
знакомящей с гороскопом по знакам зодиака, и компьютерного варианта гороскопа
в Excel.
Практическое
применение
— при проведении
недели информатики;
— на уроках при
изучении программы презентаций Power Point, Excel
Удостоверяем, что
автор выполнил и подготовил эту работу к представлению на районную
научно-практическую конференцию школьников самостоятельно под руководством
руководителя.
«____»
__________________ 2009г. автор
_____________________
«____»
__________________ 2009г.
руководитель_______________
ТЕЗИСЫ
учебно-исследовательской работы
«Компьютерные ребусы в
программе Power Point»
Название
работы — «Составление гороскопов в Microsoft
Office»
Ф.И.О.
—
Место учебы автора
— 5 Б класс МОУ
Ф.И.О.
консультанта —
Предметная
область — информатика
А вы знаете свой гороскоп? Я, как и многие ребята, увлекаюсь гороскопами. И
когда мы начали на факультативе изучать программу пакета Microsoft Office, я решила сделать презентацию гороскопа в этой программе. Мною была
разработана компьютерная презентация из 30 слайдов с помощью программы
презентации Power Point.
В
работе на слайдах представлено содержание гороскопов по знакам зодиака.
Для
реализации своей работы я познакомилась с основными требованиями к оформлению
презентаций; со средой Power Point; основными
инструментами программной среды
Power Point; научилась создавать слайды, вставлять изображения, настраивать
анимацию объектов, использовать гиперссылки для организации просмотра.
На первом
слайде представлено меню, содержащее основные разделы гороскопа, с каждым из
которых можно познакомиться, перейдя по гиперссылке.
Мне было
интересно работать с такой программой. Но мне захотелось больше узнать про свой
личный гороскоп. Тогда я, по совету руководителя, решила изучить возможности
программы пакета Microsoft Office Excel, где можно
построить личный гороскоп по дате рождения. Для этого я познакомилась с
формулами, стандартными функциями данной программы, необходимые для достижения
моей цели. И у меня получился компьютерный гороскоп, который я предлагаю
вашему вниманию.
Мне очень
понравилось работать с программами пакета Microsoft Office
и узнавать много нового с помощью компьютера.