Методы автоматизации при работе в MS Excel. Синявская Г.А. - 17 стр.

      И наоборот, можно собрать дату из отдельных компонентов с помощью
функции DateSerial, например: DateSerial(1998.3.21) = “21/03/98”.
      Аналогичные функции существуют для времени: Hour, Minute, Second,
TimeSerial.
      Функции Weekday и WeekdayName возвращают, соответственно, номер и
наименование дня недели, на который приходится указанная дата. Возвращае-
мый функцией Weekday номер дня недели зависит от необязательного парамет-
ра < первыйДеньНедели>. Если этот параметр пропущен, первым днем недели
считается воскресенье. Функция WeekdayName преобразует номер дня недели в
наименование. Она имеет тот же необязательный параметр <первыйДеньНеде-
ли>, но по умолчанию использует региональные установки (для русскоязычных
версий первым днем недели считается понедельник).

Пример:
Для русскоязычных версий необязательный параметр для функции Weekday должен быть
vbMonday или 2. Тогда эта функция возвращает привычный нам номер2:
      n = Weekday(#2/5/2004#, vbMonday)
      Worksheets("Первый").Range("b12") = n
Для использования этого номера (регионального) в функции WeekdayName необязательный
параметр либо не указывается, либо используются значения: vbMonday или 2.
      Worksheets("Первый").Range("a12") = WeekdayName(n , , vbMonday)
В результате в ячейках А12:В12 имеем:

четверг                           4

Можно также использовать в обоих случаях значение необязательного параметра 0. Тогда
будут использоваться региональные установки.
Имя дня недели можно получить в ячейке а12, воспользовавшись одним предложением:

         Worksheets("Первый").Range("a12") = WeekdayName(Weekday(#2/1/2004#, 0))

1 февраля 2004 г. — воскресенье:

воскресенье              - ячейка А12

      Кроме этих отдельных функций существует функция DatePart, которая
может вернуть любую часть даты. Функция имеет два обязательных и два не-
обязательных аргумента:
DatePart(<интервал>,<дата>[,<первыйДеньНедели>[,<перваяНеделяГода>]]).
     Первый аргумент <интервал> указывает, какую часть даты, передаваемой
в качестве второго параметра, нужно вернуть. Возможные значения этого пара-
метра представлены в табл. 2.


          2
              Здесь и далее мы продолжаем работу с процедурой Proba1() и листом “ Первый” приложения MS
Excel.



                                                        17