Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » evgeniygeo
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 97 След.
Несправедливо закрытые темы
 
#
16.05.2024 13:59:02
nilske,
я исхожу из сухих цифр форума  ;)

лучше уж дать шанс на ее изменение
Цитата
Jack Famous написал:
И тогда можно сносить, наверное  
Изменено: evgeniygeo - 16.05.2024 14:01:35
 
Перейти    
Преобразовать исходный диапазон в Таблицу. Применить к списку стиль средний 11. Добавить в конец таблицы столбцы с соответствующими названиями и вычислить значения: Стоимость партии, р Стоимость брака, р Доля брака, % Отобразить данные по наименова, Преобразовать исходный диапазон в Таблицу. Применить к списку стиль средний 11. Добавить в конец таблицы столбцы с соответствующими названиями и вычислить значения: Стоимость партии, р Стоимость брака, р Доля брака, % Отобразить данные по наименова
 
#
16.05.2024 13:57:04
Aru,
ну это прям тз и лучше обратиться в платный раздел форума:
https://www.planetaexcel.ru/forum/index.php?PAGE_NAME=list&FID=7
 
Перейти    
Несправедливо закрытые темы
 
#
16.05.2024 10:21:22
nilske,
грустно, что это было 1-ое сообщение пользователя на форуме...то, о чем я говорил здесь
 
Перейти    
Автоматизировать маркеры в графике
 
#
15.05.2024 12:29:08
RayI,
пишу в лс
скинул варианты, тс думает
Изменено: evgeniygeo - 16.05.2024 10:22:18
 
Перейти    
Нужна помощь крутых спецов, Жене задали задание. Очень нужна помощь
 
#
14.05.2024 06:06:32
Zlodek,
здравствуйте, думаю, что Вам лучше обратиться в платный раздел форума
Изменено: evgeniygeo - 14.05.2024 06:06:40
 
Перейти    
Проблема запуска макросов из-под Office365 в книге расположенной в папке с общим доступом OneDrive
 
#
13.05.2024 07:51:12
Цитата
Александр Ермаков написал:
в папке OneDrive для случаев если к папке нет общего доступа и если доступ есть
мне всегда казалось, что если файл лежит в OneDrive или Sharepoint, то у него априори есть общий доступ.
 
Перейти    
Надстройка Excel для проверки падежей
 
#
10.05.2024 12:36:12
Ranker Dark,
попробуйте plex: https://youtu.be/28virjECjng?si=hS1M0BqRHvbans8o
 
Перейти    
открытие файла docm, не получается открыть файл docm
 
#
29.04.2024 07:56:42
eshot1,
на 2013 (только она была для теста) работает все почти также. Напишите в телегу, прямо по скринам пройдемся.
Изменено: evgeniygeo - 29.04.2024 07:57:54
 
Перейти    
открытие файла docm, не получается открыть файл docm
 
#
27.04.2024 20:16:13
eshot1,
в целом, механику описал выше
 
Перейти    
Макрос по поиску повторяющих значений и вывода их в таблицу, Исправить Макрос по поиску повторяющих значений и вывода их в таблицу
 
#
27.04.2024 20:12:10
User2616,
Вы понимаете, что это платный раздел форума?
Возможно, есть понимание по цене?
Изменено: evgeniygeo - 27.04.2024 20:12:38
 
Перейти    
Макрос с формулами, Как прописать в макросе формулу, чтобы после его выполнения в ячейках уже был итог расчета, а не формула
 
#
27.04.2024 13:48:24
mitya528,
в таком случае, советую разобраться с этим (добавил 1) и дальше собираться по кусочкам:
Код
Sub aaa()
lLastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
For n = 4 To lLastRow
On Error Resume Next
ActiveSheet.Range("P" & n) = Round(Application.AverageIfs(ActiveSheet.Range("C" & n & ":O" & n), ActiveSheet.Range("C" & n & ":O" & n), ">0"), 1)
ActiveSheet.Range("R" & n) = Sheets("Лист2").Range("Y" & n) + Sheets("Лист2").Range("AB" & n)
Next
End Sub

Почитайте еще здесь
Изменено: evgeniygeo - 27.04.2024 14:00:53
 
Перейти    
Макрос с формулами, Как прописать в макросе формулу, чтобы после его выполнения в ячейках уже был итог расчета, а не формула
 
#
27.04.2024 13:35:43
mitya528,
В чем цель замены формул на значения? Они долго обновляются?
Вы представляете, сколько всего хотите сделать чужими руками просто так?

для самого простого примера:
Код
Sub aaa()
lLastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
For n = 4 To lLastRow
ActiveSheet.Range("R" & n) = Sheets("Лист2").Range("Y" & n) + Sheets("Лист2").Range("AB" & n)
Next
End Sub
Изменено: evgeniygeo - 27.04.2024 13:39:02
 
Перейти    
[ Закрыто] Написать макрос, макрос: напечатать файл и вместить всё в 1 лист.
 
#
27.04.2024 13:33:38
Grayby,
почитайте здесь:
https://www.planetaexcel.ru/techniques/3/59/
А название темы надо бы сменить. Как предложение: Макрос для печати активного листа
Изменено: evgeniygeo - 27.04.2024 13:33:55
 
Перейти    
открытие файла docm, не получается открыть файл docm
 
#
27.04.2024 13:31:06
eshot1,
я не знаю как Вы смотрите. Вот заберите готовый док без макросов:
https://transfiles.ru/f4uou
 
Перейти    
Удаление строк с отрицательным значением
 
#
27.04.2024 09:18:14
nomad_a,
а "Total qty per pn" тоже должен пересчитаться?
как быть с теми "qty", где >1?
какое у этого "чуда" применение?
Изменено: evgeniygeo - 27.04.2024 09:19:27
 
Перейти    
Зачем сражаться за секунды выигрыша по скорости работы макроса?
 
#
27.04.2024 09:02:59
Счастливчик,
в целом все просто:
1) Если задача разовая, то не стоит сильно заморачиваться по скорости (в разумных пределах). Такие задачи у меня сейчас часто появляются в связи с локализацией различных штук в компании
2) Если задача постоянная, то однозначно стоит бороться за скорость, но тоже нужно понимать, кто пишет код, т.к. трудозатраты могут быть не рациональными для этого.
 
Перейти    
Нанесение точек по координатам на рисунок карты на листе Excel, Требуется оффлайновый инструмент
 
#
27.04.2024 06:35:49
deviceik,
можно сделать с помощью 3D Maps вообще без трудов или с Вашей картинкой на диаграмме, но подбирая каждое местоположение вручную.
Думаю, что сами понимаете за какой из вариантов коллеги возьмут гораздо больше.
 
Перейти    
открытие файла docm, не получается открыть файл docm
 
#
27.04.2024 06:17:51
eshot1,
а у меня в 365 все ок)))
upd:
можете нажать "отобразить все знаки" или ctrl+*?
после этого выделяем весь тест ctrl+a, нажимаем ПКМ, выбираем шрифт, убираем галку "скрытый"
Изменено: evgeniygeo - 27.04.2024 06:24:46
 
Перейти    
открытие файла docm, не получается открыть файл docm
 
#
26.04.2024 12:44:11
eshot1,
попробуйте:
https://transfiles.ru/rs4it
https://transfiles.ru/jezsi
Изменено: evgeniygeo - 26.04.2024 12:46:18
 
Перейти    
Быстрая очистка диапазона с данными (макрос), Оптимизация удаления (очистки) данных (макрос)
 
#
26.04.2024 11:57:16
mitya528,
может быть в оригинальном файле есть макросы в модуле книги или модуле листов, которые тормозят процесс?
 
Перейти    
Заменить четвертый левый символ на другой
 
#
26.04.2024 11:20:08
Anastasia_023,
Код
=ЛЕВСИМВ(A1; ДЛСТР(A1)-4) & "-" & ПРАВСИМВ(A1; 3)
 
Перейти    
Удаление строк в таблице от "Условие" до "Условие"
 
#
26.04.2024 11:12:33
Эксель практик,
ну для начала можно вот так:
Код
Sub DuplicateFile()
    newPath = ThisWorkbook.Path & "\" & "Волгоградский дивизион.xls"
    ThisWorkbook.SaveCopyAs newPath
    Workbooks.Open newPath
    
    'удаляем строки
    
    ActiveWorkbook.Close True
End Sub

можно расплодить для 6 книг и придумать, как удалять не нужные строки
Изменено: evgeniygeo - 26.04.2024 11:25:00
 
Перейти    
Как учесть ежегодный плавающий период отпуска через формулу, При составлении ежедневного расписания на несколько лет необходимо учесть плавающий период отпуска через формулу
 
#
26.04.2024 08:46:26
БМВ,
я бы наверное лучше один раз заполнил и заменил на значения
 
Перейти    
Как учесть ежегодный плавающий период отпуска через формулу, При составлении ежедневного расписания на несколько лет необходимо учесть плавающий период отпуска через формулу
 
#
26.04.2024 08:09:22
Максим Исаев,
так наверное:
Код
=ЕСЛИ(И(C$1>=ИНДЕКС(Отпуск!$B$1:$B$74;ПОИСКПОЗ(ГОД(C$1);Отпуск!$A$1:$A$74;0));C$1<=ИНДЕКС(Отпуск!$K$1:$K$74;ПОИСКПОЗ(ГОД(C$1);Отпуск!$A$1:$A$74;0)));"";ЕСЛИ(B2="";ЕСЛИ(ПРОСМОТР(999999;$B2:B2)+1=21;1;ПРОСМОТР(999999;$B2:B2)+1);ЕСЛИ(B2+1=21;1;B2+1)))
Изменено: evgeniygeo - 26.04.2024 08:10:30
 
Перейти    
Как закрасить каждую новую строку в Excel, Как закрасить каждую новую строку в Excel
 
#
25.04.2024 13:18:47
bahruzbahruz,
Код
=$F7<>$F6
Изменено: evgeniygeo - 25.04.2024 13:19:21
 
Перейти    
Быстрая очистка диапазона с данными (макрос), Оптимизация удаления (очистки) данных (макрос)
 
#
25.04.2024 11:35:39
mitya528,
ну можно тупо:
Код
Range("P2:Z" & Cells(Rows.Count, 1).End(xlUp).Row + 1).ClearContents
Range("F2:M" & Cells(Rows.Count, 1).End(xlUp).Row + 1).ClearContents
Range("A2:C" & Cells(Rows.Count, 1).End(xlUp).Row + 1).ClearContents

или
Код
Set rngToClear = Union(Range("A2:C" & Cells(Rows.Count, 1).End(xlUp).Row + 1), _
                       Range("F2:M" & Cells(Rows.Count, 1).End(xlUp).Row + 1), _
                       Range("P2:Z" & Cells(Rows.Count, 1).End(xlUp).Row + 1))
rngToClear.ClearContents
Изменено: evgeniygeo - 25.04.2024 11:39:49
 
Перейти    
Книги по формулам Excel
 
#
25.04.2024 07:51:36
KrutojBep,
почему не взять электронную у Николая? Мне кажется, там больше архив с примерами интересен.
 
Перейти    
Создать список из актуальных данных
 
#
24.04.2024 16:59:08
madkechup,
на 365 и 2021:
Код
=ФИЛЬТР($A$2:$A$12;ЕСЛИОШИБКА($A$2:$A$12;"")<>"")

для более старых версий формула массива (вводить через ctrl+shift+enter):
Код
=ЕСЛИОШИБКА(ИНДЕКС($A$2:$A$12;НАИМЕНЬШИЙ(ЕСЛИ(ЕСЛИОШИБКА(A2:A12;"")<>"";СТРОКА(A2:A12)-1;"");СТРОКА()-1));"")
Изменено: evgeniygeo - 24.04.2024 17:08:51
 
Перейти    
Быстрая очистка диапазона с данными (макрос), Оптимизация удаления (очистки) данных (макрос)
 
#
24.04.2024 16:37:39
mitya528,
еще как вариант сократить диапазон для очистки:
Код
Range("A3:P" & Cells(Rows.Count, 1).End(xlUp).Row + 1).ClearContents


Также, можно сделать при изменении коэф пересчет значений макросом
Изменено: evgeniygeo - 24.04.2024 16:38:43
 
Перейти    
Быстрая очистка диапазона с данными (макрос), Оптимизация удаления (очистки) данных (макрос)
 
#
24.04.2024 16:28:27
mitya528,
обновляются макросом или как?
 
Перейти    
Страницы: 1 2 3 4 5 6 7 8 9 10 11 ... 97 След.
Наверх