Lỗi xuất hiện những Shapes nhỏ trong file .

[mahppy248]

Những file Excel của mình xuất hiện những Shapes nhỏ này làm nặng file , không thể nào copy dán dử liệu được. Lúc đầu nó chỉ xuất hiện ở 1 số file excel giờ lan ra rất nhiều file khác. Có cách nào khắc phục không giúp mình với .

 

[befaint]

(1) Hệ quả của việc ctrl+C và ctrl+V
=> Không nên (và tốt nhất là không bao giờ) được thao tác nhấn ctrl+V sau khi copy, mà người ta dùng chức năng paste special.
(2) Để xóa các shapes đã có trong file thì chép đoạn sau vào một module rồi Run:

Sub DeleteShape()
Application.ScreenUpdating = False
Dim ws As Worksheet, sp As Shape
For Each ws In ThisWorkbook.Worksheets
    For Each sp In ws.Shapes
        sp.Delete
    Next sp
Next ws
Application.ScreenUpdating = True
End Sub

 

[be_09]

Những file Excel của mình xuất hiện những Shapes nhỏ này làm nặng file , không thể nào copy dán dử liệu được. Lúc đầu nó chỉ xuất hiện ở 1 số file excel giờ lan ra rất nhiều file khác. Có cách nào khắc phục không giúp mình với .

Đơn giản nhất là làm như thế này:

Cái Shapes nào cần để lại thì Copy sang sheet khác.

Xong nhấn nút Ctrl+G, cửa sổ Go To xuất hiện > nhấn nút Special...cửa sổ Go To Special hiện ra, đánh dấu vào mục Objects và nhấn OK, cuối cùng nhấn nút Delete.

Cắt cái Shapes cần và Paste trở về vị trí cũ.

 

[be_09]

Góp ý thêm cho bạn.

Không ai theo dõi như bạn cả (cứ mỗi cái phiếu xuất, nhập kho lại Copy sang sheet theo dõi từng tháng), thứ nhất tốn nhiều sheet, thứ hai cứ mỗi lần in phiếu lại Copy sang sheet tháng, thứ ba việc tổng hợp số phiếu và loại hàng hóa rất khó khăn, nó vừa tốn công tốn sức vừa chứa dữ liệu ở nhiều sheet lâu ngày sẽ làm tăng dung lượng File (đến 1 ngày nào đó mở File xong phải đi uống Coffee khi trở lại thì nó mới hiện ra).

Theo tôi thì phiếu xuất và phiếu nhập kho chỉ cần làm 1 sheet với 2 cái nút xuất kho và nhập kho, khi nhấn nút nào thì nó sẽ lưu dữ liệu vào sheet theo dõi tương ứng.

Muốn tổng hợp chỉ việc dùng PivotTable là xong, công việc đơn giản, nhẹ nhàng, dung lượng File tăng không đáng kể.

Muốn hỏi về vấn đề này thì đăng bài vào Box, Lập trình với Excel.