Формула отделяющая дату
Mark1976
Дата: Суббота, 19.03.2016, 22:58 |
Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
Всем привет. Есть файл. В нем я отделяю дату. Заметил ошибку. В чем может быть причина.Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
Всем привет. Есть файл. В нем я отделяю дату. Заметил ошибку. В чем может быть причина.Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
Mark1976
Сообщение отредактировал Mark1976 - Суббота, 19.03.2016, 23:04
Ответить
Сообщение Всем привет. Есть файл. В нем я отделяю дату. Заметил ошибку. В чем может быть причина.Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
Автор - Mark1976 Дата добавления - 19.03.2016 в 22:58
StoTisteg
Дата: Суббота, 19.03.2016, 23:06 |
Сообщение № 2
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Код
=ЛЕВБ(СЖПРОБЕЛЫ(ПЕЧСИМВ(I5));10)
У Вас там какая-то неведомая и невидимая фигня первым символом влезла. [p.s.]Туплю. Исправил.
Код
=ЛЕВБ(СЖПРОБЕЛЫ(ПЕЧСИМВ(I5));10)
У Вас там какая-то неведомая и невидимая фигня первым символом влезла. [p.s.]Туплю. Исправил.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал StoTisteg - Суббота, 19.03.2016, 23:13
Ответить
Сообщение Код
=ЛЕВБ(СЖПРОБЕЛЫ(ПЕЧСИМВ(I5));10)
У Вас там какая-то неведомая и невидимая фигня первым символом влезла. [p.s.]Туплю. Исправил.Автор - StoTisteg Дата добавления - 19.03.2016 в 23:06
gling
Дата: Суббота, 19.03.2016, 23:09 |
Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2519
Репутация:
674
±
Замечаний:
0% ±
2010
Здравствуйте. Перед текстом пробел, надо от него избавиться. Попробуйте так Код
=--ЛЕВБ(СЖПРОБЕЛЫ(I2);10)
Здравствуйте. Перед текстом пробел, надо от него избавиться. Попробуйте так Код
=--ЛЕВБ(СЖПРОБЕЛЫ(I2);10)
gling
ЯД-41001506838083
Ответить
Сообщение Здравствуйте. Перед текстом пробел, надо от него избавиться. Попробуйте так Код
=--ЛЕВБ(СЖПРОБЕЛЫ(I2);10)
Автор - gling Дата добавления - 19.03.2016 в 23:09
dima_dan2012
Дата: Суббота, 19.03.2016, 23:09 |
Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 38
Репутация:
8
±
Замечаний:
0% ±
Excel 2003,2007
WM :Z116994103939
Ответить
Сообщение Автор - dima_dan2012 Дата добавления - 19.03.2016 в 23:09
Mark1976
Дата: Суббота, 19.03.2016, 23:11 |
Сообщение № 5
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
Всем спасибо.
Ответить
Сообщение Всем спасибо. Автор - Mark1976 Дата добавления - 19.03.2016 в 23:11
Mark1976
Дата: Суббота, 19.03.2016, 23:13 |
Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
StoTisteg, вот что формула выдает: 14.12.201
StoTisteg, вот что формула выдает: 14.12.201 Mark1976
Ответить
Сообщение StoTisteg, вот что формула выдает: 14.12.201 Автор - Mark1976 Дата добавления - 19.03.2016 в 23:13
StoTisteg
Дата: Суббота, 19.03.2016, 23:15 |
Сообщение № 7
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Да, это я протупил. Исправил уже, теперь работает.
Да, это я протупил. Исправил уже, теперь работает. StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Да, это я протупил. Исправил уже, теперь работает. Автор - StoTisteg Дата добавления - 19.03.2016 в 23:15
Mark1976
Дата: Суббота, 19.03.2016, 23:15 |
Сообщение № 8
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
StoTisteg, теперь все норм.
Ответить
Сообщение StoTisteg, теперь все норм. Автор - Mark1976 Дата добавления - 19.03.2016 в 23:15
dima_dan2012
Дата: Суббота, 19.03.2016, 23:16 |
Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 38
Репутация:
8
±
Замечаний:
0% ±
Excel 2003,2007
число байт(симвлов) строки которое отрезается слева
число байт(симвлов) строки которое отрезается слева dima_dan2012
WM :Z116994103939
Сообщение отредактировал dima_dan2012 - Суббота, 19.03.2016, 23:39
Ответить
Сообщение число байт(симвлов) строки которое отрезается слева Автор - dima_dan2012 Дата добавления - 19.03.2016 в 23:16
Mark1976
Дата: Суббота, 19.03.2016, 23:16 |
Сообщение № 10
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
а что означают цифры в конце: 10 и 11?
а что означают цифры в конце: 10 и 11? Mark1976
Ответить
Сообщение а что означают цифры в конце: 10 и 11? Автор - Mark1976 Дата добавления - 19.03.2016 в 23:16
StoTisteg
Дата: Суббота, 19.03.2016, 23:17 |
Сообщение № 11
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Не факт. Это может быть и неразрывный пробел, а его СЖПРОБЕЛЫ не убивает.
Не факт. Это может быть и неразрывный пробел, а его СЖПРОБЕЛЫ не убивает.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал StoTisteg - Суббота, 19.03.2016, 23:22
Ответить
Сообщение Не факт. Это может быть и неразрывный пробел, а его СЖПРОБЕЛЫ не убивает.Автор - StoTisteg Дата добавления - 19.03.2016 в 23:17
Mark1976
Дата: Суббота, 19.03.2016, 23:21 |
Сообщение № 12
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
dima_dan2012, а у Вас квадратики после даты.
dima_dan2012, а у Вас квадратики после даты. Mark1976
Ответить
Сообщение dima_dan2012, а у Вас квадратики после даты. Автор - Mark1976 Дата добавления - 19.03.2016 в 23:21
Mark1976
Дата: Суббота, 19.03.2016, 23:24 |
Сообщение № 13
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
Есть формулы, которые в фильтре, даты группируют по годам, а некоторые нет. Вот мои группируют, а некоторые, которые здесь разместили нет. Почему?
Есть формулы, которые в фильтре, даты группируют по годам, а некоторые нет. Вот мои группируют, а некоторые, которые здесь разместили нет. Почему? Mark1976
Ответить
Сообщение Есть формулы, которые в фильтре, даты группируют по годам, а некоторые нет. Вот мои группируют, а некоторые, которые здесь разместили нет. Почему? Автор - Mark1976 Дата добавления - 19.03.2016 в 23:24
StoTisteg
Дата: Суббота, 19.03.2016, 23:25 |
Сообщение № 14
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Это костыль. Файл формируется отнюдь не ручками и там в начале может быть что угодно и в любом количестве.
Это костыль. Файл формируется отнюдь не ручками и там в начале может быть что угодно и в любом количестве.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Это костыль. Файл формируется отнюдь не ручками и там в начале может быть что угодно и в любом количестве.Автор - StoTisteg Дата добавления - 19.03.2016 в 23:25
StoTisteg
Дата: Суббота, 19.03.2016, 23:37 |
Сообщение № 15
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Есть формулы, которые в фильтре, даты группируют по годам
Марк, но конкретно в этом примере нет никаких фильтров и даты одинаковые. Так что о чём речь, не очень понятно.
Есть формулы, которые в фильтре, даты группируют по годам
Марк, но конкретно в этом примере нет никаких фильтров и даты одинаковые. Так что о чём речь, не очень понятно.StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Есть формулы, которые в фильтре, даты группируют по годам
Марк, но конкретно в этом примере нет никаких фильтров и даты одинаковые. Так что о чём речь, не очень понятно.Автор - StoTisteg Дата добавления - 19.03.2016 в 23:37
dima_dan2012
Дата: Суббота, 19.03.2016, 23:44 |
Сообщение № 16
Группа: Пользователи
Ранг: Новичок
Сообщений: 38
Репутация:
8
±
Замечаний:
0% ±
Excel 2003,2007
если что -то есть впереди даты отлично подходит Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
не знаю почему она у автора не работает.
если что -то есть впереди даты отлично подходит Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
не знаю почему она у автора не работает. dima_dan2012
WM :Z116994103939
Ответить
Сообщение если что -то есть впереди даты отлично подходит Код
=--ПСТР(I2;ПОИСК("??.??.????";I2);10
не знаю почему она у автора не работает. Автор - dima_dan2012 Дата добавления - 19.03.2016 в 23:44
Mark1976
Дата: Суббота, 19.03.2016, 23:51 |
Сообщение № 17
Группа: Проверенные
Ранг: Ветеран
Сообщений: 738
Репутация:
3
±
Замечаний:
0% ±
Excel 2010, 2013
[sup]dima_dan2012, эта формула отлично работает. Вторая тупанула.
[sup]dima_dan2012, эта формула отлично работает. Вторая тупанула. Mark1976
Сообщение отредактировал Mark1976 - Суббота, 19.03.2016, 23:51
Ответить
Сообщение [sup]dima_dan2012, эта формула отлично работает. Вторая тупанула. Автор - Mark1976 Дата добавления - 19.03.2016 в 23:51
dima_dan2012
Дата: Суббота, 19.03.2016, 23:58 |
Сообщение № 18
Группа: Пользователи
Ранг: Новичок
Сообщений: 38
Репутация:
8
±
Замечаний:
0% ±
Excel 2003,2007
Тогда надо было написать что не работает только
Тогда надо было написать что не работает только dima_dan2012
WM :Z116994103939
Ответить
Сообщение Тогда надо было написать что не работает только Автор - dima_dan2012 Дата добавления - 19.03.2016 в 23:58
МВТ
Дата: Воскресенье, 20.03.2016, 05:44 |
Сообщение № 19
Группа: Проверенные
Ранг: Обитатель
Сообщений: 476
Репутация:
137
±
Замечаний:
0% ±
Excel 2007
Я бы сделал так: воспринимает даты в любом виде от ДД.ММ.ГГГГ до Д.М.ГГ, главное, чтобы не было текстового обозначения месяца. При отсутствии корректно заданной даты в исходном тексте, возвращает #ЗНАЧ! [vba]Код
Function GetDateFromText(text As String) Dim obj As Object With CreateObject("VBScript.RegExp") .Pattern = "(\d{1,2})\.(\d{1,2})\.((?:\d{2})|(?:\d{4}))" Set obj = .Execute(text) If obj.Count = 0 Then GetDateFromText = CVErr("#VAL") Exit Function End If GetDateFromText = DateSerial(Val(obj(0).submatches(2)), Val(obj(0).submatches(1)), Val(obj(0).submatches(0))) End With End Function
[/vba]
Я бы сделал так: воспринимает даты в любом виде от ДД.ММ.ГГГГ до Д.М.ГГ, главное, чтобы не было текстового обозначения месяца. При отсутствии корректно заданной даты в исходном тексте, возвращает #ЗНАЧ! [vba]Код
Function GetDateFromText(text As String) Dim obj As Object With CreateObject("VBScript.RegExp") .Pattern = "(\d{1,2})\.(\d{1,2})\.((?:\d{2})|(?:\d{4}))" Set obj = .Execute(text) If obj.Count = 0 Then GetDateFromText = CVErr("#VAL") Exit Function End If GetDateFromText = DateSerial(Val(obj(0).submatches(2)), Val(obj(0).submatches(1)), Val(obj(0).submatches(0))) End With End Function
[/vba] МВТ
Ответить
Сообщение Я бы сделал так: воспринимает даты в любом виде от ДД.ММ.ГГГГ до Д.М.ГГ, главное, чтобы не было текстового обозначения месяца. При отсутствии корректно заданной даты в исходном тексте, возвращает #ЗНАЧ! [vba]Код
Function GetDateFromText(text As String) Dim obj As Object With CreateObject("VBScript.RegExp") .Pattern = "(\d{1,2})\.(\d{1,2})\.((?:\d{2})|(?:\d{4}))" Set obj = .Execute(text) If obj.Count = 0 Then GetDateFromText = CVErr("#VAL") Exit Function End If GetDateFromText = DateSerial(Val(obj(0).submatches(2)), Val(obj(0).submatches(1)), Val(obj(0).submatches(0))) End With End Function
[/vba] Автор - МВТ Дата добавления - 20.03.2016 в 05:44