Làm Sao để Xoá được Các Object ẩn | Giải Pháp Excel

Giải Pháp Excel
  • 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 New 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
  • Facebook
  • Đóng góp
Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

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 Bởi: Tìm kiếm Tìm nâng cao…
  • Tìm bài viết mới
  • Tìm theo chuyên mục
Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

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
You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Làm sao để xoá được các Object ẩn (1 người xem)
  • Thread starter Thread starter cazonda
  • Ngày gửi Ngày gửi 11/1/12
Liên hệ QC

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

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) cazonda

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

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

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

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

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

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. 1701312092297.png HeSanbi

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
nguyenthanhtung6335 đã 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 Nam
nguyenthanhtung6335 đã 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

PHONGGANHHAO

Thành viên thường trực
Tham gia 21/12/07 Bài viết 251 Được thích 41 1720165390765.png 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 Ạ 1720165463975.png HeSanbi

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 Sub PHONGGANHHAO

PHONGGANHHAO

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 .. 1720170699658.png

File đính kèm

  • 1720170627964.png 1720170627964.png 26.1 KB · Đọc: 11
Lần chỉnh sửa cuối: 5/7/24 HeSanbi

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. U

UltraExcel

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
Trả lời 6 Đọc 113 Hôm qua, lúc 23:02 Cúc Hr C SA_DQ Copilot bình luận các ván cờ vua từng ngày.
    • Thích
  • SA_DQ
  • 3/11/25
  • Chia sẻ
Trả lời 17 Đọc 774 Hôm qua, lúc 20:38 SA_DQ SA_DQ T Nhờ các Pro giúp thiết lập bảng excel (1 người xem)
  • thanhkybk
  • Hôm qua, lúc 17:53
  • Hàm và công thức Excel
Trả lời 0 Đọc 37 Hôm qua, lúc 17:53 thanhkybk T D Công thức tính thuế TNCN cho người lao động nước ngoài (1 người xem)
  • Dinh Hong Nhung
  • Hôm qua, lúc 10:04
  • Hàm và công thức Excel
Trả lời 1 Đọc 89 Hôm qua, lúc 15:05 Phan Thế Hiệp Phan Thế Hiệp D Công thức tính thuế thu nhập cá nhân mới nhất theo mức 5 bậc
  • Dinh Hong Nhung
  • 11/12/25
  • Hàm và công thức Excel
Trả lời 16 Đọc 1K Hôm qua, lúc 13:55 dungpham01 D hanhlx88 Nhờ các cao nhân chỉ giúp file excel quá nặng. không không biết nguyên nhân (1 người xem)
  • hanhlx88
  • Hôm qua, lúc 13:02
  • Giải thích, gỡ rối, xử lý lỗi công thức
Trả lời 0 Đọc 46 Hôm qua, lúc 13:02 hanhlx88 hanhlx88 L [Nhờ giúp đỡ] Tìm khoảng thời gian bị gối, hoặc trùng nhau
  • Lá chanh
  • Thứ sáu lúc 00:53
  • Hàm và công thức Excel
Trả lời 8 Đọc 183 Hôm qua, lúc 05:36 lamvankhoat1 L B Tính 1 đồng Doanh thu thuần mang về thì còn lại được bao nhiêu đồng EBITDA
  • Bobby52
  • Thứ bảy lúc 16:18
  • Hàm và công thức Excel
Trả lời 0 Đọc 74 Thứ bảy lúc 16:18 Bobby52 B D
  • Question Question
Tách dòng tự động theo điều kiện bằng VBA (1 người xem)
    • Cười
  • duongnhuxuyen
  • 12/12/25
  • Lập Trình với Excel
Trả lời 18 Đọc 633 Thứ sáu lúc 14:23 duongnhuxuyen D PhanTuHuong Bán sách Excel nâng cao để ủng hộ đồng bào bão lũ năm 2025! (1 người xem)
    • Yêu thích
  • PhanTuHuong
  • 10/12/25
  • Câu lạc bộ hoạt động xã hội
Trả lời 6 Đọc 498 Thứ năm lúc 23:12 PhanTuHuong PhanTuHuong A Có cách nào điều chỉnh cho tên Sheet lớn ra (2 người xem)
    • Cười
  • AnhThu-1976
  • Thứ tư lúc 16:37
  • Những vấn đề chung
Trả lời 8 Đọc 264 Thứ năm lúc 17:22 SA_DQ SA_DQ T Xin hỏi cách để lọc dữ liệu ngày tháng của nhiều sheet (1 người xem)
  • TatLap
  • Thứ năm lúc 09:39
  • Lọc và sắp xếp dữ liệu
Trả lời 6 Đọc 162 Thứ năm lúc 13:35 TatLap T K xin file excel bảng đấu bóng đá
    • Yêu thích
  • kenshithanh
  • 1/4/15
  • Chơi Game với Excel
Trả lời 48 Đọc 30K Thứ tư lúc 18:18 SA_DQ SA_DQ PhanTuHuong Nếu diễn đàn GPE đóng cửa?
    • Thích
    • Yêu thích
  • PhanTuHuong
  • 14/12/25
  • Thư giãn
Trả lời 26 Đọc 1K Thứ tư lúc 17:29 TH280861 T PhanTuHuong Miền Tây mùa nước nổi
    • Thích
    • Ngạc nhiên
  • PhanTuHuong
  • 5/10/20
  • Thư giãn
Trả lời 31 Đọc 3K Thứ tư lúc 14:45 SA_DQ SA_DQ T Lọc dự liệu với hai điều kiện (1 người xem)
  • tiny1010
  • 16/3/10
  • Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu
Trả lời 20 Đọc 7K Thứ tư lúc 13:23 dungpham01 D ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba
    • Thích
    • Yêu thích
    • Cảm ơn
  • ongke0711
  • 6/10/24
  • Lập Trình với Excel
4 5 6 Trả lời 584 Đọc 84K Thứ tư lúc 09:39 tuanktt3 T P Lỗi hàm VBA phải add-in sau mỗi lần mở file
  • phamdinh.huy.aladin@gmail
  • 15/12/25
  • Hàm và công thức Excel
Trả lời 8 Đọc 380 Thứ tư lúc 08:07 phamdinh.huy.aladin@gmail P huevantran Xin chỉ giúp sự khác nhau giữa giá trị trong ô A3 và A4 là gì
  • huevantran
  • 22/12/25
  • Giải thích, gỡ rối, xử lý lỗi công thức
Trả lời 7 Đọc 207 23/12/25 dungpham01 D K Các nút Buttom, Combobox, Textbox bị thay đổi kích thước ... (1 người xem)
  • kaoehtkid
  • 15/12/25
  • Những vấn đề chung
Trả lời 15 Đọc 472 23/12/25 ongke0711 ongke0711 Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

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.…
Back Top Bottom

Từ khóa » Xóa Object Trong Excel Bằng Vba