Làm Sao để Xoá được Các Object ẩn | Giải Pháp Excel
Có thể bạn quan tâm
- Trang chủ Có gì mới Hoạt động gần nhất Tác giả
- Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
- Video
Video về Excel Video về tin học khác Tin tức về tin học chung - Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
- Tài nguyên Đánh giá mới nhất Tìm tài nguyên
- Đóng góp
Tìm kiếm
Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Tìm kiếm Tìm nâng cao…- Tìm bài viết mới
- Tìm theo chuyên mục
Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
- Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc
- Trang chủ
- Diễn đàn
- Những vấn đề chung
- Thread starter Thread starter cazonda
- Ngày gửi Ngày gửi 11/1/12
Người dùng đang xem chủ đề này
Đang trực tuyến: 2 (Thành viên: 0, Khách: 2)cazonda
Thành viên mới 
Tham gia 19/4/10 Bài viết 36 Được thích 15 Các anh chị chỉ giúp em làm sao để xoá được các object ẩn, trong 1 file mà em nhận được có rất nhiều object dẫn đến việc file chạy rất chậm. Nếu dùng go to/specia/objects thì file bị đơ luôn mà tìm từng object ẩn mà xoá thì lâu quá Cảm ơn anh chị nghiaphuc
Thành viên gạo cội



Thành viên danh dự Tham gia 25/9/09 Bài viết 5,729 Được thích 8,859 Giới tính Nam Nghề nghiệp Giáo viên cazonda đã viết: Các anh chị chỉ giúp em làm sao để xoá được các object ẩn, trong 1 file mà em nhận được có rất nhiều object dẫn đến việc file chạy rất chậm. Nếu dùng go to/specia/objects thì file bị đơ luôn mà tìm từng object ẩn mà xoá thì lâu quá Cảm ơn anh chị Nhấp chuột vào đây để mở rộng...Bạn chọn sheet cần xóa Object ẩn, nhấn Alt+F11, tiếp tục nhấn Ctrl+G để hiện cửa số Immediate, sau đó dán vào đó câu lệnh sau và Enter xem: PHP: Sao chép. Activesheet.Drawingobjects.Delete Lưu ý là câu lệnh trên sẽ xóa tất cả các đối tượng vẽ trên Activesheet đấy nhé. P/S: Thử cái này an toàn hơn nè: Chỉ những Object ẩn thì mới xóa, những cái nhìn thấy thì không xóa: PHP: Sao chép. Sub Test() Dim Sh As Shape For Each Sh In Activesheet.Shapes If Sh.Visible = msoFalse Then Sh.Delete Next End Sub Lần chỉnh sửa cuối: 11/1/12
cazonda
Thành viên mới 
Tham gia 19/4/10 Bài viết 36 Được thích 15 Vậy để hiển thị các object này lên thì có cách nào không ah? Em nghĩ các object này do cái gì đó tạo ra chứ không phải do người dùng vẽ nên Hoàng Trọng Nghĩa
Chuyên gia GPE 
Thành viên BQT Moderator Tham gia 17/8/08 Bài viết 8,662 Được thích 16,725 Giới tính Nam cazonda đã viết: Vậy để hiển thị các object này lên thì có cách nào không ah? Em nghĩ các object này do cái gì đó tạo ra chứ không phải do người dùng vẽ nên Nhấp chuột vào đây để mở rộng...Để hiển thị toàn bộ objects, bạn chỉ cần bấm Alt+F11 để mở VBA, bấm Ctrl+G để mở Immediate, chép đoạn code này: ActiveSheet.DrawingObjects.Visible = True vào trong Immediate rồi đặt con trỏ lên dòng đó bấm Enter.
nguyenthanhtung6335
Thành viên mới 
Tham gia 24/6/23 Bài viết 2 Được thích 0 nghiaphuc đã viết: Bạn chọn sheet cần xóa Object ẩn, nhấn Alt+F11, tiếp tục nhấn Ctrl+G để hiện cửa số Immediate, sau đó dán vào đó câu lệnh sau và Enter xem: PHP: Sao chép. Activesheet.Drawingobjects.Delete Lưu ý là câu lệnh trên sẽ xóa tất cả các đối tượng vẽ trên Activesheet đấy nhé. P/S: Thử cái này an toàn hơn nè: Chỉ những Object ẩn thì mới xóa, những cái nhìn thấy thì không xóa: PHP: Sao chép. Sub Test() Dim Sh As Shape For Each Sh In Activesheet.Shapes If Sh.Visible = msoFalse Then Sh.Delete Next End Sub Nhấp chuột vào đây để mở rộng...mình làm theo cách bạn chỉ là bị đơ file lun có cách nào ko vậy ? mình làm theo nhiều cách xóa là bị đơ file
befaint
|||||||||||||
Tham gia 6/1/11 Bài viết 14,600 Được thích 19,840 7z, can thiệp trực tiếp vào cấu trúc tập tin.
HeSanbi
Nam Nhân✨Hiếu Lễ Nghĩa Trí Tín✨
Tham gia 24/2/13 Bài viết 2,829 Được thích 4,612 Giới tính Namnguyenthanhtung6335 đã viết: mình làm theo cách bạn chỉ là bị đơ file lun có cách nào ko vậy ? mình làm theo nhiều cách xóa là bị đơ file Nhấp chuột vào đây để mở rộng...Bạn thử sử dụng mã dưới đây: JavaScript: Sao chép. Sub DeleteShape() Dim Sh, k& On Error Resume Next Application.ScreenUpdating = False For Each Sh In Activesheet.Shapes If Sh.Visible = msoFalse Then DoEvents: Sh.Delete: k = k + 1 Next MsgBox "Hoan thanh " & k End Sub C
cantl
!!! Giải thoát !!!
Thành viên bị đình chỉ hoạt động Tham gia 6/8/08 Bài viết 1,815 Được thích 1,163 Giới tính Namnguyenthanhtung6335 đã viết: mình làm theo cách bạn chỉ là bị đơ file lun có cách nào ko vậy ? mình làm theo nhiều cách xóa là bị đơ file Nhấp chuột vào đây để mở rộng...Có file mẫu gửi lên để test không bạn?
PHONGGANHHAO
Thành viên thường trực



Tham gia 21/12/07 Bài viết 251 Được thích 41
EM CHẠY XONG NÓ HIỆN NÀY LÀ SAO Ạ ? Bài đã được tự động gộp: 5/7/24 HeSanbi đã viết: Bạn thử sử dụng mã dưới đây: JavaScript: Sao chép. Sub DeleteShape() Dim Sh, k& On Error Resume Next Application.ScreenUpdating = False For Each Sh In Activesheet.Shapes If Sh.Visible = msoFalse Then DoEvents: Sh.Delete: k = k + 1 Next MsgBox "Hoan thanh " & k End Sub Nhấp chuột vào đây để mở rộng...--------EM CHẠY XONG NÓ HIỆN NÀY Ạ
HeSanbi
Nam Nhân✨Hiếu Lễ Nghĩa Trí Tín✨
Tham gia 24/2/13 Bài viết 2,829 Được thích 4,612 Giới tính Nam @PHONGGANHHAO bạn cần cho phép chạy Macro VBA trước khi sử dụng mã. Chép lại mã sau. Mã: Sao chép. Sub DeleteShape() Dim Sh, k& On Error Resume Next Application.ScreenUpdating = False For Each Sh In Activesheet.Shapes If Sh.Visible = 0 Then DoEvents: Sh.Delete: k = k + 1 Next MsgBox "Hoan thanh " & k End SubPHONGGANHHAO
Thành viên thường trực



Tham gia 21/12/07 Bài viết 251 Được thích 41 HeSanbi đã viết: @PHONGGANHHAO bạn cần cho phép chạy Macro VBA trước khi sử dụng mã. Chép lại mã sau. Mã: Sao chép. Sub DeleteShape() Dim Sh, k& On Error Resume Next Application.ScreenUpdating = False For Each Sh In Activesheet.Shapes If Sh.Visible = 0 Then DoEvents: Sh.Delete: k = k + 1 Next MsgBox "Hoan thanh " & k End Sub Nhấp chuột vào đây để mở rộng...Em mở trong này đúng không ạ? mở rồi mà nó cũng vậy. Còn trên thanh nằm ngang thì không thấy hiện thông báo ..
File đính kèm
-
1720170627964.png 26.1 KB · Đọc: 11
HeSanbi
Nam Nhân✨Hiếu Lễ Nghĩa Trí Tín✨
Tham gia 24/2/13 Bài viết 2,829 Được thích 4,612 Giới tính Nam @PHONGGANHHAO Tích chọn cái thứ 2, nếu bạn cảm thấy các tệp excel không an toàn, tích chọn thứ tư nếu các tệp bạn sử dụng bảo đảm an toàn. Khi mở ứng dụng, bạn nhấn Enabled Macro. UUltraExcel
Thành viên chính thức 

Tham gia 12/9/22 Bài viết 98 Được thích 44 PHONGGANHHAO đã viết: View attachment 302192 EM CHẠY XONG NÓ HIỆN NÀY LÀ SAO Ạ ? Bài đã được tự động gộp: 5/7/24 --------EM CHẠY XONG NÓ HIỆN NÀY Ạ View attachment 302193 Nhấp chuột vào đây để mở rộng...Chỉ cần đóng hết excel rồi mở file có macro khi màn hình hiển thị ra và có nút “enable contents” thì bấm vào là chạy được các macro trong file này nhé. Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Bài viết mới nhất
Q Nhờ các anh chị giúp cho công thức đếm số khách hàng theo File đính kèm- QUANSUNG
- Hôm qua, lúc 10:15
- Hướng dẫn sử dụng các hàm trong Excel
- SA_DQ
- 3/11/25
- Chia sẻ
- thanhkybk
- Hôm qua, lúc 17:53
- Hàm và công thức Excel
- Dinh Hong Nhung
- Hôm qua, lúc 10:04
- Hàm và công thức Excel
- Dinh Hong Nhung
- 11/12/25
- Hàm và công thức Excel
- hanhlx88
- Hôm qua, lúc 13:02
- Giải thích, gỡ rối, xử lý lỗi công thức
- Lá chanh
- Thứ sáu lúc 00:53
- Hàm và công thức Excel
- Bobby52
- Thứ bảy lúc 16:18
- Hàm và công thức Excel
- Question Question
- duongnhuxuyen
- 12/12/25
- Lập Trình với Excel
- PhanTuHuong
- 10/12/25
- Câu lạc bộ hoạt động xã hội
- AnhThu-1976
- Thứ tư lúc 16:37
- Những vấn đề chung
- TatLap
- Thứ năm lúc 09:39
- Lọc và sắp xếp dữ liệu
- kenshithanh
- 1/4/15
- Chơi Game với Excel
- PhanTuHuong
- 14/12/25
- Thư giãn
- PhanTuHuong
- 5/10/20
- Thư giãn
- tiny1010
- 16/3/10
- Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu
- Question Question
- ongke0711
- 6/10/24
- Lập Trình với Excel
- phamdinh.huy.aladin@gmail
- 15/12/25
- Hàm và công thức Excel
- huevantran
- 22/12/25
- Giải thích, gỡ rối, xử lý lỗi công thức
- kaoehtkid
- 15/12/25
- Những vấn đề chung
Thành viên có số lượng bài viết cao nhất tháng
- Maika8008 48
- dungpham01 26
- thanthanhan 24
- ongke0711 23
- ptm0412 19
- Phan Thế Hiệp 18
- eagle12 16
- nguyenanhtruong2409 16
- HUONGHCKT 12
- pycckuu410 12
- vic_it 11
- Gà Con yêu VBA 11
- nhhnam 10
- dieppk.nb92 10
- Vũ Hải Sơn 9
- HeSanbi 9
- le_vis 8
- duongnhuxuyen 8
- SA_DQ 8
- bsbnhh 7
Thành viên có điểm tương tác cao nhất tháng
- Phan Thế Hiệp 96
- Maika8008 41
- ptm0412 25
- thanthanhan 20
- ongke0711 20
- HeSanbi 17
- dungpham01 15
- Cúc Hr 11
- HUONGHCKT 9
- eagle12 9
- SA_DQ 9
- Phuocam 6
- pycckuu410 6
- dieppk.nb92 6
- Gà Con yêu VBA 6
- Mr.hieudoanxd 5
- befaint 5
- Hoàng Tuấn 868 4
- nguyenanhtruong2409 4
- HieuCD 3
Thời gian đếm ngược.
000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025- Trang chủ
- Diễn đàn
- Những vấn đề chung
- Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…
Từ khóa » Xóa Object Trong Excel Bằng Vba
-
Xóa Các Object Trong Excel / TOP #10 Xem Nhiều Nhất & Mới Nhất ...
-
Xóa Object Trong Excel
-
Hướng Dẫn Xóa Dữ Liệu Excel Trong Bảng Danh Sách Bằng Lệnh VBA
-
Delete File Excel Trong VBA - VietTuts
-
Hướng Dẫn Cách Xóa Nội Dung Bất Kỳ Trong Bảng Danh Sách Trong ...
-
Top #10 Xóa Object Trong Excel Xem Nhiều Nhất, Mới Nhất 7/2022 ...
-
Làm Sao để Xoá được Các Object ẩn - Forums
-
Xóa Shape Trên Excel_VBA To Delete All Shapes On A Spreadsheet
-
Cách Xóa Object Trong Excel 2010
-
2 Cách Xoá Hình ảnh Hàng Loạt Trên File Excel (cực Nhanh)
-
Làm Cách Nào để Xóa Tất Cả ảnh Hoặc Các đối Tượng Khác Trong ...
-
File Excel Dung Lượng Lớn Bất Thường