Добрый день.  
 
Прошу вас посказать, есть ли возможность установить ручной пересчет только в определенной книге.  
 
И если есть то каким путем этого можно достич

Коллеги, день добрый.  
 
Возникла проблем с открытием файла с помощью функций indirect(CONCATENATE, подскажите пожалуйста, как правильно написать эту ссылку на лист что бы она работала  
For i = 1 To 3  
   Workbooks.Open indirect(CONCATENATE(""C:\Users\balashov\Desktop\08_AUGUST\1 aug\отчет ",i," августа 2012.xls""))  
   Windows("îò÷åò 1 àâãóñòà äåíü.xls").Activate  
   Sheets("âðåìåííûé ïåðñîíàë").Select  
   ActiveSheet.Range("$E$15:$S$500").AutoFilter Field:=5  
   Cells.Select  
   Application.CutCopyMode = False  
   Selection.Copy  
   Windows("Êíèãà1.xlsm").Activate  
   Sheets("Ëèñò2").Select  
   Range("A1").Select  
   ActiveSheet.Paste  
   Windows("îò÷åò 1 àâãóñòà äåíü.xls").Activate  
   ActiveWindow.Close  
   Next i  
End Sub

Форумчане, и снова здравствуйте!  
 
Помогите пожалуйста сократить макрос, сейчас он выглядит так, из 7 клиентов остается всего 1    
   Sheets("111").Select  
   With ActiveSheet.PivotTables("СводнаяТаблица19").PivotFields("Client")  
       .PivotItems("01").Visible = False  
       .PivotItems("02").Visible = False  
       .PivotItems("03").Visible = False  
       .PivotItems("04").Visible = False  
       .PivotItems("05").Visible = False  
       .PivotItems("06").Visible = False  
 
Хочу заменить строки типа: .PivotItems("01").Visible = False на одну строку.  
 
И еще такой вопрос, если их заменить, ускорится ли скорость работы макроса.  
 
Спасибо.

Огромное спасибо,  
 
Да нет, мне то выполнение данного макроса ни как не мешало, а вот моим коллегам, с более слабыми компами, да и беременным немножко это очень мешало и напрягало их

Форумчане,    
 
Появилась необходимость в большом макросе, который переходит из листа в лист, убрать отображение процесса, подскажите как это можно сделать.  
 
Спасибо.

Угадал число 10)

Приветствую Вас всех,  
 
У меня возникла проблема с открытием прикрепленных файлов на форуме с разрешением xlsx, если кто сталкивался с этим, помогите пожалуйста решить данную проблему.  
 
Спасибо

день добрый.  
 
Нашел минус в формате xlsb,  
 
Проблема состоит в том, что при получении внешних данных из другого источника, файлы являются сетевыми, я могу осуществить получение данных, но уже следующий пользователь произвести обновление не может, в формате xlsx данная ошибка отсутствует.  
 
Конечно возможно данная ошибка возникает из-за разного названия сетевых дисков, но диск является одним и тем же,и путь к файлу на этих сетевых дисках один, пример пути:    
У моего компьютера: V:\work\название файла  
У компьютера другого пользователя Q:\work\название файла  
 
В формате xlsx, мы просто меняли название диска и все работало, но в xlsb, он все равно возвращает к начальному.  
 
Плюс ко всему он выдает ошибку (см влодение).  
 
Если кто сталкивался с данной ошибкой подскажите как решить.  
 
Если нет решения, то первый + в xlsx.  
 
Сам с недавнего времени использую только xlsb, и все советую.