Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > обработка даты в excel


Автор: Guest_Андрей 3.4.2003, 19:27
Привет всем.
Разбираю VB for Office в excele 97/2000 и нашел такой баг:
пытаюсь из даты выделить год такой функцией:

Year(ThisWorkbook.Sheets("name1").Cells(3, 2))

Функция не работает, если месяц - февраль (кстати не работают все функции для обработки дат (day, month и т.д.)
Баг присутствует в версии excel97 и благополучно перешел в версию 2000.
Может кто подскажет как его можно пофиксить? (Очень нужно butbut.gif)


Автор: Batya 11.4.2003, 21:19
я попробовал .... ввел дату "2 Февраля 2003" ...... вызвал макрос:
Private Sub CommandButton1_Click()
MsgBox (Year(ThisWorkbook.Sheets("Лист1").Cells(3, 2)))
End Sub

а он мне меседжбокс отправил с содержанием "2003"
confused.gif??
так что все работает

Автор: Oleg A 16.4.2003, 09:03
ДУмаю проблема с типом даных. Попробуй сперва преобразовать в "Date".
Year(DateValue(ThisWorkbook.Sheets("Лист1").Cells(3, 2).value))
или
Year(СDate(ThisWorkbook.Sheets("Лист1").Cells(3, 2).value))


Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)