Excel Chạy Rất Chậm (1 người xem)
- Thread starter exel2007
- Ngày gửi
Người dùng đang xem chủ đề này
salam đã viết:
hoàn toàn không có hàm gì cả , trước kia dùng office XP(2002) thì không bị như thế , nhưng từ khi cài office2003 vào là bị khi remove và cài lại office xp thì nó vẫn bị ảnh hưởng và bị trường hợp như trên , thậm chí delete dòng cũng phải chờ nó 15 phút nó mới delete được , nói chung ức phát điên lên
anhtuan1066
Thành viên gạo cội
- Tham gia
- 10/3/07
- Bài viết
- 5,802
- Được thích
- 6,912
He... he...
Chẳng trách nào bạn ko tìm ra dc nguyên nhân... Trong file của bạn có hàng đóng Object "ẩn mặt"... Điều này tôi đã từng nói mấy lần trên diển đàn rồi: Khi bạn kiểm tra file mà thấy dung lượng tăng bất thường thì có thể nghĩ ngay là trong file có rất nhiều Object...
Giã sử file gốc lúc đầu bạn vô tình vẽ 1 đường thẳng, 1 đường tròn hay object gì đó, nhưng bạn lại quên xóa đi... Khi bạn copy dử liệu sang sheet khác, hay đơn giãn là fill công thức thì sẽ có hàng đóng phiên bản những object ấy dc tạo thành... Lâu ngày, cứ copy, paste rồi fill công thức.. đến ngày nào đó sẽ như file của bạn... Ko chậm mới lạ!
Cách kiểm tra: Mở file, vào từng sheet một, bấm Ctrl + G, bấm nút Special, chọn mục Objects, OK... nếu máy tính im re ko báo gì thì có nghĩa là trong file đang tồn tại Object... lúc đó bạn đừng thao tác thêm gì cả, đơn giãn là bấm Delete trên bàn phím, Save file rồi kiểm tra lại dung lượng...
Hi... hi...
File của bạn có dung lượng 9M, sau khi tôi xóa xong các object thì chỉ còn 100K...
Xem file tôi sửa lại nhé... Ko nhanh ko ăn tiền!
ANH TUẤN
(Hãy kiểm tra tất cả những file trên máy tính của bạn theo cách tôi vừa nêu)
Chẳng trách nào bạn ko tìm ra dc nguyên nhân... Trong file của bạn có hàng đóng Object "ẩn mặt"... Điều này tôi đã từng nói mấy lần trên diển đàn rồi: Khi bạn kiểm tra file mà thấy dung lượng tăng bất thường thì có thể nghĩ ngay là trong file có rất nhiều Object...
Giã sử file gốc lúc đầu bạn vô tình vẽ 1 đường thẳng, 1 đường tròn hay object gì đó, nhưng bạn lại quên xóa đi... Khi bạn copy dử liệu sang sheet khác, hay đơn giãn là fill công thức thì sẽ có hàng đóng phiên bản những object ấy dc tạo thành... Lâu ngày, cứ copy, paste rồi fill công thức.. đến ngày nào đó sẽ như file của bạn... Ko chậm mới lạ!
Cách kiểm tra: Mở file, vào từng sheet một, bấm Ctrl + G, bấm nút Special, chọn mục Objects, OK... nếu máy tính im re ko báo gì thì có nghĩa là trong file đang tồn tại Object... lúc đó bạn đừng thao tác thêm gì cả, đơn giãn là bấm Delete trên bàn phím, Save file rồi kiểm tra lại dung lượng...
Hi... hi...
File của bạn có dung lượng 9M, sau khi tôi xóa xong các object thì chỉ còn 100K...
Xem file tôi sửa lại nhé... Ko nhanh ko ăn tiền!
ANH TUẤN
(Hãy kiểm tra tất cả những file trên máy tính của bạn theo cách tôi vừa nêu)
cám ơn bạn nhiều nhé , tôi hỏi thêm với cùng là file như thế tôi dung office xp (excel) điền dữ liệu đến dòng thứ 5000 thì vẫn mờ được nhưng ở office 2003 thì không thể mờ được và nó báo là bị hỏng file bạn chỉ giùm với thanks nhé
anhtuan1066
Thành viên gạo cội
- Tham gia
- 10/3/07
- Bài viết
- 5,802
- Được thích
- 6,912
Giờ thế này nhé: Chúng ta lại tiếp tục làm thí nghiệm... Bạn tạo file 5000 dòng trên Excel2003, sau đó mở thử, nếu nó báo lỗi thì bạn gữi lên đây!
Chúng ta chỉ có thể từng bước thí nghiệm thế thôi.. chứ khó đoán nguyên nhân lắm!
Mến
ANH TUẤN
Chúng ta chỉ có thể từng bước thí nghiệm thế thôi.. chứ khó đoán nguyên nhân lắm!
Mến
ANH TUẤN
anhtuan1066
Thành viên gạo cội
- Tham gia
- 10/3/07
- Bài viết
- 5,802
- Được thích
- 6,912
Tôi chỉ các bạn thêm 1 mẹo đễ nhận biết sự tồn tại của Object... Khi các bạn bấm Ctrl + G\Special\Objects, OK xong, nếu thấy mấy tính im re thì tất nhiên trong file có Object rồi, tuy nhiên rất khó nhìn thấy nó... Vậy lúc này các bạn hãy chọn và tô màu cho nó, sẽ phát hiện dc ngay...
Chẳng hạn như tô màu đỏ, khi ấy ta sẽ thấy có hàng đóng những chấm đỏ li ti trên bảng tính... Nhiều đến mức kéo Scroll bar ko chạy nỗi luôn... Nhưng khi bấm nút Delete trên bàn phím thì bảng tính tự nhiên trở nên mượt mà ngay!
----------------
Lưu ý thêm: Các Object thuộc thanh Control Toolbox thì ko xài chiêu này dc... Trước tiên bạn phải bật chế độ Design Mode lên, sau đó mới thực hiện các bước tôi đã nói ở trên... nếu ko thì dù Object có tồn tại, máy tính vẫn báo "No objects found"
Mến
ANH TUẤN
Chẳng hạn như tô màu đỏ, khi ấy ta sẽ thấy có hàng đóng những chấm đỏ li ti trên bảng tính... Nhiều đến mức kéo Scroll bar ko chạy nỗi luôn... Nhưng khi bấm nút Delete trên bàn phím thì bảng tính tự nhiên trở nên mượt mà ngay!
----------------
Lưu ý thêm: Các Object thuộc thanh Control Toolbox thì ko xài chiêu này dc... Trước tiên bạn phải bật chế độ Design Mode lên, sau đó mới thực hiện các bước tôi đã nói ở trên... nếu ko thì dù Object có tồn tại, máy tính vẫn báo "No objects found"
Mến
ANH TUẤN
Lần chỉnh sửa cuối:
----------------
Lưu ý thêm: Các Object thuộc thanh Control Toolbox thì ko xài chiêu này dc... Trước tiên bạn phải bật chế độ Design Mode lên, sau đó mới thực hiện các bước tôi đã nói ở trên... nếu ko thì dù Object có tồn tại, máy tính vẫn báo "No objects found"
Mến
ANH TUẤN[/quote]
bạn nói giúp thêm Design Mode nằm ở đâu
Lưu ý thêm: Các Object thuộc thanh Control Toolbox thì ko xài chiêu này dc... Trước tiên bạn phải bật chế độ Design Mode lên, sau đó mới thực hiện các bước tôi đã nói ở trên... nếu ko thì dù Object có tồn tại, máy tính vẫn báo "No objects found"
Mến
ANH TUẤN[/quote]
bạn nói giúp thêm Design Mode nằm ở đâu
salam
Thành viên gắn bó
- Tham gia
- 4/11/06
- Bài viết
- 1,945
- Được thích
- 1,898
- Giới tính
- Nam
- Nghề nghiệp
- Accountant
exel2007 đã viết:
Bạn nhấn chuột phải lên khu vực tools bar xong chọn visual basic cho hiện thanh visual basic lên bạn rê chuột đến biểu tượng e ke với bút đó. nó sẽ hiện tên desing mod click vòa đó nhé.
anhtuan1066
Thành viên gạo cội
- Tham gia
- 10/3/07
- Bài viết
- 5,802
- Được thích
- 6,912
Tốt nhất nên click phải thanh Toolbars, chọn Control Toolbox... vì ta đang nói đến các Object thuộc thanh này mà... Sẳn tiện bạn tập sử dụng mấy công cụ này luôn đễ làm thí nghiệmsalam đã viết:
Trong thanh này cũng có 1 nút có biểu tượng thước Eke, và lưu ý tất cả các Object thuộc thanh này chỉ làm việc dc khi đã Exit Design Mode
ANH TUẤN
T
Tuyvan
Guest
Nhưng cách tô màu cho Objects mình làm thế nảo? Bạn chỉ giúp nhé, mình vừa phát hiện các file của mình cũng bị vụ này. Thanks bạn nhiu nhiu.
anhtuan1066
Thành viên gạo cội
- Tham gia
- 10/3/07
- Bài viết
- 5,802
- Được thích
- 6,912
Trong trường hợp này nhất định ko dc click chuột phải hay làm bất cứ thao tác nào trên bảng tính cả... Vì có thấy Object nằm ở đâu mà Click...
Cứ chọn biểu tượng Fill Color trên toolbars mà tô
ANH TUẤN
Cứ chọn biểu tượng Fill Color trên toolbars mà tô
ANH TUẤN
Trường hợp của mình như thế này:
Sau khi coppy khoảng 100 sheet từ các worsheet khác nhau làm thành 1 sheet tổng hợp,rồi dùng hàm SUMIF(trên 20.000 dòng) để cập nhật Công nợ của từng KH qua các ngày,lúc đó máy chạy rất chậm,và báo callulating Cells.
-Tôi đã làm như trên hướng dẫn vẫn không khả quan hơn(xóa Object thì không có,chọn chế độ Callulation là Automatic)
-Vậy xin hỏi có cách nào để khắc phục tình trạng trên không?(cấu hình máy tính cũng tàm tạm.hi)
Thanks!
boyxin
Members actively
- Tham gia
- 10/3/08
- Bài viết
- 1,664
- Được thích
- 2,335
Muốn khám bệnh thì bệnh nhân cần đến cơ sở y tế gặp bác sĩ mới có thể ra bệnh
Muốn xem file mắc chứng tật gì thì cũng vậy
Đoán bệnh theo kiểu "nghe hơi nồi chõ" thế này thì ...
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Đã kiểm tra như bạn nói, nhưng file vẫn vô cùng chậm
Chào Anh Tuấn,
File excel của mình cũng bị tình trạng tương tự. Bạn xem dùm mình cái file đính kèm với nhé. File này mình cũng copy paste từ file khác sang, mới đầu OK nhưng sau đó thì ì à ì ạch. Mở Window Task Manager ra xem thấy EXCEL.EXE chạy lên hơn 700.000KB ( trong khi RAM của máy có 1GHB).
Mình đã delete hết những dòng trống phía dưới, rồi làm như Anh Tuấn nói, bấm ^G chọn Special, chọn Objects, nhưng chưa kịp bấm delete hay tô màu máy đã đơ rồi. Khi đơ thanh toolbar cũng biến mất tiêu luôn. Và con trỏ chuột biến thành hình tròn quay vòng vòng hoài. Hôm qua mình kiên quyết chờ xem nó quay đến khi nào, nó quay từ 4g30 đến 5g30 con trỏ chuột hình tròn mới biến mất. Mừng quá tưởng nó xong ai dè bấm chuột vào nó lại quay tiếp.
Đã xem không có sheet nào ẩn trong đó (Nút Unhide sheet không sáng) . Cũng không có cái name nào trong Name Manager.
Trong file mình gửi có 2 sheet, sheet H là một phần của sheet House,lấy ra để kiểm tra, sheet nào cũng bị tình trạng đó hết.
Bạn xem dùm, mình rất cám ơn!
Chào Anh Tuấn,
File excel của mình cũng bị tình trạng tương tự. Bạn xem dùm mình cái file đính kèm với nhé. File này mình cũng copy paste từ file khác sang, mới đầu OK nhưng sau đó thì ì à ì ạch. Mở Window Task Manager ra xem thấy EXCEL.EXE chạy lên hơn 700.000KB ( trong khi RAM của máy có 1GHB).
Mình đã delete hết những dòng trống phía dưới, rồi làm như Anh Tuấn nói, bấm ^G chọn Special, chọn Objects, nhưng chưa kịp bấm delete hay tô màu máy đã đơ rồi. Khi đơ thanh toolbar cũng biến mất tiêu luôn. Và con trỏ chuột biến thành hình tròn quay vòng vòng hoài. Hôm qua mình kiên quyết chờ xem nó quay đến khi nào, nó quay từ 4g30 đến 5g30 con trỏ chuột hình tròn mới biến mất. Mừng quá tưởng nó xong ai dè bấm chuột vào nó lại quay tiếp.
Đã xem không có sheet nào ẩn trong đó (Nút Unhide sheet không sáng) . Cũng không có cái name nào trong Name Manager.
Trong file mình gửi có 2 sheet, sheet H là một phần của sheet House,lấy ra để kiểm tra, sheet nào cũng bị tình trạng đó hết.
Bạn xem dùm, mình rất cám ơn!
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Sheet H có 39697 Object dạng rectangle.
Sheet House có 13495 cái.
Bạn dùng code này để xoá chúng, mỗi lần xoá 1000 cái cho đỡ sốt ruột:
Còn nếu can đảm muốn xem nó là cái giống gì thì chạy code này, thử với 100 cái:
Sheet House có 13495 cái.
Bạn dùng code này để xoá chúng, mỗi lần xoá 1000 cái cho đỡ sốt ruột:
PHP:
Sub del()
For i = 1 To 1000
ActiveSheet.Shapes(i).Delete
Next
End SubCòn nếu can đảm muốn xem nó là cái giống gì thì chạy code này, thử với 100 cái:
PHP:
Sub abc()
For i = 1 To 100
With ActiveSheet.Shapes(i)
.Left = 0
.Top = Cells(i, 1).Top
.Width = Cells(i, 1).Width
.Height = Cells(i, 1).Height / 2
.Fill.ForeColor.SchemeColor = 10
End With
Next
End Sub
- Tham gia
- 5/6/08
- Bài viết
- 30,703
- Được thích
- 53,974
Chào bạn!
Đã xóa toàn bộ Objects cho bạn rồi đây
Dùng Excel 2007 thì khó lòng mà xóa được (sẽ bị treo máy vì file này quá nhiều Objects)... Tuy nhiên, nếu bạn Save As thành xls, xong mở file bằng Excel 2003 là có thể xóa thoải mái
Xong chuyện lại Save As thành xlsx...
File của bạn sau khi xóa objects xong, dung lượng còn 135 KB
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Cám ơn bác Du rất nhiều! Tuy nhiên mấy bữa nay nó chạy chậm quá, tức điên lên tưởng thằng nào gửi vài con vi rút, mình cài lại win và remove cái ofice 2003 luôn rồi bác ạ. Đúng cái này là "chết vì thiếu hiểu biết"
Lần chỉnh sửa cuối:
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Cám ơn ptm0412 nhiều nhé!
Cho mình hỏi, nó có tới hơn ba chín ngàn cái thì mình sửa quách cái code từ 1-10.000 luôn được không? Trước khi hỏi không có can đảm thử, sợ nó toi luôn.
Mình hỏi thêm là, cứ copy cai code của bạn vào trong phần module là nó tự động chạy phải không? Bạn thông cảm mình hỏi câu này, trình độ VB của mình mới ở hang vịt thôi.
Cho mình hỏi, nó có tới hơn ba chín ngàn cái thì mình sửa quách cái code từ 1-10.000 luôn được không? Trước khi hỏi không có can đảm thử, sợ nó toi luôn.
Mình hỏi thêm là, cứ copy cai code của bạn vào trong phần module là nó tự động chạy phải không? Bạn thông cảm mình hỏi câu này, trình độ VB của mình mới ở hang vịt thôi.
- Tham gia
- 5/6/08
- Bài viết
- 30,703
- Được thích
- 53,974
Vấn đề nằm ở chổ: Bạn đã xóa bằng tay không được (treo máy) nên sư phụ ptm0412 mới đề xuất giải pháp XÓA TỪ TỪ, mỗi lần 1000 cái thôi ---> Nếu bạn sửa thành 10,000 thì... Ẹc... Ẹc... ăn chắc vũ như cẩn (nó lại treo máy)
Còn tôi, dùng Excel 2003 để xóa lại không bị hiện tượng treo này (may quá)
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Chào ptm0412
Bạn chỉ luôn cho cách làm cái code này chạy, mình copy nó vô phần module, save lại thành file .xlsm, uống hết 1 ly cà phê mà nó vẫn còn chậm? ( uống cà phê cũng có hơi vội vàng vì đang cần gấp mà, nhưng dù sao cũng mất cỡ chừng hết.... thới gian uống 1 ly cà phê)....
Đùa tí cho tỉnh táo bạn đừng giận..
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Bác ơi, bác cho hỏi luôn là bác chuyển sang 2003 rồi cũng xoá y như anh Tuấn chỉ phải không? Mình đã làm như bác bảo, chuyển sang 2003 ( hihi, remove cái ốp phít 2003 rồi nhưng mà vẫn chuyển được) làm y chang như vậy và nó vẫn thành hình cái vòng tròn quay từ từ bác ơi. Nói thiệt là máy ở công ty cũng hơi cùi. Bác làm cái này mất bao lâu vậy bác?
Bác cho hỏi thêm là làm cách xoá từ từ như sư phụ ptm0412 thì nó chậy mật bao lâu, dòm 2 cái file chạy vòng vòng hoài đau tim quá...
Hỏi thêm nữa là nếu mình dùng cái file bác đã chỉnh sửa copy đè lên cái file của mình thì cũng làm mất hết các objects đang có chứ?
Cám ơn bác nhiều!
Lần chỉnh sửa cuối:
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Không cần module, không cần save as xlsm, không cần gì cả.
Bạn trở ra quán cafe. Kêu 1 ly đen không đường.
Mở file lên
Copy code vào VBA, sheet nào cũng được, workbook cũng được. Để nguyên số 1000.
Nhấn nút Run trên toolbar hoặc nhấn F5
Uống 1 hớp nhỏ cafe
Rít 1 hơi thuốc lá. Xong 1000 chú.
Nhấn F5 chạy lần 2
Lại 1 hớp nhỏ cafe, 1 hơi thuốc lá.
....
Hết sheet này, thì quay ra Excel, chọn sheet kế (chỉ chọn cho mở ra thôi, không đụng đến celll xiếc gì hết)
Quay ra VBA nhấn F5 chạy tiếp.
....
Xoá hết rồi, xoá luôn macro, lưu xlsx bình thường.
Bạn trở ra quán cafe. Kêu 1 ly đen không đường.
Mở file lên
Copy code vào VBA, sheet nào cũng được, workbook cũng được. Để nguyên số 1000.
Nhấn nút Run trên toolbar hoặc nhấn F5
Uống 1 hớp nhỏ cafe
Rít 1 hơi thuốc lá. Xong 1000 chú.
Nhấn F5 chạy lần 2
Lại 1 hớp nhỏ cafe, 1 hơi thuốc lá.
....
Hết sheet này, thì quay ra Excel, chọn sheet kế (chỉ chọn cho mở ra thôi, không đụng đến celll xiếc gì hết)
Quay ra VBA nhấn F5 chạy tiếp.
....
Xoá hết rồi, xoá luôn macro, lưu xlsx bình thường.
- Tham gia
- 5/6/08
- Bài viết
- 30,703
- Được thích
- 53,974
Vâng! Tôi làm giống vậy! Tức Ctrl + G\Special và check mục Objects, bấm OK rồi bấm nút Delete trên bàn phím
Nhưng như tôi đã nói ở trên:
- Tôi Save As file thành xls
- Xong, tôi mở file xls trên bằng Excel 2003
Vậy nếu bạn lại mở file xls trên bằng Excel 2007 thì... cũng bằng không
----------------
Làm theo cách tôi vừa nói ở trên, xóa hết Objects trong vòng 10s (vấn đề là bạn phải có Office 2003)
------------------------------
Thậm chí là khỏi cần làm gì... cứ lưu bình thường là macro sẽ tự (bị) xóa
Ẹc... Ẹc...
Lần chỉnh sửa cuối:
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Lưu bình thường nó cũng hỏi lôi thôi, lại chạy lên GPE hỏi nên nhấn Yes hay No. (Khà khà, dự phòng cả cho chuyện đó nữa mà)
Lưu ý là với cách select Object rồi xoá bằng tay, nếu không biết cách sẽ không xoá được những object ẩn. Xoá object hiện trước, vào option cho hiện và xoá object ẩn sau. Chứ file đang ì ạch vậy, lại còn vào option cho hiện ra hết rồi mới xoá, thì e rằng 1 ly cafe không đủ.
Xoá bằng VBA thì bảo đảm xoá cả object ẩn.
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Hahhaha, được rồi, được rồi! Thì ra là phải run nữa mà mình không biết. Mình khoái uống cà phê không đường nhưng không bie61t hút thuốc, thay vào đó mình ngồi ngắm em gái bán cà phê......
Nhờ ngắm ẻm mình mới nghiệm ra điều này, mình chạy cái code tô màu mấy cái objects của bạn, thấy hiện ra một đống đỏ lè nhưng chỉ nằm ở cột A thôi, và cũng chừng từ dòng 100 đổ lại. Bạn nói sheet H chừng 39 ngàn cái, theo mình tính phải hớp chừng 40 ngụm cà phê mới đủ, tính ra khoảng 10 ly. Uống 10 ly lúc 8 giờ tối chác chết nên mình uống ăn gian...... mới uống có 1 ly, nói chung là bấm run chừng dưới 1 chục lần là mấy cái đống đỏ lè đó nó tiêu hết trơn rồi.
Vậy có phải là mình xoá 1000 cái nó khuyến mãi thêm 3000 nữa không? hay còn mấy chú objects nào khác trong đó mà mình không biết?
Bạn cho mình cái code đếm còn bao nhiêu chú đi để mình bấm run tiếp. Hiện giờ bấm run thì nó vẫn còn chạy, nhưng không xem được mấy chú kia "đai" đến đâu cũng kém phần thú vị....
Làm phiền hoài bạn đừng giận nhé!
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Cái đoạn code tô màu đỏ lè đó, nó chỉ tô 100 ku đầu tiên, và lôi về hết cột A, mỗi cái resize bằng 1 nửa cell cho bạn dễ ngắm. Chứ nó nằm lung tung khắp nơi và không bằng nhau như vậy đâu.
Quên nói bạn 1 điều là, cái số lẻ ngàn trong đợt chạy cuối cùng ấy, ngắm ẻm chục lần mới hết, vì 1 lần tuy gọi là 1000, nhưng nó chỉ xoá 1 nửa cái số lẻ đó.
39 lần, thì hết đủ 39000 ku, còn hơn 900 ku thì bị vầy: mỗi lần chạy xoá 1 nửa số, dừng báo lỗi. Chạy lại, xoá 1 nửa số còn lại. Cứ thế, ngắm ẻm 1 chục lần.
Hoặc là bạn xài 1 trong 2 code này cho cái lẻ ngàn cuối cùng:
Câu lệnh MsgBox là thông báo số object còn lại trước và sau khi chạy code.
Quên nói bạn 1 điều là, cái số lẻ ngàn trong đợt chạy cuối cùng ấy, ngắm ẻm chục lần mới hết, vì 1 lần tuy gọi là 1000, nhưng nó chỉ xoá 1 nửa cái số lẻ đó.
39 lần, thì hết đủ 39000 ku, còn hơn 900 ku thì bị vầy: mỗi lần chạy xoá 1 nửa số, dừng báo lỗi. Chạy lại, xoá 1 nửa số còn lại. Cứ thế, ngắm ẻm 1 chục lần.
Hoặc là bạn xài 1 trong 2 code này cho cái lẻ ngàn cuối cùng:
PHP:
Sub del2()
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
For i = ActiveSheet.Shapes.Count to 1 step -1
ActiveSheet.Shapes(i).Delete
Next
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
End Sub
PHP:
Sub del3()
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
For Each Shp in ActiveSheet.Shapes
Shp.Delete
Next
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
End Sub
Lần chỉnh sửa cuối:
HoangHacVT
Thành viên chính thức
- Tham gia
- 3/6/09
- Bài viết
- 82
- Được thích
- 41
- Nghề nghiệp
- Marketing và bất cứ thứ gì người đẹp nhờ
Hehehe, cám ơn sư phụ!
Cái code của sư phụ thiếu & phia sau chữ "còn" phải không? Copy vào chạy luôn nó báo lỗi đấy sư phụ. Nhưng mình thêm dấu & vào rối chạy ok rồi.
không cần ngắm ẻm chục lần nữa vì mình đối số 1000 thành 3000 rồi, cám ơn sư phụ thật nhiều lần nữa nhé!
Các bác cho em hỏi: các file excel của em dạo này chạy chậm lắm, ngồi chờ để làm 1 thao tác đến phát bực... hix... e thử tìm object j đó để xóa nhưng toàn báo là "no object found"... VB thì em mù tịt...
Các bác bắt bệnh hộ em với....
Thanks!
Các bác bắt bệnh hộ em với....
Thanks!
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Bạn xem tuyệt chiêu số 15
tuyệt chiêu 15 đã viết:
Ngoài ra bạn đã kiểm tra name rác chưa?
Nếu vẫn không được thì bạn phải gởi file lên thôi.
banglv2110
Thành viên mới
- Tham gia
- 18/5/11
- Bài viết
- 1
- Được thích
- 0
Copy trong exel 2007 rất chậm các pac ho trợ em voi
Copy trong exel 2007 rat cham
Minh cu copy 4 dong nao day tren file nay rat cham
Copy nhieu dong cang cham, em gưi file dinh kem mong cac pác guip do
Các pac giup em voi
Copy trong exel 2007 rat cham
Minh cu copy 4 dong nao day tren file nay rat cham
Copy nhieu dong cang cham, em gưi file dinh kem mong cac pác guip do
Các pac giup em voi
cutifight
Thành viên mới
- Tham gia
- 24/2/11
- Bài viết
- 5
- Được thích
- 1
Chào anh Tuấn. mình có cũng gặp trường hợp là dung lượng file excel lớn bất thường. File gốc chỉ có 1 MB, nhưng mình làm động tác copy dữ liệu không lấy dữ liệu ẩn (theo cách F5/special/ visible cell only) thì khi copy và pase thì file mới lớn hơn 80MB, anh Tuấn có thể chỉ cách khắc phục vấn đề này không? cảm ơn anh.
Các bác giúp em file này với.
Của em cũng bị chạy chậm mà chưa rõ nguyên nhân.
http://www.mediafire.com/view/natckqmava9way2/TOTAL_REPORT.xlsx
Của em cũng bị chạy chậm mà chưa rõ nguyên nhân.
http://www.mediafire.com/view/natckqmava9way2/TOTAL_REPORT.xlsx
phucbugis
Thành viên tích cực
- Tham gia
- 22/6/13
- Bài viết
- 1,270
- Được thích
- 981
chào bạn,
- nguyên nhân là do file bạn có quá nhiều textbox thừa (rác) + row, column thừa
- để kiểm tra số liệu cuối cùng của 1 sheet bạn dùng tổ hợp phím Ctrl+End
Sheet BUY_Cntr:
- thực tế chỉ 372 row, trong khi check ô cuối cùng chứa số liệu lại là WVV32111 (-> thừa rất nhiều row, column)
- có đến 18299 textbox rác.
SELL-Cntr:
- vị trí cuối ở tại WVX33870
- cũng có textbox an?
Các sheet khác, bạn cũng kiểm tra tương tự vậy.
'- - -
- mình đã dùng code để xóa các shape tại Sheet BUY_Cntr, SELL-Cntr. Bạn vào copy comment của file cũ qua nhé.
- nhưng vẫn chưa biết cách xóa các row, column thừa
--> nếu có thể bạn tạo 1 sheet mới chuyển số liệu qua (chỉ copy số liệu, ko copy nguyên sheet) rồi xóa sheet cũ đi.bạn tải file mới về check xem có cải thiện tốc độ hơn ko?
https://www.mediafire.com/?yyn72jbo699g2c2
'- - -
tham khảo thêm bài sau để biết cách xóa các shape:
File Excel khi làm rất nặng
Lần chỉnh sửa cuối:
tuchua2108
Thành viên mới
- Tham gia
- 10/5/14
- Bài viết
- 2
- Được thích
- 0
File exel chạy rất chậm
Các bác ơi giúp em với, em kẹt vụ này mấy hôm nay rồi.
File exel này của em chạy rất nặng ( máy công ty toàn core i3) .
Bật lên mất 5 phút. Mà lưu cũng mất 5 phút.
Các pro giúp em xin thuốc nhé .
Chỉ luôn dùm mình cách sửa nhé vì còn 8 file như vậy nữa
Nó đây ạ : http://www.mediafire.com/download/9g...%E1%BA%A9n.rar
Các bác ơi giúp em với, em kẹt vụ này mấy hôm nay rồi.
File exel này của em chạy rất nặng ( máy công ty toàn core i3) .
Bật lên mất 5 phút. Mà lưu cũng mất 5 phút.
Các pro giúp em xin thuốc nhé .
Chỉ luôn dùm mình cách sửa nhé vì còn 8 file như vậy nữa
Nó đây ạ : http://www.mediafire.com/download/9g...%E1%BA%A9n.rar
vanle33
Thành viên gạo cội
- Tham gia
- 30/10/08
- Bài viết
- 5,962
- Được thích
- 4,009
- Giới tính
- Nam
BÓ TAY BÓ CHÂN TOÀN TẬP với file của bạn. Thực hiện 1 thao tác là lại chạy chạy chạy đến tết tây mới xong.Các bác ơi giúp em với, em kẹt vụ này mấy hôm nay rồi.
File exel này của em chạy rất nặng ( máy công ty toàn core i3) .
Bật lên mất 5 phút. Mà lưu cũng mất 5 phút.
Các pro giúp em xin thuốc nhé .
Chỉ luôn dùm mình cách sửa nhé vì còn 8 file như vậy nữa
Nó đây ạ : http://www.mediafire.com/download/9g...%E1%BA%A9n.rar
Thế này thì máy có Core i100 cũng thành RÙA hết với file của bạn thôi.
Sao bạn không tìm cách nào thay các công thức mảng bằng 1 công thức khác. Trước tiên là vậy đi
- Tham gia
- 2/8/10
- Bài viết
- 5,225
- Được thích
- 9,026
- Giới tính
- Nam
Nếu Excel 2003 thì cũng dùng SUMPRODUCT, Excel 2007 trở lên nhẹ hơn chút với SUMIFS, với cách nào cũng vậy, kiểu bố trí nhiều sheet như vậy cũng sẽ làm chậm tốc độ tính.
Rút ngắn lại số dòng trong công thức: mỗi sheet chi tiết, nhấn Ctrl+H, ô trên gõ $65536, ô dưới gõ $1200 (chừng 1,200 dòng, hoặc 2000 dòng) và Replace All. Rút ngắn số dòng trong công thức mảng sẽ tăng tốc độ tính.
phucbugis
Thành viên tích cực
- Tham gia
- 22/6/13
- Bài viết
- 1,270
- Được thích
- 981
hic,Các bác ơi giúp em với, em kẹt vụ này mấy hôm nay rồi.
File exel này của em chạy rất nặng ( máy công ty toàn core i3) .
Bật lên mất 5 phút. Mà lưu cũng mất 5 phút.
Các pro giúp em xin thuốc nhé .
Chỉ luôn dùm mình cách sửa nhé vì còn 8 file như vậy nữa
Nó đây ạ : http://www.mediafire.com/download/9g...%E1%BA%A9n.rar
- nhìn cái file lên đến 125 BKS (sheet), sao mà thấy "sót quá
"- mình đã sắp xếp lại số liệu các sheet đó thành 2 sheet Data và PhieuChotLenh, bạn tải file về xem sao nhé !
(nhập số liệu cần in tại K4:K5, M4:M5 của sheet PhieuChotLenh)
Link: https://www.mediafire.com/?274sbo44tnbo5ye
Lần chỉnh sửa cuối:
vuongtoituonglai
Thành viên thường trực
- Tham gia
- 7/5/14
- Bài viết
- 350
- Được thích
- 47
Code xóa Shape mình thấy nó báo cái gì đó mỗi làn xóa, bạn xem lại dùm nhé.
tuchua2108
Thành viên mới
- Tham gia
- 10/5/14
- Bài viết
- 2
- Được thích
- 0
Cám ơn các bạn đã tham gia giúp đỡ mình nhé !!!
Mình đã thay công thức khác và thành công roài . hị hị
conmuaxanh01
Thành viên mới
- Tham gia
- 30/12/11
- Bài viết
- 37
- Được thích
- 1
File chạy rất chậm
Các bác cho em cách xử lý file hơn 700Kb thôi mà sao chạy rất chậm, các bác xem rồi cho em ý kiến và cách khắc phục với nhé!!!
Các bác cho em cách xử lý file hơn 700Kb thôi mà sao chạy rất chậm, các bác xem rồi cho em ý kiến và cách khắc phục với nhé!!!
Lần chỉnh sửa cuối:
- Tham gia
- 2/8/10
- Bài viết
- 5,225
- Được thích
- 9,026
- Giới tính
- Nam
Dữ liệu vài ngàn dòng mà dùng công thức thì chậm là đúng rồi. Bạn xóa bớt dòng (để lại chừng 5, 10 dòng) và đưa bài qua box VBA sẽ có người giúp bạn.
Lê Duy Thương
Cạo lấy gì gội (Dịch quá không gội được)
- Tham gia
- 14/10/09
- Bài viết
- 3,113
- Được thích
- 4,852
có quá nhiều cells style nên chậm là đúng thôi. tôi đã sửa lại rồi vui long xem file nhé
conmuaxanh01
Thành viên mới
- Tham gia
- 30/12/11
- Bài viết
- 37
- Được thích
- 1
Trong sheet BCNGAY vẫn còn bị lỗi VBA bác xem giúp em luôn được kg???Em cảm ơn bác!!!
destinythanhphuong
Thành viên hoạt động
- Tham gia
- 15/10/11
- Bài viết
- 125
- Được thích
- 2
chào các anh chị
lâu lâu em cũng hay gặp vấn đề file phình to bất thường. em sửa lại bằng cách copy vùng dữ liệu qua sheet khác rồi delete sheet cũ . tuy nhiên, các sheet còn lại có link công thức với sheet bị lỗi thì xử lý bằng cách nào ?
cám ơn các anh chị
lâu lâu em cũng hay gặp vấn đề file phình to bất thường. em sửa lại bằng cách copy vùng dữ liệu qua sheet khác rồi delete sheet cũ . tuy nhiên, các sheet còn lại có link công thức với sheet bị lỗi thì xử lý bằng cách nào ?
cám ơn các anh chị
phucbugis
Thành viên tích cực
- Tham gia
- 22/6/13
- Bài viết
- 1,270
- Được thích
- 981
chào bạn,
mình giả sử ban đầu có 2 sheet: Sheet1 và Old (sheet này đang bị lỗi --> làm nặng file)
tại Sheet1: ô C10=Old!A1
'------------
B1: tạo 1 sheet mới tên bất kỳ (ví dụ là New)
B2: thay đổi đường dẫn toàn bộ công thức tại Sheet1 liên quan đến sheet Old
- chọn tất cả Sheet1 (Ctrl + A) click Ctrl + F
- tìm và thay thế (Replace All) với điều kiện như hình dưới
---> toàn bộ giá trị các ô đã thay đổi công thức sẽ = 0
B3: copy toàn bộ giá trị (Copy - Paste Values) của sheet Old sang sheet New
(chú ý: bố cục của 2 sheet này phải khớp với nhau ---> paste tại vị trí A1)
B4: xoá sheet Old đi --> lúc này các công thức của Sheet1 ko liên quan gì đến sheet Old nữa --> ko bị lỗi #REF!
File excel này của bạn có gì dữ liệu đâu, nên giải pháp tốt nhất là xóa file đó đi, lập file mới,
Còn vẫn thích cái file có mấy cái khung đó hoặc là áp dụng file thực (chưa xóa dữ liệu) thì bạn làm tuần tự theo bước sau
- mở file
- bấm Ctl+G --> special... --> chọn Objects --> OK : rồi bấm phím Delete
- Tiếp bấm chọn toàn bộ she et --> rồi vào Data / Data Validation --> Clear all
- Save file
Thế là giờ nhẹ nhẹ rui
Anh ơi , tại vì ban đầu có DL em Ctrl D nó chậm , em xóa hết DL cũng vậy , em copy DL sang file mới nhanh được 2 hôm sau đó cũng vậy nên em muốn tìm nguyên nhân tại sao ,, mong các cao thủ giúp e nha,... K biết file này định dạng có VD gì nữa
vanle33
Thành viên gạo cội
- Tham gia
- 30/10/08
- Bài viết
- 5,962
- Được thích
- 4,009
- Giới tính
- Nam
Chữ Clear tương đương với từ Delete đó bạn. Làm sạch hay xóa bỏ định dạng hay điều kiện hay ... linh tinh đi là nhẹ file ngay đó mà.
Là xoá toàn bộ các cells chứa Data Validation trong sheet vì không hiểu sao file bạn quá nhiều các cells này.
Data Validation là gì, thì bạn search trên diễn đàn, đọc trong sách Excel căn bản là hiểu ngay.
Excel chạy chậm
Chaò mọi người.
Mình đang sử dụng excel 2007, trong 1 file excel mình làm có khoảng 7 sheet, hai sheet đầu tiên thì thao tác dễ dàng nhưng đến sheet thứ 3 thì thao tác (mình thêm dòng, thêm cột, thực hiện công thức, cắt, dán) rất lâu sau đó mới load lại được. Mỗi lần lưu file chạy rất lâu mãi mới lưu được. Mình gửi file đính kèm. Mọi người giúp mình với nhé.
(Mình làm lương mà chạy thế này thì làm không nổi nữa).
Chaò mọi người.
Mình đang sử dụng excel 2007, trong 1 file excel mình làm có khoảng 7 sheet, hai sheet đầu tiên thì thao tác dễ dàng nhưng đến sheet thứ 3 thì thao tác (mình thêm dòng, thêm cột, thực hiện công thức, cắt, dán) rất lâu sau đó mới load lại được. Mỗi lần lưu file chạy rất lâu mãi mới lưu được. Mình gửi file đính kèm. Mọi người giúp mình với nhé.
(Mình làm lương mà chạy thế này thì làm không nổi nữa).
Lần chỉnh sửa cuối:
Chaò mọi người.
Mình đang sử dụng excel 2007, trong 1 file excel mình làm có khoảng 7 sheet, hai sheet đầu tiên thì thao tác dễ dàng nhưng đến sheet thứ 3 thì thao tác (mình thêm dòng, thêm cột, thực hiện công thức, cắt, dán) rất lâu sau đó mới load lại được. Mỗi lần lưu file chạy rất lâu mãi mới lưu được. Mình gửi file đính kèm. Mọi người giúp mình với nhé.
(Mình làm lương mà chạy thế này thì làm không nổi nữa).
bạn gửi file lên diễn đàn để mọi người kiểm tra xem sao nhé !
vunamnet
Thành viên mới
- Tham gia
- 19/5/11
- Bài viết
- 5
- Được thích
- 0
Dear ACE
Minh gui duong link ben duoi
Nho moi nguoi giup minh tinh gon code va giam dung luong voi
Thanks nhieu
http://www.mediafire.com/download/j49j9q76m05vr64/Downtime+And+Inventory.zip
Minh gui duong link ben duoi
Nho moi nguoi giup minh tinh gon code va giam dung luong voi
Thanks nhieu
http://www.mediafire.com/download/j49j9q76m05vr64/Downtime+And+Inventory.zip
- Tham gia
- 5/6/08
- Bài viết
- 30,703
- Được thích
- 53,974
File của bạn chỉ có mấy trăm KB, còn đòi giảm dung lượng gì nữa hả bạn?
VetMini
Đang đi tìm hòn đá
- Tham gia
- 21/12/12
- Bài viết
- 17,868
- Được thích
- 24,782
- Nghề nghiệp
- Thầy bói bài ta
Lý do chính không ai trả lời là vì bài của ban phạm quy, dùng tiếng Việt không có dấu.
Code trên file của bạn khá đồ sộ, sẽ mất nhiều thời gian để phân tích.
Code này do bạn viết hay mua từ đơn vị khác? Nếu là mua thì bạn nên nhờ bên bán tối ưu hóa thôi.
Đánh giá sơ bộ:
- file này của bạn sử dụng rất nhiều công thức nên thiết lập calculation thủ công, tức là nhập dữ liệu xong ấn F9 mới thực hiện tính toán. Format > Calculation Option > Manual
- sử dụng hàm index-match thay cho vlookup ( tại sao thì google với từ khóa "say goodbye vlookup", "index match better than vlookup"...)
Lần chỉnh sửa cuối:
Mọi người giúp em file này với ạ, dung lượng ko lớn, ban đầu nó nằm trong 1 file có rất nhiều Sheet mà chỉ có sheet này chị chậm thôi ạ, em đã copy Sheet này ra 1 file riêng.
Em cũng đã dọn Objects rồi và đều báo rằng "no Objects found".
Ai xử lý giúp em với ạ, chứ em thao tác mà nó chậm như rùa thế này em phát điên mất thôi.!
Em cũng đã dọn Objects rồi và đều báo rằng "no Objects found".
Ai xử lý giúp em với ạ, chứ em thao tác mà nó chậm như rùa thế này em phát điên mất thôi.!
dhn46
Hướng tới tương lai
- Tham gia
- 1/3/11
- Bài viết
- 3,251
- Được thích
- 3,870
Bạn xem lại Condition Format. bị trùng lặp điều kiện quá nhiều và bạn chọn toàn bộ cột D, E gây chậmMọi người giúp em file này với ạ, dung lượng ko lớn, ban đầu nó nằm trong 1 file có rất nhiều Sheet mà chỉ có sheet này chị chậm thôi ạ, em đã copy Sheet này ra 1 file riêng.
Em cũng đã dọn Objects rồi và đều báo rằng "no Objects found".
Ai xử lý giúp em với ạ, chứ em thao tác mà nó chậm như rùa thế này em phát điên mất thôi.!
Để thử nghiệm bạn có thể xóa toàn bộ CF đi xem tốc độ bảng tính và chỉnh sửa cho phù hợp.
Lê Duy Thương
Cạo lấy gì gội (Dịch quá không gội được)
- Tham gia
- 14/10/09
- Bài viết
- 3,113
- Được thích
- 4,852
bạn thử mở file xem như thế nào. còn vì sao chạy chậm thì so sánh file cũ và mới xem khác chỗ nào nhéMọi người giúp em file này với ạ, dung lượng ko lớn, ban đầu nó nằm trong 1 file có rất nhiều Sheet mà chỉ có sheet này chị chậm thôi ạ, em đã copy Sheet này ra 1 file riêng.
Em cũng đã dọn Objects rồi và đều báo rằng "no Objects found".
Ai xử lý giúp em với ạ, chứ em thao tác mà nó chậm như rùa thế này em phát điên mất thôi.!
Cảm ơn anh đã trả lời ạ, công nhận là bỏ Condition Format thì chạy nhanh hơn hẳn, nhưng mà dữ liệu này của em Condition Format rất quan trọng. Hix!
bạn thử mở file xem như thế nào. còn vì sao chạy chậm thì so sánh file cũ và mới xem khác chỗ nào nhé
Em tải xg nhưng mở File nó cứ bị lỗi anh ạ, em "Yes" thì nó mở đc nhưng mất hết định dạng ban đầu và những dữ liệu em hide cũng bị mất luôn ạ!
dhn46
Hướng tới tương lai
- Tham gia
- 1/3/11
- Bài viết
- 3,251
- Được thích
- 3,870
Bạn chú ý bài #67
Trong đó tôi có chỉ rõ cũng là CF nhưng chậm do cái gì. Bạn đọc kỹ và xử lý.
CF không phải cứ thích là đặt với điều kiện vô tội vạ, trùng lặp, nhiều hàng cột.
Nó sẽ gây nặng bảng tính và chậm ngoài dự kiến.
- Tham gia
- 13/6/06
- Bài viết
- 7,216
- Được thích
- 24,736
Hôm nay xử lý file "nặng khủng khiếp"
Sau khi dùng mọi cách thức tiêu diệt, nó còn hơn 200kb. Tuy nhiên vẫn rất ỳ ạch (vẫn bệnh tật rồi
), em dùng chức năng Go to Special ---> Objects nhưng gần như treo máy (2 lần đều như vậy) 
Cuối cùng đành giở võ, tiêu diệt toàn bộ Object bằng Code, đợi 1 tý là ngon nghẻ ngay. Cuộn lên xuống vù vù. Không nghĩ có mấy chục kB Object mà nó gây khó chịu thế
Lần chỉnh sửa cuối:
nguyen hong nhung
Thành viên mới
- Tham gia
- 12/7/11
- Bài viết
- 2
- Được thích
- 0
Các bạn giúp mình file này với các sheet khác thì vãn bình thường nhưng copy / paste hay làm gì ở sheet " công thực tế " thì nó chạy rất chậm. Mình đã thử cách đóng các objects nhưng đều báo "no objects found" . Giúp mình với, cám ơn các bạn nhiều !
dhn46
Hướng tới tương lai
- Tham gia
- 1/3/11
- Bài viết
- 3,251
- Được thích
- 3,870
Nguyên nhân do sheet Tổng Hợp của bạn khi sử dụng công thức bạn sử dụng nguyên cả 1 cột tham chiếu $A:$A, $B:$B... dẫn tới chậm
=> Khắc phục: Bạn hãy giớ hạn 1 vùng tìm kiếm thôi: $A$1:$A$5000.... bạn sẽ thấy tác dụng ngay.
nguyen hong nhung
Thành viên mới
- Tham gia
- 12/7/11
- Bài viết
- 2
- Được thích
- 0
Cám ơn bạn nhiều nha!
Cho em hỏi em có 1 file excel bị chậm kinh khủng . Em làm gì cũng ko dc (file này do chị của em làm kế toán gửi qua cho em làm phụ ). Mà em gửi kèm file lên đây ko được (file em hơn 7M ) . Anh chị có mail ko em mail qua rồi xem giúp em ah !
Rất mong nhận được sự giúp đỡ . Em thành thật cảm ơn ah !
Rất mong nhận được sự giúp đỡ . Em thành thật cảm ơn ah !
Lê Duy Thương
Cạo lấy gì gội (Dịch quá không gội được)
- Tham gia
- 14/10/09
- Bài viết
- 3,113
- Được thích
- 4,852
Up lên google drive,one drive, hay mediafire và share dduong link để các thành viên download
huunghiatd2
Thành viên mới
- Tham gia
- 21/6/16
- Bài viết
- 1
- Được thích
- 0
Nhờ các bác kiểm tra file này giúp e với ạ. Có 1.8M thôi mà chậm quá.
Link đây ạ:
http://www.mediafire.com/download/3d4innut88zivfa/Tong+hop+bang+thong+so+QLKT+(19-6).xlsx
Link đây ạ:
http://www.mediafire.com/download/3d4innut88zivfa/Tong+hop+bang+thong+so+QLKT+(19-6).xlsx
Tôi có file này không hiểu sao giờ bị chậm kinh khủng tôi không thể sử dụng được sheet CTDT, tôi đã xử lý objects, chuyển sang định dạng .xlsb cho dung lượng nhẹ, và một số cách nữa trên mạng hướng dẫn nhưng không tiến triển gì. Mong anh em trong diễn đàn hỗ trợ
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,972
- Được thích
- 9,883
- Nghề nghiệp
- Công chức
Bạn định dạng tá lã, âm binh nên xử lý hơi mệt.
nguyendinh2019
Thành viên mới
- Tham gia
- 26/2/19
- Bài viết
- 7
- Được thích
- 0
cứu e với. e kg xóa dc
Bài đã được tự động gộp:
dán cái đoạn này vào đâu vậy a? chỉ cụ thể từng bước để dán vào dùm e với
nguyendinh2019
Thành viên mới
- Tham gia
- 26/2/19
- Bài viết
- 7
- Được thích
- 0
dán cái đoạn này vào đâu vậy a? chỉ cụ thể từng bước để dán vào dùm e với
Nhờ a kiểm tra file này giúp e nó có Objects không a? Nó đơ hoài em không làm việc được luôn. Bị trắng hết màn hình
File đính kèm
- Tham gia
- 4/11/07
- Bài viết
- 14,717
- Được thích
- 37,418
- Donate (Momo)
- Giới tính
- Nam
- Nghề nghiệp
- Consultant
Sheet KH DUC TUAN 4-02-2019 có 1.600 object
Nhấn Alter F11, bên trái chọn workbook đang mở và sheet cần xóa, dán vào bên phải và nhấn F5:
TB: Bạn xem thêm bài #30: https://www.giaiphapexcel.com/diendan/threads/excel-chạy-rất-chậm.8471/post-300335
Lần chỉnh sửa cuối:
- Tham gia
- 2/8/10
- Bài viết
- 5,225
- Được thích
- 9,026
- Giới tính
- Nam
Không chẩn bệnh qua hình ảnh được đâu bạn.
Mình đã chạy file code như trên này để loại bỏ Object nhưng nhiều quá không chạy nổi bạn à!
PHP:Copy.
Sub del2()
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
For i = ActiveSheet.Shapes.Count to 1 step -1
ActiveSheet.Shapes(i).Delete
Next
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
End Sub
PHP:Copy.
Sub del3()
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
For Each Shp in ActiveSheet.Shapes
Shp.Delete
Next
MsgBox "Còn " & ActiveSheet.Shapes.Count & " ku"
End Sub
Câu lệnh MsgBox là thông báo số object còn lại trước và sau khi chạy code.
Mình đã làm theo hướng dẫn này
- Tham gia
- 2/8/10
- Bài viết
- 5,225
- Được thích
- 9,026
- Giới tính
- Nam
Hơn 170k objects mà bạn không khai báo tường minh cho biến Shp và không tắt cập nhật màn hình là đã làm chậm tốc độ xử lý của code.
Thử làm thủ công trước xem: Ctrl+G (hoặc F5) > Go to Special > Objects > OK > phím Delete.
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,972
- Được thích
- 9,883
- Nghề nghiệp
- Công chức
Góp ý cho bạn:
1/ Bạn có bao giờ đưa con đi bác bác sỹ khám bệnh mà chỉ nói là nó bị nóng, sốt chưa?
2/ Để khám thì bác sỹ phải thực hiện một loạt các thao tác: Đo thân nhiệt, khám vòm họng, khám răng, xem chân tay, thân thể xem có chỗ nào trầy xước, chỗ nào có mẫn đỏ, chỗ nào có ung nhọt, nêu không tìm ra được gì thì bác sỹ hỏi tiếp cách đây vài hôm nó có bị té hay không?
3/ Như vậy để biết chắc đứa nhỏ bị cái gì thì bác sỹ phải xem xét tất cả mọi mặt rồi mới phán.
4/ Trường hợp của bạn đưa cái hình lên chẳng nói được điều gì. Trong File có hơn 170 ngàn Objects thì tôi xử lý cách khác chứ không dùng code để xóa nó vì phải chờ quá lâu.
Bài đã được tự động gộp:
Hơn 170 ngàn Objects nếu máy yếu làm kiểu đó nó treo máy luôn em ơi.
Nếu sử dụng code chắc phải mất 15 phút. Nếu có File thì anh giải quyết bằng cách khác mà không xóa các Objects.
Lần chỉnh sửa cuối:
Cảm ơn bạn đã góp ý rất nhiều! Mình đúng là có thiếu sót nhiều thật!
Bạn nói:
(Hơn 170 ngàn Objects nếu máy yếu làm kiểu đó nó treo máy luôn em ơi.
Nếu sử dụng code chắc phải mất 15 phút. Nếu có File thì anh giải quyết bằng cách khác mà không xóa các Objects.)
Có cách xử lý khác? hi vọng bạn giúp đỡ chỉ mình với!
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,972
- Được thích
- 9,883
- Nghề nghiệp
- Công chức
Thì nén File đó và gửi lên, nếu gửi lên không được thì đưa lên một trang chia sẽ rồi gán Link vào diễn đàn.
Thông thường để xử lý File nặng người ta phải kiểm tra gần 10 thứ có liên quan rồi mới quyết định đến vấn đề xử lý từ cái nhỏ nhặt nhất, cuối cùng mới xử lý cái vụ Objects (cái lớn nhất), xử lý File nặng (dung lượng lớn) giống như trường hợp ta bứng một cái cây, trước tiên phải dọn dẹp xung quanh gốc, leo lên cây tỉa cành, nhánh, đào bới xung quanh gốc, chặt rễ bao quanh, tìm rễ cọc (rễ trụ) chặt đứt nó khâu cuối cùng dùng cần cẩu câu lên xe..
Bạn à! do thông tin file của mình cần rất quan trọng và cần bảo mật của công ty nên không thể up lên mạng được! Bạn có cách nào xử lý giúp mình xóa object hiệu quả không thì giúp mình với! file bên mình chủ yếu là dạng Text nên mọi người gửi file về toàn copy paste nên mới gây ra lỗi này thôi, nên mình xác định chỉ có lỗi OBJECT này là chủ yếu! Mong bạn thật sự giúp mình nhé! mình cảm ơn rất nhiều
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,972
- Được thích
- 9,883
- Nghề nghiệp
- Công chức
Vậy thì xóa (Delete) hết dữ liệu chỉ chừa cái tiêu đề rồi tải lên, người ta chỉ giúp bắt bệnh chứ đâu cần dữ liệu.
đậy bạn nhé! mình xóa hết trong rồi... có gì nhờ bạn nhé!
Tiện thể nhờ bạn chỉ mình khắc phục chi tiết cái nhé!
be_09
Biên Hòa, Đồng Nai
- Tham gia
- 9/4/11
- Bài viết
- 9,972
- Được thích
- 9,883
- Nghề nghiệp
- Công chức
Nhận xét về File này:
1/ Trong File nó hiểu sử dụng hết 16384 và đến 13505 dòng.
2/ Bạn không nên tô viềng cả cột từ A: AL (38 cột).
3/ Bạn không nên tô màu cả dòng.
4/ Trong File có 172.621 Objects.
Bây giờ tôi bận rồi để tối tôi rảnh thì mới chỉ cách xử lý.
Lần chỉnh sửa cuối:
Mong bạn giải quyết được và mong hồi âm sớm! Cảm ơn bạn rất nhiều
taotronics2020
Thành viên mới
- Tham gia
- 5/6/20
- Bài viết
- 1
- Được thích
- 0
- Giới tính
- Nam
File excel bị chậm do nhiều nguyên nhân lắm.
Cách xử lý về phía file excel thì bạn lên google gõ từ khóa " khắc phục excel chạy chậm " rồi chọn 1 trong 3 kết quả đầu, làm theo hướng dẫn là được
Xử lý về phía máy tính : Bạn xem lại xem máy tính mình có làm sao không rồi tính tiếp ^^
Cách xử lý về phía file excel thì bạn lên google gõ từ khóa " khắc phục excel chạy chậm " rồi chọn 1 trong 3 kết quả đầu, làm theo hướng dẫn là được
Xử lý về phía máy tính : Bạn xem lại xem máy tính mình có làm sao không rồi tính tiếp ^^
