Không chèn dòng, chèn cột vào vùng dữ liệu

[Cát Lượng]

Các anh/chị cho em hỏi :
Em muốn vùng dữ liệu từ A1: M7 (bôi vàng) không thể chèn thêm dòng, thêm cột thì có những cách nào ạ!
Em xin cám ơn!

 

[tam888]

Tìm hiểu chức năng Protect worksheet

 

[Cát Lượng]

Tìm hiểu chức năng Protect worksheet

Vâng em cám ơn

 

[leonguyenz]

Nếu bảng tính sử dụng VBA, đặt thêm 2 dòng Unprotec và Protect trong code.
Ngoài ra còn 1 cách là thêm 1 ký tự nào đó ở dòng/cột cuối cùng, Excel không cho chèn dòng/cột quá số dòng/cột có sẵn, ví dụ Excel 2003 thì ô cuối cùng là IV65536, Excel 2007 trở đi là ô XFD1048576. Cách này làm cho vui thôi.

 

[huuthang_bd]

Hoặc dùng công thức mảng.

 

[Cát Lượng]

Tìm hiểu chức năng Protect worksheet

Anh ơi, em sử dụng chức năng Protect worksheet thì không sửa được dữ liệu trong vùng đó nhưng vẫn chèn dòng và cột được trong vùng đó ạ!
Có cách nào để không cho chèn dòng và cột trong vùng đó không ạ!

Bài đã được tự động gộp: 24/4/19

Hoặc dùng công thức mảng.

Em tải file lên em nhờ anh giúp em ạ!

 

[tam888]

Anh ơi, em sử dụng chức năng Protect worksheet thì không sửa được dữ liệu trong vùng đó nhưng vẫn chèn dòng và cột được trong vùng đó ạ!
Có cách nào để không cho chèn dòng và cột trong vùng đó không ạ!

Bài đã được tự động gộp: 24/4/19

Em tải file lên em nhờ anh giúp em ạ!

xem hình này

 

[Cát Lượng]

xem hình này

Có tác dụng được trong 1 vùng chọn không anh? e làm thì thấy tác dụng đối với cả sheet

 

[Cát Lượng]

Nếu bảng tính sử dụng VBA, đặt thêm 2 dòng Unprotec và Protect trong code.
Ngoài ra còn 1 cách là thêm 1 ký tự nào đó ở dòng/cột cuối cùng, Excel không cho chèn dòng/cột quá số dòng/cột có sẵn, ví dụ Excel 2003 thì ô cuối cùng là IV65536, Excel 2007 trở đi là ô XFD1048576. Cách này làm cho vui thôi.

Em có đoạn code nhưng là để ngăn chặn chèn, xóa dòng,cột trên cả sheet, còn trong một vùng dữ liệu chọn thì không biết thế nào, anh sửa giúp em đoạn code để nó có tác dụng không cho chèn, xóa dòng và cột trong mộ vùng dữ liệu được chọn ạ!

Sub StopDeleteRowCols()
'Updateby20140708
Dim xBarControl As CommandBarControl
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
    xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
    xBarControl.Enabled = False
Next
End Sub

 

[leonguyenz]

Bạn dùng cách theo bài #5 nhé.
Dùng tới VBA protect sheet khi bảng đó chỉ đổ ra báo cáo bằng VBA thôi.

 

[Cát Lượng]

Bạn dùng cách theo bài #5 nhé.
Dùng tới VBA protect sheet khi bảng đó chỉ đổ ra báo cáo bằng VBA thôi.

Dạ vâng, em cám ơn anh
Công thức mảng đó, anh đặt ở ô nào vậy ạ? em muốn hiện lên để xem nhưng không thấy.

 

[leonguyenz]

Dạ vâng, em cám ơn anh
Công thức mảng đó, anh đặt ở ô nào vậy ạ? em muốn hiện lên để xem nhưng không thấy.

Công thức ở P1, = 1 ô nào đó rồi kéo xuống P7, Ctrl+Shift+Enter.

 

[Cát Lượng]

Công thức ở P1, = 1 ô nào đó rồi kéo xuống P7, Ctrl+Shift+Enter.

Vâng, Ctrl+Shift+Enter là để chạy công thức mảng à anh?
Em điền "=1" vào ô P1 và kéo xuống ô P7 và nhấn Ctrl+Shift+Enter thì không thấy tác động gì vậy anh?

 

[leonguyenz]

Vâng, Ctrl+Shift+Enter là để chạy công thức mảng à anh?
Em điền "=1" vào ô P1 và kéo xuống ô P7 và nhấn Ctrl+Shift+Enter thì không thấy tác động gì vậy anh?

Chọn cả vùng P17, đưa con trỏ vào thanh chèn công thức ở phía trên, nhấn tổ hợp phím Ctrl+Shift+Enter.

 

[Cát Lượng]

Bạn dùng cách theo bài #5 nhé.
Dùng tới VBA protect sheet khi bảng đó chỉ đổ ra báo cáo bằng VBA thôi.

Chọn cả vùng P17, đưa con trỏ vào thanh chèn công thức ở phía trên, nhấn tổ hợp phím Ctrl+Shift+Enter.

anh ơi, khi làm như anh ở trên thì đã không cho chèn dòng vào vùng lựa chọn
Nhưng chèn cột thì vẫn được ạ!

 

[leonguyenz]

anh ơi, khi làm như anh ở trên thì đã không cho chèn dòng vào vùng lựa chọn
Nhưng chèn cột thì vẫn được ạ!

Thì bạn dùng 1 công thức mảng cho các cột không được chèn. Ví dụ ở dòng 31 không dùng tới, ô A31 gõ =1, kéo hết M31, đưa con trỏ vào thanh chèn công thức, Ctrl+Shift+Enter.

 

[Cát Lượng]

Thì bạn dùng 1 công thức mảng cho các cột không được chèn. Ví dụ ở dòng 31 không dùng tới, ô A31 gõ =1, kéo hết M31, đưa con trỏ vào thanh chèn công thức, Ctrl+Shift+Enter.

Dạ vâng, em cám ơn anh rất nhiều!

 

[huuthang_bd]

Dạ vâng, em cám ơn anh rất nhiều!

Thế hóa ra bài #5 bạn cảm ơn nhưng không hiểu tôi nói gì à .

 

[Cát Lượng]

Thế hóa ra bài #5 bạn cảm ơn nhưng không hiểu tôi nói gì à .

Sau đó em có vào xem nhưng chưa hiểu, giờ em đã hiểu.