Подскажите, пожалуйста, можно ли удалить строки только в том случае если null во всех столбцах?  

Punkt5, Комп на работе, но ограничений нет

Msi2102, попробую, спасибо!

А что нужно исправить в этом элементе не очень понимаю?

Вот сам макрос

Sub CombineWorkbooks()    Dim FilesToOpen
   Dim x As Integer

   Application.ScreenUpdating = False  'отключаем обновление экрана для скорости
   
   'вызываем диалог выбора файлов для импорта
   FilesToOpen = Application.GetOpenFilename _
     (FileFilter:="All files (*.*), *.*", _
     MultiSelect:=True, Title:="Files to Merge")

   If TypeName(FilesToOpen) = "Boolean" Then
       MsgBox "Не выбрано ни одного файла!"
       Exit Sub
   End If
   
   'проходим по всем выбранным файлам
   x = 1
   While x <= UBound(FilesToOpen)
       Set importWB = Workbooks.Open(Filename:=FilesToOpen(x))
       Sheets().Copy After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
       importWB.Close savechanges:=False
       x = x + 1
   Wend

   Application.ScreenUpdating = True
End Sub

Уровень неожиданности максимальный)))

Добрый день! Запускал макрос с этого прекрасно сайта для сборки листов из разных книг и все работало. Неожиданно при запуски того же макроса начинает крутиться синий кружок и excel зависает. Подскажите, в чем может быть проблема ?  

Подскажите , как сделать , что бы в сводной таблице подсчет значений шел только на самой низшей иерархии а на более высших не шел ?

К сожалению данных много.  

Оба в интернете  

Это два разных файла.  

И есть ли примеры таких макросов? Буду признателен

Приложил файл с примером excel  

Прикладываю ссылку на фото что я имею ввиду https://disk.yandex.ru/d/PChdmh9kcBGvlQ

Всем, привет! Подскажите, пожалуйста, как перенести итоги в сводной таблицы справа налево. Подсчет нужен такой же, просто для наглядности хочу перенести налево  

Подскажите насчет Макроса: на форумах говорят что это не самый надежный вариант , как Вы считаете?  

Здравствуйте. Стоит такая задача, не совсем понимаю как реализовать. Нужно чтобы когда сотрудник на другом компьютере менял значение , это значение менялось на моём листе  при обновлении. Есть ли такая возможность ?