Среднее по полю Сумма поступлений Банк
Месяц        Банк 1       Банк 2 (пусто) Общий итог
2021-10 350,0 350,0
2021-11 100,0 100,0
2021-12 715,0 715,0
2022-11        286,7 286,7
(пусто)
Общий итог 286,7        388,3               354,4



Вот, допустим, что банки могут быть дополнительно добавлены, плюс даты добавлены в зависимости от исходных данных, но сводная все равно сгенерирует общий итог. Можно ли как-то макрос сделать, чтобы на этот итог ссылаться? или даже формула. В данном примере, 354,4 (среднее от 286,7 и 388,3).

Добрый день, дорогие форумчане!

Помогите пожалуйста мне сделать это как-нибудь, пока что из идей только как-то через PowerQuery побаловаться, но скилла не хватает...

Добрый день, я никак не могу придумать как вшить в формулу срок, по месяцам, типо если кредит выдан на 2 месяца 01.03.22, то по идее янв и фев никаких поступлений, затем мар и апр поступления будут и в мае и далее нет поступлений ибо кредит баста. Если янв и фев - легко сделать, типо дата выдачи больше чем дата начала месяца, то вот как вшить в эту модель по месяцам добавленные месяцы, то бишь чтобы оплата была только мар и апр и потом всё. Если кому-то интересно подобное, помогите пожалуйста... Буду рад и благодарен любой помощи!

Добрый день дорогие форумчане!

Помогите пожалуйста, какую команду мне можно ввести, чтобы отфильтровать данные в столбце с помощью макроса, выбирая счета начинающиеся с 4, кроме тех, кто начинается с 423 и 474, а также сюда приплести 520*, 521* и 522*. Я вот создал дополнительный столбец для последних трех чисел фильтрации, но не могу пока что придумать, что делать с 4 кроме 423 и 474. Уверен, что есть какая-то функция, оператор, которая может отделить по критерию. Мои знания VBA пока ничего мне не подсказывают, лазаю на форумах для знаний и прошу помощи у более опытных. Выборка достаточно объемная, более 200к строк, просто пару примеров выдал в файле для представления.

Мои отчаянные попытки:

On Error Resume Next
ActiveSheet.ShowAllData
Columns(22).ClearContents
lLastRow = Cells(Rows.Count, 5).End(xlUp).Row
For n = 2 To lLastRow
   If Cells(n, 5) Like "520*" Or _
      Cells(n, 5) Like "521*" Or _
      Cells(n, 5) Like "522*" Then
           Cells(n, 22) = 1
   End If
Next n
   ActiveSheet.Range("A:V").AutoFilter Field:=22, Criteria1:=1

Добрый день, помогите пожалуйста дописать

Sub Группа_1008()
'
' Группа_1008 Макрос
' Экв>=1млн; СчД 20202; СчК 405, 406, 407; Назн УСТАВН
'

'
   ActiveSheet.Range("$A$1:$U$152506").AutoFilter Field:=5, Criteria1:= _
       "=20202*", Operator:=xlAnd
   ActiveSheet.Range("$A$1:$U$152506").AutoFilter Field:=9, Criteria1:="=405*" _
       , Operator:=xlOr, Criteria2:="=406*" _
       , Operator:=xlOr, Criteria2:="=407*"
   ActiveWindow.SmallScroll ToRight:=8
   ActiveSheet.Range("$A$1:$U$152506").AutoFilter Field:=17, Criteria1:= _
       ">=1000000", Operator:=xlAnd
   ActiveWindow.SmallScroll ToRight:=3
   ActiveSheet.Range("$A$1:$U$152506").AutoFilter Field:=18, Criteria1:= _
       "=*уставн*", Operator:=xlAnd
End Sub

В общем нужно добавить 407 еще, я вот не знаю как я могу добавить множество фильтров в данный код

Помогите

Всем здравствуйте, помогите пожалуйста преобразовать столбец при выгрузки с даты на процент чтобы в будущем мне как-то легче/лучше было работать с подобной выгрузкой.  

Грубо говоря, чтобы результат был такой:


Январь 2021 г. - 139 252 167,33
Февраль 2021 г. - 77 454 355,37
и т.д.

в идеале суммировать результаты по месяцам банков: Банк АБВ №1 и Банк АБВ №2, против других отдельных банков по месяцам;

не затрагивая особо базу данных, ибо это лишь выдержка, там большой объем данных...

Помогите пожалуйста!