| Код |
|---|
Sub Дерево()
arrs = Array(, , , , Empty)
cr = 30
lr = Cells(Rows.Count, 1).End(xlUp).Row
If lr > 29 Then Range("A30:L" & lr).ClearContents
With Sheets("Выгрузка")
For i = 12 To .Cells(.Rows.Count, 1).End(xlUp).Row
k = .Cells(i, 1).IndentLevel
arrs(k) = .Cells(i, 1)
For j = k + 1 To 4
arrs(j) = Empty
Next
Cells(cr, 1) = arrs(0)
Cells(cr, 2) = arrs(1)
Cells(cr, 3) = arrs(2)
Cells(cr, 4) = arrs(3)
Cells(cr, 5) = arrs(4)
For j = 6 To 13
Cells(cr, IIf(j > 7, j - 1, j)) = .Cells(i, j)
Next
cr = cr + 1
Next
End With
End Sub
|
Трансформация выгрузки из 1С, Трансформация выгрузки из 1С
Формула подсчета рабочих часов, Подсчет рабочих часов при 6-дневной 40-часовой рабочей неделе
|
17.06.2022 08:26:39
Дмитрий Д, Привет изобретателю
|
|
|
|
|
Создание программы создания проектов для производства, в том числе с расчетными блоками и макросами
|
16.06.2022 18:05:15
Но если не критично, то обращайтесь. Если будут желающие, уступаю.
Изменено: - 16.06.2022 18:06:22
|
|||||
|
|
|
Формула для расчета: "смены" в календаре по критерию в ячейке, Формула расчет: "смены" в календаре по критерию в ячейке
Сделать макрос для Эксель по моему ТЗ
Сделать макрос для Эксель по моему ТЗ
Получение разницы между датами в переводе на рабочие дни
UserForm для умной таблицы, Изменения данных в умной таблице по условиям
Перенос данных из файла excel в excel и из excel в word
Ищу Excel специалиста, В городе Ангарск
|
10.05.2022 11:39:14
|
|||
|
|
|
Извлечь текст из PDF из определенной области, Текст из PDF
Извлечь текст из PDF из определенной области, Текст из PDF
|
29.04.2022 16:51:23
Msi2102, Пока не рассматривал, если быть точнее мне нужен текст с чертежа а не из таблиц, там все хаотично, но в рамке чертежа есть название - его и нужно вытащить. При экспорте или считывании текстом - невозможно разобрать эту кучу. Поэтому желатьельно взять текст из определенной позиции. Возможно попробую и через PQ.
|
|
|
|
|
Извлечь текст из PDF из определенной области, Текст из PDF
|
29.04.2022 16:08:42
nilske, Есть задание переименовать 500 файлов PDF в имя, которое находится в определенной области PDF.
|
|
|
|
|
Извлечь текст из PDF из определенной области, Текст из PDF
создание формы ввода, создание формы ввода
Напоминание по дате, Необходимо, чтобы ячейки выделялись цветом, за несколько дней до определённой даты
Расчет даты и времени окончания работ с учетом праздничных
|
27.04.2022 15:03:59
Катюша, Поправил.
Изменено: - 27.04.2022 15:04:17
|
|
|
|
|
Прибавка рабочих часов к дате
|
27.04.2022 11:38:17
Наталия Соловьева, Тогда в чем была радость от предыдущей, если она не работала? Похожая , может спасет.
|
|
|
|
|
Прибавка рабочих часов к дате
|
27.04.2022 10:54:47
Наталия Соловьева, А предыдущая работала? Там разница не велика.
|
|
|
|
|
Расчет даты и времени окончания работ с учетом праздничных
Прибавка рабочих часов к дате
|
27.04.2022 09:00:16
Наталия Соловьева, По Вашей просьбе
Изменено: - 27.04.2022 15:02:54
|
|||||
|
|
|
Вычисляемый столбец умной таблицы, Задать формулу вычисляемому столбцу с помощью макроса
|
19.04.2022 09:24:51
Елена Дроздова, Слабо верится, если будет желание могу вечером посмотреть через удаленку на Вашем компе.
|
|
|
|
|
Вычисляемый столбец умной таблицы, Задать формулу вычисляемому столбцу с помощью макроса
|
18.04.2022 16:33:15
Елена Дроздова,
А как Вы стираете? Нужно через удалить строки таблицы - так? |
|
|
|
|
Вычисляемый столбец умной таблицы, Задать формулу вычисляемому столбцу с помощью макроса
Срабатывание Worksheet_Change перед сохранением книги Workbook_BeforeSave
|
15.04.2022 13:25:09
Алексей, Ну так сделайте где-нибудь признак о том, что есть ли изменения в определенных столбцах, можно в памяти, а можно и на отдельном листе или тут же в ячейках. Далее при закрытии проверяете эти признаки и при необходимости отсылаете.
|
|
|
|
|
Срабатывание Worksheet_Change перед сохранением книги Workbook_BeforeSave
|
15.04.2022 10:35:30
Алексей, Не проще просто сделать изменение на листе, тем самым стандартно вызвать событие к примеру
либо если хочется
|
|||||
|
|
|
Создание отчета с с помощью VBA, Создание отчета с с помощью VBA, Отчет формируется по нажатию кнопки на листе отчет, с условиями.
Повысить производительность файла
С помощью одной формулы найти значение на даты., Нужно по дате найти сумму.
|
13.04.2022 11:49:22
Максим Юрков, Ну Вы смогли бы просто сразу организовывать правильно данные в виде плоской таблицы, а далее сводная. Тут больших знаний не требуется. А вот то как Вы пытаетесь выкручиваться - это уже искусство.
|
|
|
|
|
С помощью одной формулы найти значение на даты., Нужно по дате найти сумму.
|
13.04.2022 10:48:38
Максим Юрков, В идеале Ваша задача решается либо через PQ, либо макрос+сводная.
|
|
|
|
|
