Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 16.04.2009, 13:58   #1
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 308
По умолчанию Формат даты

Здравствуйте! вопрос в следующем.
из внешнего источника приходят данные, где значения даты представлены в формате дд.мм.гггг , а иногда и в общем формате (например: дата 27.11.2008 приходит как 39779).
Мне же, для правильной выгрузки, нужно что бы дата в значениях имела формат дд.мм.гг.
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Старый 16.04.2009, 14:01   #2
mchip
Форумчанин
 
Регистрация: 24.06.2008
Сообщений: 516
По умолчанию

Попробуй установить формат ячейки ДАТА
Можно сделать все! Было бы время, да деньги...
mchip вне форума Ответить с цитированием
Старый 16.04.2009, 14:05   #3
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 308
По умолчанию

Дело не в формате ячейки, т.е. то что вы предлогаете, это всего лишь визуальный формат, а мне нужны значения, для дальнейшего импортирования, где программа не учитывает "форматы ячеек"
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Старый 16.04.2009, 14:21   #4
mchip
Форумчанин
 
Регистрация: 24.06.2008
Сообщений: 516
По умолчанию

Если в 2 ячейки с разным форматированием ввести значение "39779", а потом сохранить файл как текст. то получится "39779 27.11.2008"
Какая программа не учитывает, как происходит импорт? Уточните вопрос.
Можно сделать все! Было бы время, да деньги...
mchip вне форума Ответить с цитированием
Старый 16.04.2009, 14:43   #5
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,180
По умолчанию

Выделите требуемый диапазон и выполните макрос:
Код:
Sub InDate()
    On Error Resume Next
    For Each Cell In Selection
        Cell.Value = CStr(CDate(Cell.Value))
    Next
End Sub
Чем шире угол зрения, тем он тупее.
SAS888 вне форума Ответить с цитированием
Старый 16.04.2009, 14:49   #6
Iskin
Форумчанин
 
Регистрация: 22.09.2008
Сообщений: 308
По умолчанию

спасибо! вопрос закрыт
Думайте глобально - действуйте локально!
Iskin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Формат даты Green_C@t Общие вопросы Delphi 3 22.09.2009 10:05
Формат даты. IVANSour Общие вопросы Delphi 1 18.01.2009 15:36
Формат даты разняться в Delphi Cantana Помощь студентам 4 28.04.2008 09:16
Как установить формат даты на всю книгу ? SD_KOROLEV Microsoft Office Excel 3 02.03.2008 20:14
Как изменить формат отбражаемой даты? Vindigo Помощь студентам 1 27.01.2008 22:25