Проблемні файли стають величезним форумом Excel

Шановні майстри MPFE, всі могутні боги Excel та лорди
VBA

Я низько вклоняюся вашим нескінченним знанням електронних таблиць і
перед благодійністю, яку ви виявляєте, допомагаючи кому мирянам
ми є.
Я роком часто читаю цей форум і маю
дотепер завжди знаходив відповідь на мої проблеми, шукаючи =
a
мало Тож напів божевільно блукати днями, не знайшовши
рішення, яке я представляю вам безпосередньо свою проблему

Симптом:
Файли, які раптово переходять з кількох КБ в кілька
(див. десятки) Мо

Причина:
Я зрозумів, що це відкриття здорового файлу одночасно
час, коли файл помилки та збереження його, що цей придбав
надмірна вага. Гірше:, я створюю новий файл xls, я його відкриваю
збережіть його, не торкаючись нічого іншого і бум, файл є
іноді 9 Мб. (У мене було кілька файлів з TCD, які
боролися і спочатку думали про цю проблему, але раптом про це
не є а)

Випробувані рішення:
- змініть розмір використовуваного діапазону, видаливши вкладку рядків/стовпців
- скопіюйте в нову таблицю лише частину таблиці
порожня робоча книга
- різні швидкі макроси, знайдені на цьому форумі чи на excelabo.
ті, які я встигаю кинути, лише змушують мене втратити кількох малюків
ко
- конфігурація pb або вірус: я маю виграш XP SP3 та Office 2003 SP3.
Про антивірус McAfee pro та активний ІТ-відділ від великого
поле, яке ніколи не пропускає вірус. перевірено на інших конфігураціях,
нічого з цього боку.

Ви коли-небудь стикалися з цією проблемою? Чи можу я отримати вашу думку?
піти
до якого шляху звернутися, щоб знайти рішення?

наперед дякую,
Фрідрік

якщо можете, опустіть файл сюди:

і поверніться сюди, дайте посилання для завантаження, яке генерує сайт.
тоді ми можемо завантажити його і спробувати побачити, що не так.

04.03.2011 09:22 Фредерік Жирар писав:

Шановні майстри MPFE, усі могутні боги Excel та лорди
VBA

Я низько вклоняюся вашим нескінченним знанням електронних таблиць і
перед благодійністю, яку ви виявляєте, допомагаючи мирянам, яких ви
ми є.
Я був відданим читачем цього форуму протягом багатьох років
дотепер завжди знаходив відповідь на мої проблеми, шукаючи
мало Тож напів божевільно блукати днями, не знайшовши
рішення, яке я представляю вам безпосередньо свою проблему

Симптом:
Файли, які раптово переходять від кількох КБ до кількох
(див. десятки) Мо

Причина:
Я зрозумів, що це відкриття здорового файлу одночасно
час, коли файл помилки і збереження його, що цей придбав
надмірна вага. Гірше:, я створюю новий файл xls, я його відкриваю
збережіть його, не торкаючись нічого іншого та буму, файл готовий
іноді 9 Мб. (У мене було кілька файлів з TCD, які
боролися і спочатку думали про цю проблему, але раптом про це
це не те)

Випробувані рішення:
- змініть розмір використовуваного діапазону, видаливши вкладку рядків/стовпців
- скопіюйте в нову таблицю лише частину таблиці
порожня робоча книга
- різні швидкі макроси, знайдені на цьому форумі чи на excelabo.
ті, які я встигаю кинути, лише змушують мене втратити кількох малюків
ко
- конфігурація pb або вірус: я працюю під Windows XP SP3 та Office 2003 SP3.
Про антивірус McAfee pro та активний ІТ-відділ від великого
поле, яке ніколи не пропускає вірус. перевірено на інших конфігураціях,
нічого з того боку.

Ви коли-небудь стикалися з цією проблемою? Можна отримати вашу поінформовану думку
до якого шляху звернутися, щоб знайти рішення?

наперед дякую,
Фредерік

ось порожній файл розміром 11 МБ

Дякую за твою допомогу
Фредерік

у вашому файлі є аркуш приховування (xlVeryHidden), для
повернути видимий виконати цей макрос,

Підтест ()
Для кожного f У аркушах
f.Visible = True
Далі
Кінець Sub

04.03.2011 10:52 Фредерік Жирар написав:
Привіт Ізабель,

ось порожній файл розміром 11 МБ

Дякую за твою допомогу
Фредерік

Дійсно, коли я видаляю цей прихований аркуш, файл
переживає пекельну дієту, це мені вже дуже допомагає.

З іншого боку, навіть після цієї операції (порожній) файл є
завжди 1,85 МБ.
Ще одна магічна ідея зменшити його до справді нормальних розмірів?

так, існує багато власних форматів комірок, трохи очищення
потрібно, я продовжую перевіряти.
Ізабель

04.03.2011 11:29 Фредерік Жирар писав:
Чудово!

Дійсно, коли я видаляю цей прихований аркуш, файл
переживає пекельну дієту, це мені вже дуже допомагає.

є також багато особистого стилю,
закрийте Excel і перемістіть в інше місце, що є у вашому каталозі xlstart,
відкрити Excel, збережіть файл і скажіть мені, скільки важить ця книжка1,

04.03.2011 11:32 isabelle писала:
так, існує багато власних форматів комірок, небагато
чистка потрібна, я продовжую перевіряти.
Ізабель

04.03.2011 11:29 Фредерік Жирар писав:
Чудово!

Дійсно, коли я видаляю цей прихований аркуш, файл
переживає пекельну дієту, це мені вже дуже допомагає.

Існує також велика кількість "імен", які ми можемо в цілому
частина видалити за допомогою:
Вкладене DeleteQueryName ()
'===================================================== = ====== 'Видаляє запити із прихованої пам'яті "Імена"
'===================================================== = ====== Неясне ім'я
Для кожного імені в іменах
Про помилку Поновити далі
Ім'я. Видалити
Далі
Кінець Sub
Залишиться кілька, щоб знищити вручну.
Тоді постріл магічного макросу LL "Очищає" і порожній файл не важить
більше 48Ко.
Михайло

новина "isabelle": ikr5nt $ u3 $
є також багато особистого стилю,
закрийте Excel і перемістіть в інше місце, що є у вашому каталозі xlstart,
відкрити Excel, збережіть файл і скажіть мені, скільки важить ця книжка1,

04.03.2011 11:32 isabelle писала:
так, існує багато власних форматів комірок, трохи очищення
потрібно, я продовжую перевіряти.
Ізабель

04.03.2011 11:29 Фредерік Жирар писав:
Чудово!

Дійсно, коли я видаляю цей прихований аркуш, файл
переживає пекельну дієту, це мені вже дуже допомагає.

є також багато особистого стилю,
закрийте Excel та розмістіть деінде те, що є у вашому каталозі xlstart,
відкрийте файл збереження Excel і скажіть, скільки коштує ця книга,

Мій каталог xlstart порожній. 0 файлів, 0 байтів
порожній файл - 13 кб, але це вже було раніше, це так
лише тоді, коли у мене відкриті інші "пошкоджені" файли, крім мого
порожні файли набирають вагу.

є також багато особистого стилю,
> так, існує багато власних форматів комірок, небагато

Принаймні той, хто чітко бачив. -)

Крім того, що відповіли друзі, ви проходите цей тест:
ви відкриваєте чистий аркуш паперу, вибираєте в ньому колонку або дві, і ви
помістіть їх. (дата чи номер із знаками після коми, це не має значення.) Ваш чел
завжди порожні.
Ви записуєте і зважуєте свій файл. -))
У illo tempore на нас звернув увагу великий шеф-кухар із 4 пір’я
ці формати, які "важать".
Хорошого лікування і доброго вечора. -)

"Вино - це їжа, те, що духи - для жінок".

"Фредерік Жирар" написав у дописі дискусійної групи:

Шановні майстри MPFE, всі могутні боги Excel та лорди
VBA

Симптом:
Файли, які раптово переходять від кількох КБ до кількох
(див. десятки) Мо

Випробувані рішення:
- змініть розмір використовуваного діапазону, видаливши вкладку рядків/стовпців
- скопіюйте в нову таблицю лише частину таблиці
порожня робоча книга
- різні швидкі макроси, знайдені на цьому форумі чи на excelabo.
ті, які я встигаю кинути, лише змушують мене втратити кількох малюків
ко
- конфігурація pb або вірус: я працюю під Windows XP SP3 та Office 2003 SP3.
Про антивірус McAfee pro та активний ІТ-відділ від великого
поле, яке ніколи не пропускає вірус. перевірено на інших конфігураціях,
нічого з того боку.

наперед дякую,
Фредерік

гарна ідея Пенем, я її забув, але завжди мав під рукою,

Доочищений ()
'автор Лоран Лонгре
Затемнювати Sht як робочий аркуш, DCell як діапазон, Calc як довгий
Dim Rien As String, Avant As Double, діапазон As Range
Про помилку Поновити далі
Calc = Application.Calculation 'Зберігання стану перерахунку
'--------------------------------------------------------

MsgBox "Для активної книги:" _
& Chr (10) & ActiveWorkbook.FullName _
& Chr (10) & "на кожному аркуші" _
& Chr (10) & "шукає область, що містить дані", _
& Chr (10) & "скинути останню використану комірку" _
& Chr (10) & "та оптимізувати розмір файлу Excel", _
vbInformation, "згідно з LL by"
'---------------------------------------------------------

MsgBox "Початковий розмір цієї книги в байтах" _
& Chr (10) & FileLen (ActiveWorkbook.FullName), _
vbInformation, ActiveWorkbook.FullName
'------------------------------------------------------
Застосування
.Обчислення = xlCalculationManual
.StatusBar = "Очищення триває."
.EnableCancelKey = xlErrorHandler
.ScreenUpdating = True
Закінчити з
'-------------------- лікування
Для кожного шту в аркушах
Перед = Sht.UsedRange.Cells.Count
Application.StatusBar = Sht.Name & "-" & Sht.UsedRange.Address
'------------------- Обробка виявленої території
Якщо Sht.UsedRange.Address Тоді
Встановити DCell = Sht.Cells.Find ("*", xlByRows, xlPrevious) (2)
'---------------- Видалення невикористаних рядків
Якщо ні, то DCell - це нічого
Sht.Range (DCell, Sht.Cells ([A: A] .Count, 1)). EntireRow.Delete
Встановити DCell = Нічого
Встановити DCell = Sht.Cells.Find ("*", xlByColumns, xlPrevious) (, 2)
'---------------- Видалення невикористаних стовпців
Якщо ні, DCell - це нічого, тоді Sht.Range (DCell, Sht. [IV1]). EntireColumn.Delete
Завершити якщо
Нічого = Sht.UsedRange.Address
Завершити якщо
Зберегти
'--------------------- Повідомлення для обробленого аркуша
MsgBox "Назва робочого аркуша:" & vbCrLf & _
Chr (10) & Sht.Name & _
Chr (10) & Format (Sht.UsedRange.Cells.Count/Before, "0.00%") & _
"початкового розміру", _
vbInformation, ActiveWorkbook.FullName
Далі Шт
'-------------------- Кінець обробки повідомлення
MsgBox "Оптимізований розмір цієї книги в байтах" & _
Chr (10) & FileLen (ActiveWorkbook.FullName), vbInformation, _
ActiveWorkbook.FullNameActive

Application.StatusBar = False
Application.Calculation = Calc
Кінець Sub

04.03.2011 12:19 Пехем писав:
Привіт Ізабель,