Формат Даты

[katerinkaj]

Сообщение от IgorGO

предпоследняя попытка.
1. открываете Ваш файл
2. делаете активным лист с непокорными датами
3. правой кнопкой по ярлыку листа, исходный текст (открываетеся редактор ВБА)
4. копируете это

Sub CnvDate()
    Columns("H:H").NumberFormat = "mm\/dd\/yyyy"
    For r = 1 To Cells(Rows.Count, 8).End(xlUp).Row
      Cells(r, 8) = CDate(Cells(r, 8))
    Next
End Sub

ставите курсор куда-нибудь в текст этой процедуры
5. жмете F5
6. смотрите на лист с данными.

я уже даже не знаю аттачить ли мне то, что он выдает.... но сделать то, что надо он не сделал, еще и ругнулся еррором. может у меня что-то с экселем? может там какие-то галочки надо снять/отметить? я уже и не знаю что думать...

[katerinkaj]

Сообщение от Sasha.13

У меня Excel отказывается менять формат ячеек в вашем файле, ругается на большое количество стилей. Возможно проблема в этом.

просто это данные после обработки макросом. я могу прислать любой другой файлик, мне совершенно нет разницы менять дату до обработки макросом или после.

[IgorGO]

интуиция не подвела... то была предпоследняя попытка... осталась одна)))
выложите сюда ваш файл. удалите ненужные листы, очистите все колонки на нужном листе, оставьте только даты в колонке Н.
я конвертирую, выкладываю обратно. скопировать колонку и положить в свой файл сможете... надеюсь

[katerinkaj]

Сообщение от IgorGO

интуиция не подвела... то была предпоследняя попытка... осталась одна)))
выложите сюда ваш файл. удалите ненужные листы, очистите все колонки на нужном листе, оставьте только даты в колонке Н.
я конвертирую, выкладываю обратно. скопировать колонку и положить в свой файл сможете... надеюсь

Игорь, вы будете мне каждую неделю конвертить? мне придется делиться с вами зарплатой тогда у меня тут еще 11 человек причем

[IgorGO]

Игорь, вы будете мне каждую неделю конвертить?

за деньги - хоть каждый день! минуточку... а какое мне жалование будет положено?

А если серьезно, общественное мнение сошлось на том, что проблема в количестве пользовательских форматов...
если Вы думаете, что я такой формат написал
NumberFormat = "mm\/dd\/yyyy"
то я писал так
NumberFormat = "mm/dd/yyyy", когда делал в ручном режиме слэши эксель подставил сам, я этой подскаской воспользовался. и дата выглядит прилично именно так "mm/dd/yyyy", хотя формат задан так "mm\/dd\/yyyy".

У кого есть время и вдохновение, может разберет что это такое. по моей классификации это "непонятка".

[katerinkaj]

Сообщение от IgorGO

минуточку... а какое мне жалование будет положено?

ох тут уже на на выбор в зависимости от ваших пристрастий - либо печенки либо конфетки

Сообщение от IgorGO

общественное мнение сошлось на том, что проблема в количестве пользовательских форматов...

ну хорошо. я рада что на чем-то сошлись наконец. а как эти форматы очистить? или это все - тупик тупиковый?

[Serge_Bliznykov]

и какой прогой нужно открывать формат *.uvf ??

uvScreenCamera


добавлено
Если не поможет сброс стилей, katerinkaj, а можете сделать (лично для меня ) такую работу?
создать новый пустой документ. Выделить столбец с датами. Скопировать его.
Перейти в новый документ. в столбец H (это важно). "Специальная вставка" -
выбрать значения: "Вставить (*) Значения" и поставьте птичку "[v] Пропускать пустые ячейки"
Нажать ОК.
Сохранить.

дальше.
1) закрыть всё и открыть только новый документ с этими данными. Попытаться выполнить макрос Игоря.
Если он отработает - БИНГО! Выделяйте столбец и копируйте обратно.
Если не отработает.
То выложить этот новый документ (с одним столбцом H) и скриншотом ошибки сюда, на форум.

p.s. я не верю, что Сообщество не сможет победить Ваш хитрый файл!

[katerinkaj]

Сообщение от doober

Прошу прощения,не глянул формат выходного файла.Заменил.Теперь можно смотреть

ЗЫ.Если ничего не помежет,брать офис и к батюшке

не помогло и это. к сожаления переинсталить офис у меня нет прав.

[katerinkaj]

Сообщение от Serge_Bliznykov

_
p.s. я не верю, что Сообщество не сможет победить Ваш хитрый файл!

я тоже свято верю в то, что невероятностей не бывает и что все можно решить. вопрос только - как..

[doober]

Дело не в файле,формат применился нормально.
Файл и сопровождение прилагаю

.Если ничего не помежет,брать офис и к батюшке

Я думаю актуально