File excel của em tự nhiên nó tăng dung lượng lên gấp hàng chục lần. (1 người xem)

  • Thread starter Thread starter hoangdv
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

hoangdv

Thành viên bị đình chỉ hoạt động
Thành viên bị đình chỉ hoạt động
Tham gia
10/8/06
Bài viết
77
Được thích
47
Em ko hiểu sao cái File của em có rất ít dữ liệu nhưng nó tự đội leê gấp khoảng chục lần (khoảng gần 5mb).Bên cạnh đó mỗi lần có sự thay đổi nó lại tự động save một file trong My document có tên theo định dạng: luungày dd-mm-yy[tên file gốc]
Em ko biết xử lý ra làm sao với vụ này.
Kíu em với các bác ơi!
 
Bạn cứ thử gửi file lên diễn đàn thử xem. Để mọi người còn biết nó bị gì mà còn giúp chứ? Theo em nó có thể bị virus đúng không các bác? Nếu vậy thì chỉ cần dùng phần mềm diệt virus để diệt là có thể hết đó. Bạn thử trước xem sao??
 
Lần chỉnh sửa cuối:
Không nên gửi File đó bạn ơi. Nó bị nhiễm VIRUS đó. Bạn dùng chương trình diệt virus xem sao.
 
boong đã viết:
Bạn cứ thử gửi file lên diễn đàn thử xem. Để mọi người còn biết nó bị gì mà còn giúp chứ?
Theo em nó có thể bị virus đúng không các bác? Nếu vậy thì chỉ cần dùng phần mềm diệt virus để diệt là có thể hết đó. Bạn thử trước xem sao??


Diệt Virus rồi nhưng vẫn không ăn thua bác à, có thịt đc con nào đâu ?
Các bác nghía rồi Help em với.

Email của em là: doanviethoang@gmail.com
 

File đính kèm

Chỉnh sửa lần cuối bởi điều hành viên:
File này của bạn không tăng do virus đâu mà các file được nó cập nhật vào mới có vấn đề. Nhất là những file nằm ở các máy khác trong mạng LAN đó. Ở máy mình nó không hề thay đổi kích thước. Dù bạn save cách mấy cũng không có gì thay đổi cả. Bạn cũng nên kiểm tra lại chứ năn tự mở và tự đóng trong mục Define.. -> Name đó. Mình thấy nó hơi lạ đó...
 
Lần chỉnh sửa cuối:
File này chính thật đã nhiểm virus... trong đây có 1 sheet ẩn mang tên là ~ và hàng đóng name rác... Tôi đã diệt xong cho bạn! Từ 4MB sau khi xóa virus file chỉ còn hơn 200KB
ANH TUẤN
 

File đính kèm

anhtuan1066 đã viết:
File này chính thật đã nhiểm virus... trong đây có 1 sheet ẩn mang tên là ~ và hàng đóng name rác... Tôi đã diệt xong cho bạn! Từ 4MB sau khi xóa virus file chỉ còn hơn 200KB
ANH TUẤN


Vô cùng cảm ơn bác. Bgiờ dung lượng file là 172kb, mở cực nhanh, ko có tự save vào My document nữa. Bác có thể phím hộ em chương trình nào để diệt vậy bác, em chạy NAV, AVG, và BKAV .. nhưng không có tác dụng
 
Bác đang xài chương trình diệt virus gì vậy? Cho em biết để cập nhật phiên bản với? Cái của em nó không báo có virus gì hết cả? Hay là nó củ quá rồi nhỉ??..
 
Lần chỉnh sửa cuối:
Ko có chương trình nào cã... tôi diệt bằng tay... hi.. hi... Quá trình tôi làm như sau:
1> Đóng tất cã các file Excel đang mở rồi mở file này lên, Enable macro (File cũa bạn nếu Disable macro sẽ ko nhìn thấy dc sheet ẩn)
2> Vào menu Format\Sheet\Unhide đễ cho hiện sheet tên ~, OK
3> Xóa sheet ~ rồi đóng và lưu file
4> Tiếp theo tôi mở lại file này trên Excel2007 và xóa tất cã các name bên trong...
Bước 2, 3, 4 bạn cũng có thể thao tác luôn trên Excel2007 nếu như bạn rành Version này (tôi vì thao tác ko rành lắm nên chỉ dùng nó đễ xóa name)
Đơn giản vậy thôi! Bạn có thể làm thử...
Tất nhiên bạn có thể dùng 1 vài chương trình phù hợp đễ diệt (như chương trình cũa bạn TuanVNUNI) nhưng tôi khuyên bạn nên thao tác bằng tay 1 vài lần như tôi hướng dẩn ở trên, tuy cực nhưng bạn sẽ hiểu thêm dc rất nhiều thứ
Mến
ANH TUẤN
 
Lần chỉnh sửa cuối:
Đúng là file này bị nhiễm virut, em dow nó về thằng Kaspersky 6.0 nó báo luôn. He he diệt song rồi... không mở được luôn.
 
Rất cảm ơn bác, em đã xoá được sheet "~". Dung lượng giảm được 1mb rồi. Nhưng máy em chưa cài MS 2007 mà đang dùng MS 2003. Nhưng như thế cũng đã là tốt lắm rồi
Em sẽ dùng cái file bác gửi sang cho em vậy.
Regards,
 
hoangdv đã viết:
Rất cảm ơn bác, em đã xoá được sheet "~". Dung lượng giảm được 1mb rồi. Nhưng máy em chưa cài MS 2007 mà đang dùng MS 2003. Nhưng như thế cũng đã là tốt lắm rồi
Em sẽ dùng cái file bác gửi sang cho em vậy.
Regards,
Thật ra trên bộ Office2003 bạn cũng có thể xóa dc name (bấm Ctrl + F3 đễ vào xem)... Có điều là việc xóa sẽ rất lâu, trong khi Excel2007 lại cho phép bạn chọn 1 nhát nhiều name đễ xóa luôn 1 lần...
ANH TUẤN
 
Ok, em đã thử, rất hiệu quả, mỗi tội xoá hơi lâu thật. Híc
Thank again!
 
anhtuan1066 đã viết:
Ko có chương trình nào cã... tôi diệt bằng tay... hi.. hi... Quá trình tôi làm như sau:
1> Đóng tất cã các file Excel đang mở rồi mở file này lên, Enable macro (File cũa bạn nếu Disable macro sẽ ko nhìn thấy dc sheet ẩn)

Bác thân mến :
  1. Không nên enable macro độc hại
  2. Sheet ẩn này vẫn được hiện ra khi ta disable macro. Bác thử đoạn code này xem :
PHP:
Sub UnhideSheet()
    On Error Resume Next
    Application.ScreenUpdating = False
    Dim sh As Worksheet
    For Each sh In ActiveWorkbook.Sheets
        If Not sh.Visible = xlSheetVisible Then sh.Visible = xlSheetVisible
    Next
    Application.ScreenUpdating = True
End Sub

Thân!
 
Mr Okebab đã viết:
Không nên enable macro độc hại
Chẳng sao cã đâu Bắp ơi... vì đàng nào tôi cũng dám chắc máy tính bạn ấy đã bị nhiểm rồi... giờ có Enable macro thêm nữa cũng ko vì thế mà nhiểm thêm... hi... hi...
Ta chỉ Disable macro khi ta tải 1 file nào đó về máy tính và đang tình nghi nó bị virus thôi...
ANH TUẤN
 
Ko có chương trình nào cã... tôi diệt bằng tay... hi.. hi... Quá trình tôi làm như sau:
1> Đóng tất cã các file Excel đang mở rồi mở file này lên, Enable macro (File cũa bạn nếu Disable macro sẽ ko nhìn thấy dc sheet ẩn)
2> Vào menu Format\Sheet\Unhide đễ cho hiện sheet tên ~, OK
3> Xóa sheet ~ rồi đóng và lưu file
4> Tiếp theo tôi mở lại file này trên Excel2007 và xóa tất cã các name bên trong...
Bước 2, 3, 4 bạn cũng có thể thao tác luôn trên Excel2007 nếu như bạn rành Version này (tôi vì thao tác ko rành lắm nên chỉ dùng nó đễ xóa name)

Bạn ơi, mình làm giống như bạn rồi mà dung lượng vẫn còn lơn hơn 2MB.
Các bạn xem file này còn giảm dung lượng được nữa không nhé.
Cảm ơn nhiều :)
 

File đính kèm

Bạn ơi, mình làm giống như bạn rồi mà dung lượng vẫn còn lơn hơn 2MB.
Các bạn xem file này còn giảm dung lượng được nữa không nhé.
Cảm ơn nhiều :)
Tại sheet P.Ha, bạn quét chọn từ dòng 129 đến dòng 65536 rồi vào menu Edit\Clear\All ---> Đóng và lưu file rồi kiểm tra lại dung lượng nhé
 
file cua bạn chứa đén 2 tấn name rác+nhiễm virus có tên là XF.lugunay
tuy nhien tôi có diệt cho bạn xong rồi (diệt = tay ) nhưng dung lượng không giảm bằng của anh tuấn (của tôi còn trên 250 k) . vì tôi chỉ diệt được 2 tấn name rác và 1 sheet ẩn bên trong có tên là 00000000
 

File đính kèm

Tại sheet P.Ha, bạn quét chọn từ dòng 129 đến dòng 65536 rồi vào menu Edit\Clear\All ---> Đóng và lưu file rồi kiểm tra lại dung lượng nhé

Cảm ơn anh nhiều, em không để ý cái thanh trượt bên phải nên không biết trong sheet có nhiều dòng thừa như vậy ;;;;;;;;;;;
 
Bạn ơi, mình làm giống như bạn rồi mà dung lượng vẫn còn lơn hơn 2MB.
Các bạn xem file này còn giảm dung lượng được nữa không nhé.
Cảm ơn nhiều :)
tình hình là em cũng có 1 file có chưa đến 500 dòng, nhưng dung lượng lên tới hơn 53MB, thực hiện theo các hướng dẫn rồi nhưng không được. Bác nào xử lý giúp em với nhé. hic hic nút đính kèm tập tin ở đâu nhỉ?
 
tình hình là em cũng có 1 file có chưa đến 500 dòng, nhưng dung lượng lên tới hơn 53MB, thực hiện theo các hướng dẫn rồi nhưng không được. Bác nào xử lý giúp em với nhé. hic hic nút đính kèm tập tin ở đâu nhỉ?

Bạn nén file rồi gửi lên hoặc cho đường link mọi người xem rồi hỗ trợ.
 
EM cũng có file như vậy, nhưng dung lượng nó còn cao hơn cơ nén vào gửi gmail cũng k tải được, hic, có khi nào virus k

Cái này phải xem file mới biết được bạn ơi. Nhưng nếu dung lương tăng đột biến thì nhiều khả năng là do virus.
 
Ko có chương trình nào cã... tôi diệt bằng tay... hi.. hi... Quá trình tôi làm như sau:
1> Đóng tất cã các file Excel đang mở rồi mở file này lên, Enable macro (File cũa bạn nếu Disable macro sẽ ko nhìn thấy dc sheet ẩn)
2> Vào menu Format\Sheet\Unhide đễ cho hiện sheet tên ~, OK
3> Xóa sheet ~ rồi đóng và lưu file
4> Tiếp theo tôi mở lại file này trên Excel2007 và xóa tất cã các name bên trong...
Bước 2, 3, 4 bạn cũng có thể thao tác luôn trên Excel2007 nếu như bạn rành Version này (tôi vì thao tác ko rành lắm nên chỉ dùng nó đễ xóa name)
Đơn giản vậy thôi! Bạn có thể làm thử...
Tất nhiên bạn có thể dùng 1 vài chương trình phù hợp đễ diệt (như chương trình cũa bạn TuanVNUNI) nhưng tôi khuyên bạn nên thao tác bằng tay 1 vài lần như tôi hướng dẩn ở trên, tuy cực nhưng bạn sẽ hiểu thêm dc rất nhiều thứ
Mến
ANH TUẤN

Bạn hướng dẫn, mình không hiểu gì cả
 
Mình Mĩnh có file này nhờ anh em diễn đàn chỉnh giúp !

Mính có file excel có dung lượng lớn bất thường nhờ anh em diễn đàn chỉ cách mình chỉnh giúp với !

Cảm ơn anh em trước.
 

File đính kèm

Mính có file excel có dung lượng lớn bất thường nhờ anh em diễn đàn chỉ cách mình chỉnh giúp với !

Cảm ơn anh em trước.

File của bạn chỉ có khoảng 40,000 cái TextBox vẽ tào lao trên sheet, nó chưa "chết ngắt" luôn là may cho bạn rồi
Đã sửa xong, file còn 40KB
 

File đính kèm

File excel của mình cũng bị tăng đột biến dù không có công thức hay format gì nhiều, File của mình lên đến 24MB nên không tải lên được. Mình đã thử quét virut nhưng không được. Mong mọi người chỉ giúp. Thanks!
 
File excel của mình cũng bị tăng đột biến dù không có công thức hay format gì nhiều, File của mình lên đến 24MB nên không tải lên được. Mình đã thử quét virut nhưng không được. Mong mọi người chỉ giúp. Thanks!
dung lượng file lớn bạn có thể up lên mediafire hoặc google. nói xuông khó đoán lắm. có rất nhiều nguyên nhân gây ra dung lượng file bị lớn
 
- Save as ra 1 file để làm (giữ 1 bảng gốc để kiểm tra).
- Chọn khối toàn bộ dữ liệu (không ctlr-A), copy qua 1 sheet mới (trong cùng file hoặc file mới), rồi xóa sheet cũ.
- Tương tự cho tất cả các sheet.
Mình đã thử cách này ok.
 
Hiện tại em cũng bị dính 2 file mà dung lượng lên cao quá, nhờ các bác sửa giúp với ah.
địa chỉ mail của em: dinhthongsnv@gmail.com.
Kính nhờ các bác, trân trọng cám ơn.
 

File đính kèm

Mình đã làm được. Chắc của mình dính nhiều Object quá nên đợi hơi lâu một chút. Phải tầm 15p.
Trân trọng cám ơn các bạn đã giúp đỡ mình
 
Mình đã làm được. Chắc của mình dính nhiều Object quá nên đợi hơi lâu một chút. Phải tầm 15p.
Trân trọng cám ơn các bạn đã giúp đỡ mình
File của bạn tại #35 đúng là hàng khủng, thử xóa object rác mà gây treo máy chết máy. Tôi phải shift Delete ngay lập tức file của bạn ngay :-=
 
File của bạn tại #35 đúng là hàng khủng, thử xóa object rác mà gây treo máy chết máy. Tôi phải shift Delete ngay lập tức file của bạn ngay :-=
Ở thế hóa ra khó là bác bỏ người ta ạ?

Em là có ít nhất 2 cách để xóa mà vô cùng đơn giản chẳng treo máy gì cả, em toàn tìm trên GPE Hehee. Thôi em cũng chạy để bác tìm vậy, diễn đàn có đầy mờ.
 
Ở thế hóa ra khó là bác bỏ người ta ạ?

Em là có ít nhất 2 cách để xóa mà vô cùng đơn giản chẳng treo máy gì cả, em toàn tìm trên GPE Hehee. Thôi em cũng chạy để bác tìm vậy, diễn đàn có đầy mờ.
-) Ahh, tôi cũng mất 1 "số lượng phút" để cũng chọn hết các object, cũng chọn được nhưng tôi không xóa đành out luôn. Nhìn thấy vòng quay cứ quay đều quay đều đủ biết file lỗi đến mức cao cấp hihi nên đành out.
-) Bạn đã có cách xóa mà không gây treo máy thì tung lên đây để tất cả cùng tham khảo!?
 
-) Ahh, tôi cũng mất 1 "số lượng phút" để cũng chọn hết các object, cũng chọn được nhưng tôi không xóa đành out luôn. Nhìn thấy vòng quay cứ quay đều quay đều đủ biết file lỗi đến mức cao cấp hihi nên đành out.
-) Bạn đã có cách xóa mà không gây treo máy thì tung lên đây để tất cả cùng tham khảo!?
Diễn đàn có mờ bác

1/ Code
2/ Dùng Winrar
 
Cụ thể đi bạn. Tôi có 1 code của bác ndu nhưng hình như phải cóp + chạy trực tiếp trên file lỗi chứ không có code diệt object rác trên file 2 bằng code trên file 1.
Bác cứ đùa em, bác những 4 sao, 4272 bài thì bác nắm quá chắc là copy code trên 1 file rồi chạy. Chứ em chỉ có biết đọc rồi cop dán hehee hưởng thành quả song em cũng đọc được là có thể dùng 1 file để xử lý 2 file đấy - diễn đàn có bác nhá. Bác tìm nhé, chết em múa rìu qua mắt thợ rồi.
 
Bác cứ đùa em, bác những 4 sao, 4272 bài thì bác nắm quá chắc là copy code trên 1 file rồi chạy. Chứ em chỉ có biết đọc rồi cop dán hehee hưởng thành quả song em cũng đọc được là có thể dùng 1 file để xử lý 2 file đấy - diễn đàn có bác nhá. Bác tìm nhé, chết em múa rìu qua mắt thợ rồi.
Màu cam : tôi biết làm rồi.
Màu xanh : tôi cũng như bạn :-=
Màu này : tôi đang muốn biết đấy nên tôi muốn biết bạn dùng code nào.
 
Màu cam : tôi biết làm rồi.
Màu xanh : tôi cũng như bạn :-=
Màu này : tôi đang muốn biết đấy nên tôi muốn biết bạn dùng code nào.
Híc bác cái nào cũng biết tuốt, bác lại trêu em từ bài 40, 42, 44, 46 chả bài nào bác chỉ cho em cả (những 4 bài), thế mà em lại chỉ cho bác mấy bài liền => chết dở múa rìu qua mắt thợ quá, bác làm em ngượng quá - cứ trêu em thôi.

Em mới vào số bài ít, sao cũng ít nên bác chỉ em nhiều nhé, chứ cứ lấp lửng đùa em như thế này em thấy "xí hổ" lắm

Còn đây là đoạn code em dùng bác này, chắc bác biết rồi nhưng lại giấu, cơ mà bác hỏi thì em trả lời đúng trọng tâm trọng điểm nhé.

Sub XoaObject() On Error Resume Next
Dim Wb As Workbook
Dim Sh As Worksheet
Dim Shp As Shape
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.DisplayAlerts = False
Set Wb = Application.Workbooks.Open("D:\1.xlsx")
Set Sh = Wb.Sheets("Sheet1")
For Each Shp In Sh.Shapes
Shp.Delete
Next
Wb.Close True
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
Application.DisplayAlerts = True
End Sub
 
Híc bác cái nào cũng biết tuốt, bác lại trêu em từ bài 40, 42, 44, 46 chả bài nào bác chỉ cho em cả (những 4 bài), thế mà em lại chỉ cho bác mấy bài liền => chết dở múa rìu qua mắt thợ quá, bác làm em ngượng quá - cứ trêu em thôi.

.
Tôi chỉ có Code của bác ndu chỉ như vậy:
Sub DeleteShapes()
Dim i As Long
On Error Resume Next
With ActiveSheet
For i = 1 To 10000
.Shapes(1).Delete
Next
MsgBox .Shapes.Count
End With
End Sub
 
Tôi chỉ có Code của bác ndu chỉ như vậy:
Sub DeleteShapes()
Dim i As Long
On Error Resume Next
With ActiveSheet
For i = 1 To 10000
.Shapes(1).Delete
Next
MsgBox .Shapes.Count
End With
End Sub
Em cam đoan với bác đây không phải Code bác dùng, em thử không có được mặt khác bài kia lên tới hơn 20.000 object cơ mà. Bác lại trêu em. Híc đã 5 bài rồi đấy.
 
Em cam đoan với bác đây không phải Code bác dùng, em thử không có được mặt khác bài kia lên tới hơn 20.000 object cơ mà. Bác lại trêu em. Híc đã 5 bài rồi đấy.
Chắc chắn 1 điều là : Tôi không trêu gì bạn.
Tôi có thử dùng cách có sẵn F5/... chứ không dùng code trên để xóa object trong file.
Vì tôi có biết mù tịt gì về code đâu. :-=
 
Chắc chắn 1 điều là : Tôi không trêu gì bạn.
Tôi có thử dùng cách có sẵn F5/... chứ không dùng code trên để xóa object trong file.
Vì tôi có biết mù tịt gì về code đâu. :-=
Thế là bác trêu em nhá. Bác xem cái thông báo nó có trả về số lượng Object ko?

Với cách trả lời chỉn chu của anh NDU thì chả có lý gì mà thông báo lại sai toét.

Đã 6 bài rồi mà em vẫn thấy bác như trêu em í. Híc híc - em là nói thật luôn, tét thấy sai nói vậy, bác không tin thì bác thử xem.
 
Thế là bác trêu em nhá. Bác xem cái thông báo nó có trả về số lượng Object ko?

Với cách trả lời chỉn chu của anh NDU thì chả có lý gì mà thông báo lại sai toét.

Đã 6 bài rồi mà em vẫn thấy bác như trêu em í. Híc híc - em là nói thật luôn, tét thấy sai nói vậy, bác không tin thì bác thử xem.
Tôi đã nói ở #50 là không dùng code tại #48 để xóa object rác mà. Nên không biết code chạy như thế nào hay thông báo.
Chỉ dùng cách có sẵn là F5/...
 
Thế mà máy mình cũng bị treo nhưng rồi vẫn xoá được các object rác. Máy mình đúng là máy xịn. Ha ha ha--=0
Uhm, đúng là máy xịn, nhưng đảm bảo với bạn : cứ sử dụng file này mà copy tiếp nhiều dòng chứa object rác khoảng vài tháng sau thì máy nào cũng không chịu nổi, xóa hết object rác đi thì file lại nhẹ tựa lông hồng thôi.
 
Em có File này đã làm thử theo mấy cách mà không ăn thua. Bác nào xem hộ em vơi.
Em cảm ơn
 
Em có File này đã làm thử theo mấy cách mà không ăn thua. Bác nào xem hộ em vơi.
Em cảm ơn
Bạn phải làm ngược lại "mấy cách" ấy.
Vấn đề của bạn ngược với người ta.
Người ta bị phình files. Bạn bị rút files. Hiện giờ cái file của bạn nó rút mất dấu luôn rồi.
 
các bác kiểm tra giúp em cái. Cail file excel của mình k có gì mà sao nặng vậy
link file
 
Bác nào biết giúp em cái.
 
Unhide tất cả dòng - Delete tất cả dòng từ 27 đến hết dòng cuối (1048576). Nếu cẩn thận thì nhấn Clear all luôn, còn 2Mb thôi
 
Lần chỉnh sửa cuối:

Bài viết mới nhất

Back
Top Bottom