В общем мне по работе нужно считать символы в файлах *.xls , но программа которая это делает считает только символы в видимых ячейках. Я нуб и в макросах практически ничего не секу. Пару недель назад не понимал что ему нада когда не написал в конце макроса end sub.
Сейчас у меня есть макрос,который по идее убирает фильтры и раскрывает скрытые ячейки

Sub Otkrit()
Cells.AutoFilter
Cells.EntireColumn.Hidden = False
Cells.EntireRow.Hidden = False
End Sub

Этот макрос совершенно не реагирует на вместимое сводных таблиц(случайно обнаружил) и возможно еще много на что т.к. я не знаю как еще можно спрятать ячейки в экселе. Подскажите кстати какие там еще способы есть,все что я знаю это скрыть ячейки,поставить фильтр или сводная таблица. Последнее у меня вызывает ужас.

помогите написать макрос который открывал бы все ячейки независимо от того каким образом они были скрыты ибо я сам этого сделать не могу (если кто-то решит помочь,то еще объясните работу макроса чтобы у меня в голове немного прибавилось мозга). Ну и вообще дайте пару ценных советов для новичка,только ж не сильно заумных.
Заранее благодарен.

Пароли на сами файлы как правило мне предоставляются,а пароли на листы и книги легко узнать.
Я работаю в переводческой компании и мне нужно использовать специальную прогу для подсчета символов (там повторы,процент совпадения с памятью) и именно она не видит все что скрыто,а только то что видно глазом и можно выделить. а т.к. делать нужно все быстро,то руками все открывать и просматривать не получается.Если же отправлять файлы на подсчет как они есть,то считается как правило даже далеко не половина содержимого и естественно оплата перевода понижается,что злит начальство.

Djon Player,

Знаешь,что-то ты меня озадачил скрытыми листами)
А про сводные таблицы знаешь что нибудь? Я заметил что в них фильтры не убираются,и ячейки не раскрываются если выделять весь лист и делай двойной клик на границе стольбцов/строк,плюс можно убрать отображение кнопок "+" и "-" и они тогда внешне просто похожи на обычные таблицы... ужас блин
Но тем не менее за помощь благодарен)

Djon Player,

Ну вообще эта программа еще сырая (по крайней мере я такой инфой располагаю) и пользоваться приходится тем,что есть. Достойной альтернативы пока тоже нет. если интересно то называется так : SDL Trados Studio 2009.
По правде говоря мало кто из заказчиков знает о существовании этой проги,но те кто знает люди серьезные.
Я еще мало что понимаю в этих макросах и почти все делаю через запись с последующим слепливанием частей этих записей в кучу)
При записи макросов на замену символов для всей книги и для отдельного листа разницы в них не обнаружил...по этому у меня все работает только на отдельном листе.Кстати только что понял что делают твои исправления))спасибо)

Djon Player,

Дабы не быть назойливым у меня последний вопрос

Sheets("лист2").Visible = True

Вот это по идее должно делать видимым 2-й лист,но я не понимаю как написать чтобы делались видимыми все скрытые листы,чтобы не указывать их названия.

Sheets(Array("temp1841513506", "лист1", "лист2", "лист3")).Select
как я понимаю в этом случае просто выделяются листы,но опять же тут названия их и это не универсально.
SelectedSheets.Visible = True
если потом написать это,то получится раскрыть диапазон?


С фильтрами я тоже не понимал,надо было указывать номер фильтра который нужно раскрыть, по этому я их просто выключил)

Djon Player,

Спасибо большое)хоть я и не понимаю как он рабртает и еще даже не проверил))Удачи

Djon Player,

а ведь после объяснения понятно стало) еще раз спасибо)

Большое спасибо

ну мне на сасом деле надо был оне для отдельного листа,а для всей книги в целом,но все равно спасибо

вот что я написал пытаясь соединить их

Sub Danger()
Dim sh As Worksheet
For Each sh In ActiveWorkbook.Sheets
sh.Visible = xlSheetVisible
sh.AutoFilterMode = 0
sh.Columns.Hidden = False
sh.Rows.Hidden = False
sh.Rows.AutoFit
sh.Columns.AutoFit
Next sh
End Sub

последние строчки чисто для визуализации
Прокоментируйте если не сложно

Да я просто немного туповат и сразу не въехал) щас то уже дошло что к чему. Спасибо))

Знаете что я тут обнаружил) макрос выдает ошибку если на какой-то лист занят полностью диаграммой.Когда делаешь расположение диаграммы на отдельном листе, на этом листе нельзя использовать фильтры вообще,и строчка макроса насчет этих фильтров выдает ошибку... досадно) я то уж подумал что это универсальный макрос...

не ну так,то он ошибку не выдает. Это все из-за того что на листе,полностью занятом диаграммой, нельзя фильтры юзать в принципе (ну это я так думаю). Если эту диаграмму перенести на лист с данными,то все нормально работает. Скажи,это возможно как-то обойти? Если да,то я продолжу поиски решения) ну в принципе такие файлы редко приходят и мне руками их подготовить не в падло,но мы ведь не в каменном веке живем чтобы руками все делать)

Знаете,я тут третий лишний) как в лесу брожу,пока носом не ткнете ниче не вижу... пичально конечно. Правда я на 3-х форумах написал это и только вы мне помогать стали. Я благодарен,узнал много новых вещей(ну это потому что я почти ниче не знаю).