Домашняя страница Undo Do Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Записи участника (krosav4ig) - Мир MS Excel

Результаты поиска
krosav4ig Дата: Среда, 10.08.2016, 22:52 | Сообщение № 1161 | Тема: windows-10 гиперссылка в excel 2010
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте, пробуйте вот это


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Среда, 10.08.2016, 22:54
 
Ответить
СообщениеЗдравствуйте, пробуйте вот это

Автор - krosav4ig
Дата добавления - 10.08.2016 в 22:52
krosav4ig Дата: Пятница, 12.08.2016, 03:27 | Сообщение № 1162 | Тема: Файл сломался внезапно
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Француз, жесткий не проверяли?
Цитата
diskutil verifyvolume /


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеФранцуз, жесткий не проверяли?
Цитата
diskutil verifyvolume /

Автор - krosav4ig
Дата добавления - 12.08.2016 в 03:27
krosav4ig Дата: Суббота, 13.08.2016, 01:26 | Сообщение № 1163 | Тема: Быстрое выделение большого диапазона и протягивание формул
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Суббота, 13.08.2016, 14:09
 
Ответить
СообщениеБыстрое заполнение диапазона значениями или формулами

Автор - krosav4ig
Дата добавления - 13.08.2016 в 01:26
krosav4ig Дата: Суббота, 13.08.2016, 16:03 | Сообщение № 1164 | Тема: Как отформатировать нестандартную дату
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
или если нужно получить дату,
Код
=ДАТАМЕС(0;СУММ(ПСТР(D6;{1;7};{2;4})*{1;12})-22801)+ПСТР(D6;4;2)
, копировать, вставить как значения, установить числовой формат ГГГГ-ММ-ДД
К сообщению приложен файл: 3641628.xlsx (14.3 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеили если нужно получить дату,
Код
=ДАТАМЕС(0;СУММ(ПСТР(D6;{1;7};{2;4})*{1;12})-22801)+ПСТР(D6;4;2)
, копировать, вставить как значения, установить числовой формат ГГГГ-ММ-ДД

Автор - krosav4ig
Дата добавления - 13.08.2016 в 16:03
krosav4ig Дата: Суббота, 13.08.2016, 19:47 | Сообщение № 1165 | Тема: Найти повторяющиеся значения в Excel и изменить их
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Есть столбец разных слов в Excel.
profpalitra, а у мну нет такого столбца
тык


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
Есть столбец разных слов в Excel.
profpalitra, а у мну нет такого столбца
тык

Автор - krosav4ig
Дата добавления - 13.08.2016 в 19:47
krosav4ig Дата: Суббота, 13.08.2016, 19:56 | Сообщение № 1166 | Тема: Найти повторяющиеся значения в Excel и изменить их
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще раз тык, изучаем, в особенности п. 3
[p.s.]файл в студию rules


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениееще раз тык, изучаем, в особенности п. 3
[p.s.]файл в студию rules

Автор - krosav4ig
Дата добавления - 13.08.2016 в 19:56
krosav4ig Дата: Суббота, 13.08.2016, 21:16 | Сообщение № 1167 | Тема: РАНГ по времени, распределение мест по времени
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте.
Код
=ЕСЛИОШИБКА(РАНГ(H3;H$3:ИНДЕКС(H:H;ПРОСМОТР("яяя";B:B;A:A)+2);1);"")
или
Код
=ЕСЛИОШИБКА(РАНГ(H3;H$3:ИНДЕКС(H:H;ПОИСКПОЗ(;H:H;)-1);1);"")


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Суббота, 13.08.2016, 21:18
 
Ответить
СообщениеЗдравствуйте.
Код
=ЕСЛИОШИБКА(РАНГ(H3;H$3:ИНДЕКС(H:H;ПРОСМОТР("яяя";B:B;A:A)+2);1);"")
или
Код
=ЕСЛИОШИБКА(РАНГ(H3;H$3:ИНДЕКС(H:H;ПОИСКПОЗ(;H:H;)-1);1);"")

Автор - krosav4ig
Дата добавления - 13.08.2016 в 21:16
krosav4ig Дата: Понедельник, 15.08.2016, 04:19 | Сообщение № 1168 | Тема: удаление из ячейки фразы и нескольких символов слева от неё
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
как-то так[vba]
Код
Sub dd()
    Dim arr As Variant, i&
    With [offset(I1,,,counta(I:I))]
        On Error GoTo er
        arr = .Value
        If Not IsArray(arr) Then
            ReDim arr(1 To 1, 1 To 1)
            arr(1, 1) = .Value
        End If
        With CreateObject("vbscript.regexp")
            .Pattern = "\d+ -Показать номер- "
            For i = 1 To UBound(arr)
                arr(i, 1) = .Replace(arr(i, 1), "")
            Next
        End With
        .Value = arr
    End With
er:
End Sub
[/vba]
К сообщению приложен файл: 3755398.xlsm (16.7 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениекак-то так[vba]
Код
Sub dd()
    Dim arr As Variant, i&
    With [offset(I1,,,counta(I:I))]
        On Error GoTo er
        arr = .Value
        If Not IsArray(arr) Then
            ReDim arr(1 To 1, 1 To 1)
            arr(1, 1) = .Value
        End If
        With CreateObject("vbscript.regexp")
            .Pattern = "\d+ -Показать номер- "
            For i = 1 To UBound(arr)
                arr(i, 1) = .Replace(arr(i, 1), "")
            Next
        End With
        .Value = arr
    End With
er:
End Sub
[/vba]

Автор - krosav4ig
Дата добавления - 15.08.2016 в 04:19
krosav4ig Дата: Среда, 17.08.2016, 05:12 | Сообщение № 1169 | Тема: Возврат значений в зависимости от даты
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
здравствуйте
Если цеплять с помощью ВПР

для C2 формула(массивная, вводится нажатием Ctrl+Shift+Enter)
Код
=ВПР(МАКС((A2=k!$A$2:$A$10)*(k!$B$2:$B$10<=B2)*k!$B$2:$B$10);ЕСЛИ(A2=k!$A$2:$A$10;k!$B$2:$C$10);2;)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениездравствуйте
Если цеплять с помощью ВПР

для C2 формула(массивная, вводится нажатием Ctrl+Shift+Enter)
Код
=ВПР(МАКС((A2=k!$A$2:$A$10)*(k!$B$2:$B$10<=B2)*k!$B$2:$B$10);ЕСЛИ(A2=k!$A$2:$A$10;k!$B$2:$C$10);2;)

Автор - krosav4ig
Дата добавления - 17.08.2016 в 05:12
krosav4ig Дата: Четверг, 18.08.2016, 01:49 | Сообщение № 1170 | Тема: Таблица из : "$A$1:$J$последняяНеПустаяСтрока"
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
еще вариант [vba]
Код
Dim rng As Range
    With ActiveSheet
        With .QueryTables("_storage_sdcard0_CarController")
            Set rng = .ResultRange
            .Delete
        End With
        .ListObjects.Add(xlSrcRange, rng, , xlYes).Name = "Таблица1"
    End With
[/vba]


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениееще вариант [vba]
Код
Dim rng As Range
    With ActiveSheet
        With .QueryTables("_storage_sdcard0_CarController")
            Set rng = .ResultRange
            .Delete
        End With
        .ListObjects.Add(xlSrcRange, rng, , xlYes).Name = "Таблица1"
    End With
[/vba]

Автор - krosav4ig
Дата добавления - 18.08.2016 в 01:49
krosav4ig Дата: Четверг, 18.08.2016, 02:55 | Сообщение № 1171 | Тема: вычисление значений на пересечении формулой
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте
намудрил еще 1 вариант
Код
=ЕСЛИОШИБКА(ИНДЕКС($C:$E;ПОИСКПОЗ("*"&$H9&I$8&"*";$A$1:$A$5&$B$1:$B$5&$A$1:$A$5;);ПОИСК(ПРОСМОТР(2;ПОИСК($H9&I$8;$A$1:$A$5&$B$1:$B$5&$A$1:$A$5))&СЧЁТЕСЛИ($I$8:I$8;I$8);"333231112222113")/4);"#")
К сообщению приложен файл: 6377898.xlsx (11.0 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Четверг, 18.08.2016, 03:09
 
Ответить
СообщениеЗдравствуйте
намудрил еще 1 вариант
Код
=ЕСЛИОШИБКА(ИНДЕКС($C:$E;ПОИСКПОЗ("*"&$H9&I$8&"*";$A$1:$A$5&$B$1:$B$5&$A$1:$A$5;);ПОИСК(ПРОСМОТР(2;ПОИСК($H9&I$8;$A$1:$A$5&$B$1:$B$5&$A$1:$A$5))&СЧЁТЕСЛИ($I$8:I$8;I$8);"333231112222113")/4);"#")

Автор - krosav4ig
Дата добавления - 18.08.2016 в 02:55
krosav4ig Дата: Четверг, 18.08.2016, 23:23 | Сообщение № 1172 | Тема: RunTime Error '5' Invalid procedure call or argument
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
2007 не сохраняет в ПДФ

сохраняет, если вот это установлено


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
2007 не сохраняет в ПДФ

сохраняет, если вот это установлено

Автор - krosav4ig
Дата добавления - 18.08.2016 в 23:23
krosav4ig Дата: Пятница, 19.08.2016, 01:57 | Сообщение № 1173 | Тема: Создание отчета из двух таблиц
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте.
Сводная не подойдет?
К сообщению приложен файл: 7190471-1.xlsx (16.8 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте.
Сводная не подойдет?

Автор - krosav4ig
Дата добавления - 19.08.2016 в 01:57
krosav4ig Дата: Пятница, 19.08.2016, 15:09 | Сообщение № 1174 | Тема: Создание отчета из двух таблиц
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
как вы сделали сводную из двух источников данных
СВОДНАЯ ТАБЛИЦА ИЗ НЕСКОЛЬКИХ ЛИСТОВ, только вместо ссылок на диапазоны я использовал ссылки на таблицы (Склад1[#Все] и Склад2[#Все]) и создал поле для каждой из них
не совсем то, что нужно.

а так?
К сообщению приложен файл: 5886606.xlsm (24.2 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщение
как вы сделали сводную из двух источников данных
СВОДНАЯ ТАБЛИЦА ИЗ НЕСКОЛЬКИХ ЛИСТОВ, только вместо ссылок на диапазоны я использовал ссылки на таблицы (Склад1[#Все] и Склад2[#Все]) и создал поле для каждой из них
не совсем то, что нужно.

а так?

Автор - krosav4ig
Дата добавления - 19.08.2016 в 15:09
krosav4ig Дата: Суббота, 20.08.2016, 00:41 | Сообщение № 1175 | Тема: Как избежать "(не отвечает)"
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Возможно в файле больше количество "тяжелых"/волатильных формул, которые пересчитываются при сохранении. Попробуйте перед сохранением отключить автопересчет формул[sub]


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеВозможно в файле больше количество "тяжелых"/волатильных формул, которые пересчитываются при сохранении. Попробуйте перед сохранением отключить автопересчет формул[sub]

Автор - krosav4ig
Дата добавления - 20.08.2016 в 00:41
krosav4ig Дата: Суббота, 20.08.2016, 01:05 | Сообщение № 1176 | Тема: Нахождение максимума суммы трёх последовательных чисел
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
до кучи, тоже формула массива
Код
=МАКС(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9;СМЕЩ(B2;;СТОЛБЕЦ(СМЕЩ(A2;;;;ПОИСКПОЗ(9^9;$1:$1)-$A$1-1));;$A$1)))
К сообщению приложен файл: 4644766.xlsx (13.3 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Суббота, 20.08.2016, 01:06
 
Ответить
Сообщениедо кучи, тоже формула массива
Код
=МАКС(ПРОМЕЖУТОЧНЫЕ.ИТОГИ(9;СМЕЩ(B2;;СТОЛБЕЦ(СМЕЩ(A2;;;;ПОИСКПОЗ(9^9;$1:$1)-$A$1-1));;$A$1)))

Автор - krosav4ig
Дата добавления - 20.08.2016 в 01:05
krosav4ig Дата: Воскресенье, 21.08.2016, 00:51 | Сообщение № 1177 | Тема: Волк, коза и капуста
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
узнать причину, почему они не стали участвовать.
времени катастрафисски не было и моск не хотел думать
слепил формулу для минимального количества ходов (вроде работает), немассивная, не использует доп. ячейки, 432 символа
уверен, что можно сократить
в файле 15 = 1111 (Волк Коза Капуста Лодочник)

Upd. Ужал до 310
К сообщению приложен файл: 5797145.xlsx (11.0 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Воскресенье, 21.08.2016, 02:43
 
Ответить
Сообщение
узнать причину, почему они не стали участвовать.
времени катастрафисски не было и моск не хотел думать
слепил формулу для минимального количества ходов (вроде работает), немассивная, не использует доп. ячейки, 432 символа
уверен, что можно сократить
в файле 15 = 1111 (Волк Коза Капуста Лодочник)

Upd. Ужал до 310

Автор - krosav4ig
Дата добавления - 21.08.2016 в 00:51
krosav4ig Дата: Воскресенье, 21.08.2016, 16:39 | Сообщение № 1178 | Тема: Поиск подстроки вв вордде из экселя
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
А хде .execute?


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460

Сообщение отредактировал krosav4ig - Воскресенье, 21.08.2016, 16:43
 
Ответить
СообщениеА хде .execute?

Автор - krosav4ig
Дата добавления - 21.08.2016 в 16:39
krosav4ig Дата: Вторник, 23.08.2016, 00:06 | Сообщение № 1179 | Тема: Заливка цветом по коду RGB
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
можно макросом Sub [vba]
Код
CellColor()
    With [A1].CurrentRegion.Rows
        For Each r In .Offset(1).Resize(.Count - 1)
            r.Cells(4).Interior.Color = RGB(r.Cells(1), r.Cells(2), r.Cells(3))
        Next
    End With
End Sub
[/vba]
К сообщению приложен файл: _Microsoft_Offi.xlsm (20.5 Kb)


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
Сообщениеможно макросом Sub [vba]
Код
CellColor()
    With [A1].CurrentRegion.Rows
        For Each r In .Offset(1).Resize(.Count - 1)
            r.Cells(4).Interior.Color = RGB(r.Cells(1), r.Cells(2), r.Cells(3))
        Next
    End With
End Sub
[/vba]

Автор - krosav4ig
Дата добавления - 23.08.2016 в 00:06
krosav4ig Дата: Среда, 24.08.2016, 22:38 | Сообщение № 1180 | Тема: Совместить несколько формул в одной формуле
Группа: Друзья
Ранг: Старожил
Сообщений: 2348
Репутация: 997 ±
Замечаний: 0% ±

Excel 2007,2010,2013
Здравствуйте
Код
=ЕСЛИ(СЧЁТЕСЛИМН(B4:B14;B4;D4:D14;">"&D4);"";"Сумма1 "&ТЕКСТ(E4-F4-G4;"больше \че\м;не больше \че\м;равна")&" Сумма2+Сумма3")


email:krosav4ig26@gmail.com WMR R207627035142 WMZ Z821145374535 ЯД 410012026478460
 
Ответить
СообщениеЗдравствуйте
Код
=ЕСЛИ(СЧЁТЕСЛИМН(B4:B14;B4;D4:D14;">"&D4);"";"Сумма1 "&ТЕКСТ(E4-F4-G4;"больше \че\м;не больше \че\м;равна")&" Сумма2+Сумма3")

Автор - krosav4ig
Дата добавления - 24.08.2016 в 22:38
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!