Текстовая дата с 2 значным годом как исправить

 

бухарик

Пользователь

Сообщений: 24
Регистрация: 25.07.2014

Помогите чайнику-бухгалтеру, плиз. Регулярно получаю для работы файлы-EXEL от одной конторы, в таблице в ячейках показывает Ошибка-техстовая дата с 2-значным годом, хотя там числа (так видимо импортируется из какой то программы типа 1с). Как преобразовать формат ячеек в «числовой» чтоб нормально хотя бы просуммировать диапазон

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

 

1. формат ячеек — дата
2. в любую пустую ячейку 0, скопировать ее
3. отмечаете диапазон с текстовыми датами
4. правая кнопка мыши, специальная вставка
5. отмечаете Значения, операции — Сложить
6. Ок

приблизительно это только на этом форуме написано раз 100, не менее

Программисты — это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

 

БМВ

Модератор

Сообщений: 21634
Регистрация: 28.12.2016

Excel 2013, 2016

Ігор Гончаренко, не горячись.

бухарик,
1. там должны быть числа или даты? Скорее всего числа и они записаны текстом.
2. Скорее всего десятичный разделитель у вас запятая, а при экспорте использована точка.
3. Если это так, то проверьте формат ячеек, чтоб был основной или числовой и заменой меняйте точку на запятую.
4. а если все ж точка, то метод из #2

Изменено: БМВ05.05.2021 08:10:55

По вопросам из тем форума, личку не читаю.

 

бухарик

Пользователь

Сообщений: 24
Регистрация: 25.07.2014

да, там точка. системный разделитель у меня запятая. может потому  так и происходит?
блин, убрал в настройках EXEL «использовать системные разделители» и поставил «использовать точку»
проблема решилась…   а для чего эта фишка вообще надо? на что влияет кроме такой ситуации?

Изменено: бухарик05.05.2021 08:32:09

 

ATK

Пользователь

Сообщений: 177
Регистрация: 28.12.2014

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

 

бухарик

Пользователь

Сообщений: 24
Регистрация: 25.07.2014

#6

06.05.2021 06:06:39

не ругайтесь — для создания обработки мне не хватает тех познаний что у вас, я больше по бухучету, максимум макрос могу. но спасибо что не отказали чайнику в отличие от других

В B2 формула СУММЕСЛИ (формулы я вставил текстом ниже), она берет данные из F, в F ВПР берет данные из K.
Почему-то эксель считает данные в K «текстовая дата с 2-значным годом» и из-за этого итоговая формула почему-то ломается, добавляя в СУММЕСЛИ значения, например 1.20,хотя критерий стоит только 1.1
Как-то можно это победить? Отформатировать исходные данные или дополнить формулу?

пример

задан 5 мар 2020 в 11:04

skawn's user avatar

СУММЕСЛИ «умная», она сама умеет преобразовывать данные (даже когда это не требуется). (Это касается условия, данные диапазонов функция не меняет)

1.1 — это в числовом выражении дата — 1 января, 1.2 — 1 февраля или 2 января (зависит от настроек). Избежать преобразования в СУММЕСЛИ не получится. Можно изменить данные (чего-нибудь добавить (1.2q) или заменить точку на какую-нибудь закоряку), но зачем так извращаться?

Применим другую функцию:

=СУММПРОИЗВ(--(F2:F6=A2);G2:G6)

ответ дан 5 мар 2020 в 11:51

vikttur_Stop_RU_war_in_UA's user avatar

7

Excel для Microsoft 365 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Excel 2010 Еще…Меньше

Даты часто являются важной частью анализа данных. Вы часто задаете такие вопросы, как: когда был приобретен продукт, сколько времени займет задача в проекте или каков средний доход за финансовый квартал? Правильное ввод дат важно для обеспечения точных результатов. Но форматирование дат для их понимания не менее важно для обеспечения правильной интерпретации результатов.

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

Excel даты в качестве последовательных чисел, которые называются серийными значениями. Например, в Excel для Windows 1 января 1900 г. является число 1, а 1 января 2008 г. — число 39448, поскольку после 1 января 1900 г. это 39 448 дней.

Excel время в десятичных дробях, так как время считается частью дня. Десятичная цифра — это значение в диапазоне от 0 до 0,999999999, представляющее время от 0:00:00 до 23:59:59.

Так как даты и время являются значениями, их можно добавлять, вычитать и включать в другие вычисления. Вы можете просмотреть дату как порядковый номер, а время — как дробную часть, изменив формат ячейки с датой или временем на Общий.

Обе Excel для Mac и Excel для Windows поддерживают системы дат 1900 и 1904. Система дат по умолчанию для Excel для Windows — 1900; и система дат по умолчанию для Excel для Mac — 1904.

Изначально Excel для Windows была основана на системе дат 1900, так как она стала лучшей совместимостью с другими программами электронных таблиц, которые запускались в ms-DOS и Microsoft Windows, поэтому она стала системой дат по умолчанию. Изначально система Excel для Mac была основана на системе дат 1904 г., так как она была лучшей совместимости с компьютерами macintosh, которые не поддерживают даты до 2 января 1904 г., поэтому она стала системой дат по умолчанию.

В следующей таблице показаны первая и последняя даты для каждой системы дат и порядковый номер, связанный с каждой датой.

Система дат

Первая дата

Дата последней встречи

1900

1 января 1900 г.
(порядковый номер 1)

31 декабря 9999 г.
(порядковый номер 2958465)

1904

2 января 1904 г.
(порядковый номер 1)

31 декабря 9999 г.
(порядковый номер 2957003)

Так как в двух системах дат используются разные начальные дни, в каждой системе дат одинаковые даты представлены разными серийными значениями. Например, 5 июля 2007 г. может иметь два разных серийных значения в зависимости от используемой системы дат.

Система дат

Порядковый номер от 5 июля 2007 г.

1900

37806

1904

39268

Разница между двумя системами дат составляет 1462 дня; то есть порядковый номер даты в системе дат 1900 всегда на 1462 дня больше, чем в системе дат 1904. И наоборот, порядковый номер даты в системе дат 1904 года всегда на 1462 дня меньше, чем в системе дат 1900. 1462 дня — это четыре года и один день (включая високосный день).

Важно: Чтобы обеспечить интерпретацию значений года как нужно, введите значения года как четыре цифры (например, 2001, а не 01). Вводя четырехзначные годы, Excel не будет интерпретировать век.

Если ввести дату с двузначным номером года в текстовую ячейку или в качестве текстового аргумента функции, например =ГОД(«1.01.31»), Excel интерпретирует год следующим образом:

  • 00-29     интерпретируется как годы с 2000 по 2029 год. Например, если ввести дату 28.05.2019,Excel предполагается, что это 28 мая 2019 г.

  • 30-99     интерпретируется как годы с 1930 по 1999. Например, если ввести дату 28.05.98,Excel предполагается, что это 28 мая 1998 г.

В Microsoft Windows вы можете изменить способ интерпретации двухзначного года для всех установленных Windows программ.

Windows 10

  1. В поле поиска на панели задач введите панельуправления , а затем выберите Панель управления.

  2. В области Часы, язык и регионщелкните Изменить форматы даты, времени или числа

  3. Выберите язык и региональные параметры.

  4. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  5. Перейдите на вкладку Дата.

  6. В поле При входе двухзначного года интерпретировать его как год между, измените верхний предел для года.

    Когда вы изменяете верхний предел года, он автоматически изменяется.

  7. Нажмите кнопку ОК.

Windows 8

  1. Проведите пальцем от правого края экрана к краю экрана, коснитесь пункта Поиск (или, если вы используете мышь, наведите указатель на правый верхний угол экрана, переместите указатель мыши вниз, а затем нажмите Поиск ),введите Панель управления в поле поиска, а затем нажмите или щелкните Панель управления.

  2. В области Часы, язык и регионщелкните Изменить форматы даты, времени или числа.

  3. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  4. Перейдите на вкладку Дата.

  5. В поле При входе двухзначного года интерпретировать его как год между, измените верхний предел для года.

    Когда вы изменяете верхний предел года, он автоматически изменяется.

  6. Нажмите кнопку ОК.

Windows 7

  1. Нажмите кнопку Пуск и выберите пункт Панель управления.

  2. Щелкните Язык и регион.

  3. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  4. Перейдите на вкладку Дата.

  5. В поле При входе двухзначного года интерпретировать его как год между, измените верхний предел для года.

    Когда вы изменяете верхний предел года, он автоматически изменяется.

  6. Нажмите кнопку ОК.

По умолчанию при вводе дат в книгу даты форматируется для отображения двухзначных лет. При изменении формата даты по умолчанию с помощью этой процедуры отображение дат, которые были ранее введены в книгу, изменится на новый, если даты не отформатированы с помощью диалогового окна Формат ячеек (на вкладке Главная в группе Число нажмите кнопку запуска диалогового окна ).

Windows 10

  1. В поле поиска на панели задач введите панельуправления , а затем выберите Панель управления.

  2. В области Часы, язык и регионщелкните Изменить форматы даты, времени или числа

  3. Выберите язык и региональные параметры.

  4. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  5. Перейдите на вкладку Дата.

  6. В списке Краткий формат даты выберите формат, использующий четыре цифры для года («yyyy»).

  7. Нажмите кнопку ОК.

Windows 8

  1. Проведите пальцем от правого края экрана к краю экрана, коснитесь пункта Поиск (или, если вы используете мышь, наведите указатель на правый верхний угол экрана, переместите указатель мыши вниз, а затем нажмите Поиск ),введите Панель управления в поле поиска, а затем нажмите или щелкните Панель управления.

  2. В области Часы, язык и регионщелкните Изменить форматы даты, времени или числа.

  3. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  4. Перейдите на вкладку Дата.

  5. В списке Краткий формат даты выберите формат, использующий четыре цифры для года («yyyy»).

  6. Нажмите кнопку ОК.

Windows 7

  1. Нажмите кнопку Пуск и выберите пункт Панель управления.

  2. Щелкните Язык и регион.

  3. В диалоговом окне Регион нажмите кнопку Дополнительные параметры.

  4. Перейдите на вкладку Дата.

  5. В списке Краткий формат даты выберите формат, использующий четыре цифры для года («yyyy»).

  6. Нажмите кнопку ОК.

Система дат автоматически изменяется при открытом документе с другой платформы. Например, если вы работаете в Excel и открываете документ, созданный в Excel для Mac, то автоматически будет выбрана система дат 1904.

Вы можете изменить систему дат следующим образом:

  1. Щелкните Файл > Параметры > Дополнительно.

  2. В разделе При вычислении данной книги выберите книгу, а затем выберите или сберем из нее поле Система дат 1904.

Могут возникнуть проблемы при копировании и вклеии дат или создании внешних ссылок между книгами на основе двух разных систем дат. Даты могут отображаться на четыре года и на один день раньше или позже нужной даты. Эти проблемы могут возникнуть при использовании Excel для Windows, Excel для Mac или обоих этих методов.

Например, если скопировать дату 5 июля 2007 г. из книги, использующей систему дат 1900, а затем вкопировать ее в книгу, в которой используется система дат 1904, она будет отсвеяна 6 июля 2011 г., то есть через 1 462 дня. Кроме того, если вы скопируете дату 5 июля 2007 г. из книги, использующей систему дат 1904, а затем вкопируете ее в книгу, в которой используется система дат 1900, она будет даты 4 июля 2003 г., которая на 1 462 дня раньше. Сведения о фоновом режиме см.в Excel.

Исправление проблемы с копированием и вской    

  1. В пустой ячейке введите значение 1462.

  2. Выйдите из этой ячейки, а затем на вкладке Главная в группе Буфер обмена нажмите кнопку Копировать.

  3. Выберем все ячейки, содержащие неправильные даты.

    Совет: Чтобы отменить выделение ячеек, щелкните любую ячейку на листе. Дополнительные сведения см. в статье Выбор ячеек, диапазонов, строк и столбцов на сайте.

  4. На вкладке Главная в группе Буфер обмена нажмите кнопку Вироватьи выберите специальная вкладки.

    Изображение ленты Excel

  5. В диалоговом окне Специальная ветвь в области Ветвьщелкните Значения ,а затем в поле Операциясделайте одно из следующих действий:

    • Чтобы сделать дату четырехлетней и на один день позже, нажмите кнопку Добавить.

    • Чтобы сделать дату на четыре года раньше, нажмите кнопку Вычесть.

Устранение проблемы с внешними ссылками    

Если вы используете внешнюю ссылку на дату в другой книге с другой системой дат, вы можете изменить внешнюю ссылку одним из следующих способов:

  • Чтобы сделать дату четырехлетней и на один день позже, добавьте к ней 1462. Например:

=[Book2]Sheet1!$A$1+1462

  • Чтобы сделать дату на четыре года раньше, вычесть из нее 1462. Например:

=[Book1]Sheet1!$A$1-1462

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

См. также

Пользовательское форматирование даты

Отображение чисел в качестве даты или времени

Ввод данных в ячейки листа вручную

Примеры часто используемых формул

Нужна дополнительная помощь?

Нужны дополнительные параметры?

Изучите преимущества подписки, просмотрите учебные курсы, узнайте, как защитить свое устройство и т. д.

В сообществах можно задавать вопросы и отвечать на них, отправлять отзывы и консультироваться с экспертами разных профилей.

Иногда, когда вы копируете или импортируете даты из других источников данных в ячейку Excel, дата может быть отформатирована и сохранена как текст. И здесь я расскажу о приемах преобразования таких дат, хранящихся в виде текста, в стандартные даты в Excel.

дата документа сохранена как текст 1


стрелка синий правый пузырь Преобразование текстовой даты с 2-значными годами до даты с помощью проверки ошибок

Если годы в текстовых датах представлены двумя цифрами, например 07, вы можете применить утилиту проверки ошибок, чтобы быстро преобразовать текстовые даты в стандартные даты.

1. Включите лист, содержащий текстовые даты, и нажмите Формулы > Проверка ошибок. Смотрите скриншот:
дата документа сохранена как текст 2

2. В появившемся диалоговом окне вы можете указать преобразование лет в 19XX или 20XX, см. Снимок экрана:

дата документа сохранена как текст 3

3. Затем повторите, чтобы щелкнуть Преобразовать XX в 19XX or Преобразовать XX в 20XX для преобразования текстовой даты с 2-значными годами в стандартные даты одну за другой, пока не появится диалоговое окно, сообщающее вам, что проверка ошибок завершена. Смотрите скриншот:
дата документа сохранена как текст 4

Теперь все текстовые даты с двумя цифрами года преобразованы в стандартные даты.
дата документа сохранена как текст 5


стрелка синий правый пузырь Преобразование нескольких текстовых дат в дату с помощью формулы

Только с помощью проверки ошибок можно преобразовать текстовые даты с 2-значными годами в стандартные даты, для других текстовых дат вы можете применить формулу = ДАТАЗНАЧ ().

1. Выберите пустую ячейку рядом с текстовыми датами и введите эту формулу. = ДАТАЗНАЧ (E1) (E1 — текстовая дата) и нажмите Enter , чтобы получить 5-значное число, а затем перетащите дескриптор автозаполнения этой ячейки в нужный диапазон.
дата документа сохранена как текст 6

2. Затем, не снимая выделения с числовых строк, нажмите Ctrl + 1 , чтобы открыть Формат ячеек диалоговое окно и щелкните Время под Категория список и выберите нужный тип форматирования даты в правом разделе. Смотрите скриншот:
дата документа сохранена как текст 7

3. Нажмите OK, теперь текстовые даты преобразованы в даты.
дата документа сохранена как текст 8


стрелка синий правый пузырь Преобразование различной текстовой даты в дату с помощью Kutools for Excel

Если у вас есть Kutools for Excel установлен, вы можете применить его Преобразовать в дату утилита для быстрого преобразования текстовых дат в даты.

После бесплатная установка Kutools for Excel, пожалуйста, сделайте следующее:

Выделите текстовые даты и нажмите Кутулс > Содержание > Преобразовать в дату. Смотрите скриншот:
дата документа сохранена как текст 9

Теперь текстовые даты преобразованы в стандартные даты.
дата документа сохранена как текст 10

Щелкните здесь, чтобы узнать больше о преобразовании в дату.


Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Комментарии (0)


Оценок пока нет. Оцените первым!

(См. приложенный скриншот).
На самом деле, здесь представлены вот такие даты:
11/01/10
12/01/10
13/01/10
14/01/10

Как сделать так, чтобы они правильно отображались?

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


Цитата: Олег* от 19.09.2010, 22:34
(См. приложенный скриншот).
На самом деле, здесь представлены вот такие даты:
11/01/10
12/01/10
13/01/10
14/01/10

Как сделать так, чтобы они правильно отображались?

Олег*, Вы же не первый день на форуме… Где пример?


А не стоит ли в Пуск — Настройка — Панель правления — Языки и региональные стандарты    янглийский язык?

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995



Цитата: Serge 007 от 19.09.2010, 22:41
Олег*, Вы же не первый день на форуме… Где пример?

С примером пока проблема. У меня очень большой макрос и работает он, в общем-то, правильно, но эта вот проблемка «вылезла». Весь макрос целиком сюда, разумеется, выкладывать не имеет смысла. Речь же только о датах, в конце концов.
Я подумал, что это распространённая проблема, потому что сам уже не первый раз спотыкаюсь то на датах, то на процентах :)
Кстати, если на «свежий» лист вставляю поштучно, то без проблем вставляются, а если «скопом» через макрос и на уже юзанный-переюзанный :) лист, тогда почему-то получается именно так, как представлено на скриншоте.

Цитата: _Boroda_ от 19.09.2010, 22:50
А не стоит ли в Пуск — Настройка — Панель правления — Языки и региональные стандарты    янглийский язык?

Да нет, там, вроде, всё в порядке:

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


В VBA по умолчанию формат ММ:ДД:ГГ, поэтому так и вставляется

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Перед вставкой дат на лист поменяйте формат ячеек:
Range(«A1:A25»).NumberFormat = «m/d/yyyy»

Если не прокатит, тогда изначально в VBA обработайте даты как текст:

sDate = "16.01.2010"
Range("A1").NumberFormat = "m/d/yyyy"
Range("A1") = CDate(sDate)

Или что-то в этом роде. Просто не видя как Вы даты получаете трудно советовать…

Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы…
www.excel-vba.ru
Просто СПАСИБО [+оказать+]
Считаешь СПАСИБО мало? Яндекс.Деньги: 41001332272872; WM: R298726502453


Цитата: _Boroda_ от 19.09.2010, 23:18
В VBA по умолчанию формат ММ:ДД:ГГ, поэтому так и вставляется

А изменить это как-нибудь можно?

Цитата: Prist от 20.09.2010, 10:16
Перед вставкой дат на лист поменяйте формат ячеек:
Range(«A1:A25»).NumberFormat = «m/d/yyyy»

Меняю и ДО вставки, и во время вставки и ПОСЛЕ вставки, но всё равно ничего не меняется :(

Цитата: Prist от 20.09.2010, 10:16…не видя как Вы даты получаете трудно советовать…

Речь идёт всё о той же самой программе:
https://forum.msexcel.ru/microsoft_excel/kak_raskidat_po_stobtsam_dannye_razdelcedilnnye_zapyatymi-t4034.0.html

Требуется вставить контент текстового файла 01.txt в таблицу Экселя. На данном этапе всё работает как требуется, но с датами полное фиаско :(

В приложении находится архив с файлом 01.txt и с VBA-шной программой, в которую требуется этот файл вставить. Ещё раз хочу сказать, что с самой вставкой проблем нет, только с отображением дат. Функциональность самой программы я очень сильно урезал, чтобы не отвлекать внимание от проблемы с датами.
Работа с программой происходит следующим образом:
1. Копируем содержимое файла 01.txt в буфер обмена («Выделить всё», «Копировать»).
2. В программе активируем лист «Обработка», после чего появляется юзерская форма с кнопкой «Вставить и обработать».
3. Нажимаем на эту кнопку и проверяем как вставилось.

Бывает, что проблема с первого раза не «вылезает», тогда надо повторить всю процедуру, начиная со второго пункта.

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


Попробуйте вставлять даты не просто встакой, а так:

[b6] = Format(Date, «DD.MM.YY»)

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Макрос вставки файла 01.txt  записал макрорекордером.
Файл находился на D:

Может и я на что сгожусь … Если сгодился, можете меня по+благодарить+.


Цитата: Wasilic от 23.09.2010, 09:54
Макрос вставки файла 01.txt  записал макрорекордером.
Файл находился на D:

Да в том-то и дело, что мне хочется не файлом вставлять, а именно посредством Copy-Paste. Так для меня удобнее.
Когда придумывал название этой темы, сомневался — не слишком ли это   громко прозвучит: ЗАГАДОЧНЫЕ даты. А теперь вижу, что не ошибся.
Файлом-то вставить почему-то проблемы нет: https://forum.msexcel.ru/microsoft_excel/kak_raskidat_po_stobtsam_dannye_razdelcedilnnye_zapyatymi-t4034.0.html

Цитата: _Boroda_ от 23.09.2010, 09:26
Попробуйте вставлять даты не просто встакой, а так:

[b6] = Format(Date, «DD.MM.YY»)

Честно говоря, не совсем понял, как это сделать.

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


Проще всего будет, если Вы положите Ваши файлы тхт и с макросом. На них и поиграемся.

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Муж это единственный зарегенный юзер, а все остальные это хакеры :)

У меня работает так:

Sub ttt()
Range("A1:IV65536").Clear
Range("A2:IV65536").NumberFormat = "@"
Range("A1").Select
ActiveSheet.Paste
Columns("C:C").Replace What:="/", Replacement:="."
Range("A2:IV65536").NumberFormat = "General"
Range("C2:C65536").NumberFormat = "dd/mm/yyyy"
End Sub

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Цитата: _Boroda_ от 25.09.2010, 17:30
У меня работает так:
Sub ttt()
Range("A1:IV65536").Clear
Range("A2:IV65536").NumberFormat = "@"
Range("A1").Select
ActiveSheet.Paste
Columns("C:C").Replace What:="/", Replacement:="."
Range("A2:IV65536").NumberFormat = "General"
Range("C2:C65536").NumberFormat = "dd/mm/yyyy"
End Sub

А у меня при таком подходе всё вставляется в одну колонку. С этой проблемой я уже боролся вот здесь:  https://forum.msexcel.ru/microsoft_excel/kak_raskidat_po_stobtsam_dannye_razdelcedilnnye_zapyatymi-t4034.0.html

На самом деле, почему-то иной раз метод Paste вставляет данные, уже «раскиданными» по столбцам, а иной раз всё пишет в одну строчку.
В той теме я эту проблему «обошёл» при помощи TextToColumns. Теперь осталось только с датами как-нибудь договориться :) Но они, проклятые, упираются и никак не хотят сдаваться :(

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


Да пожалуйста, вставляйте с раскидываением, только сначала дайте текстовой формат, потом раскидайте (можно даже всем полям дать текстовой формат при этом), потом общий формат, потом ДДММГГ на столбец С

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Цитата: _Boroda_ от 25.09.2010, 19:19
Да пожалуйста, вставляйте с раскидываением, только сначала дайте текстовой формат, потом раскидайте (можно даже всем полям дать текстовой формат при этом), потом общий формат, потом ДДММГГ на столбец С

На самом деле, Ваша идея с Replace работает классно!  (+1)
Сначала раскидываю весь контент по столбцам с помощью TextToColumns, а потом обрабатываю столбец «C» вот таким вот образом:

            Range("C2:C65536").NumberFormat = "@"
            Columns("C:C").Replace What:="/", Replacement:="."
            Range("C2:C65536").NumberFormat = "General"
            Range("C2:C65536").NumberFormat = "dd/mm/yyyy"

Получается всё как надо кроме того, что на некоторых полях проблемного :) столбца вылезает сообщение об ошибке «Текстовая дата с 2-значным годом». 

В принципе, я доволен тем, что имеется уже сейчас, но исключительно «ради эстетики» :)  хотелось бы как-нибудь убрать это сообщение (не изменяя общих настроек Экселя) и превратить даты вида «08»,  «09»,  «10»…  в даты вида «2008»,  «2009»,  «2010»…  Как бы это осуществить? :)

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


Дык там и менять ничего не нужно. Просто выделяете весь столбец, начиная с первой ячейки, содержащей «ошибку», а затем преобразовываете с помощью ниспадающего меню.
т.е. «Преобразовать ХХ в 20ХХ»

Webmoney: E350157549801 Z116603216205 R268084006579


Цитата: kimtan от 25.09.2010, 20:34
Дык там и менять ничего не нужно. Просто выделяете весь столбец, начиная с первой ячейки, содержащей «ошибку», а затем преобразовываете с помощью ниспадающего меню.
т.е. «Преобразовать ХХ в 20ХХ»

Прикол-то весь в том, чтобы оно САМО сделалось без приложения дополнительных усилий :)

Муж это единственный зарегенный юзер, а все остальные это хакеры :)


А если
Range(«C2:C65536»).NumberFormat = «@»
поставить перед тем, как будем по столбцам раскидывать?

В 2007 в настройках есть галка чтоб не ругался на двузначный год. Дома 2003, посмотреть не могу.

Скажи мне, кудесник, любимец ба’гов…

Яндекс-деньги: 41001632713405
Webmoney: R289877159277; Z102172301748; E177867141995


Понравилась статья? Поделить с друзьями:
  • Демографическая пирамида как составить
  • Как найти человека в ставрополе по фамилии
  • Как найти циклические формулы в эксель
  • Как найти в гта все баб
  • Как найти массу тела в процентах