11.10.2007, 02:36
общий
это ответ
Здравствуйте, Жорж!
Сервис->Параметры->Редактор Visual Basic
Там создаете модуль, в нем функцию (в приложении).
Допустим, дата в ячейке A1, тогда в ячейке, где должен быть день недели (например, B1) пишете формулу:
=DayOfWeek(ДЕНЬНЕД(A1))
Приложение:
Function DayOfWeek(DayNum as Integer) as String Dim DoW() Dow = Array("Воскресенье", "Понедельник", "Вторник", "Среда", "Четверг", "Пятница", "Суббота") DayOfWeek = DoW(DayNum)End Function