Выбрать дату в календареВыбрать дату в календаре

Страницы: 1
функция или макрос обратный консолидации, функция или макрос обратный консолидации
 
Sergey Stoyanov, спасибо, Power Query, реально помогает, но хотелось бы постоянного простого решения.
Ma_Ri спасибо, Ваше предложение чем то схоже с Power Query.
ПавелW , спасибо! Ваше предложение именно то что я и искал!  
функция или макрос обратный консолидации, функция или макрос обратный консолидации
 
Добрый день.
извиняюсь если данная тема поднималась ранее, но честно не нашёл на форуме.

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

заранее благодарю!
Вставить макросом строки промежуточных итогов между блоками строк, макрос для проверки таблицы и добавления строк
 
Цитата
написал:
Private Function GetBreakY(rr As Range) As Variant
   Dim sh As Worksheet
   Set sh = rr.Parent
   With sh
       Dim ya As Long
       ya = .Cells(.Rows.Count, rr.Column).End(xlUp).Row
       Dim arr As Variant
       arr = .Cells(1, rr.Column).Resize(ya + 1, 1).Value
   End With
   
   Dim brr As Variant
   ReDim brr(1 To ya)
   Dim yb As Long
   For ya = 1 To UBound(arr, 1) - 1
       If arr(ya, 1) <> arr(ya + 1, 1) Then
           yb = yb + 1
           brr(yb) = ya + 1
       End If
   Next
   If yb > 1 Then
       ReDim Preserve brr(1 To yb)
       GetBreakY = brr
   End If
End Function
Огромное Вам спасибо!
очень быстро и прекрасно работает!
Изменено: frg - 23.05.2024 12:02:55
Вставить макросом строки промежуточных итогов между блоками строк, макрос для проверки таблицы и добавления строк
 
Доброго времени суток, есть файл с перечнем профилей деталей с  указанием металлопроката.
Для удобства работы, каждый раз после выгрузки его из ПО для 3Д-моделирования , данный файл отчёта в эксель требуется рассортировать по профиям, следом по маркам стали, следом по номеру позиций в модели.
На данным этапе всё это делалось весьма легко и при помощи "сортировки" в вкладке данные. После чего вручную после каждого типа профиля добавляется  2 пустых строки, для разделения и сведения итогов.

Однако из-за большой номенклатуры работать с файлом становится всё более неудобно, хотелось бы автоматизировать данный процесс.

Задача, после каждого профиля добавить 2 пустые строки, после этого в первой пустой строке подбить промежуточные итоги.
Изменено: Юрий М - 23.05.2024 11:38:23
Страницы: 1
Наверх