Insert dong protected (5 người xem)

  • Thread starter Thread starter bbc
  • Ngày gửi Ngày gửi
Liên hệ QC

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

bbc

Thành viên hoạt động
Tham gia
13/1/07
Bài viết
112
Được thích
23
Dear anh chị,

Em muốn insert thêm 5 dòng dưới dòng 16.
Đồng thời copy công thức của dòng 16 vào 5 dòng mới.
Cột D-E-F là protected.

Anh chị giúp em nhé

Em cảm ơn
 

File đính kèm

Dear anh chị,

Em muốn insert thêm 5 dòng dưới dòng 16.
Đồng thời copy công thức của dòng 16 vào 5 dòng mới.
Cột D-E-F là protected.

Anh chị giúp em nhé

Em cảm ơn
Bạn khóa bảng tính lại rồi thì sao gán công thức vào được? Gán công thức ở 5 dòng mới thuộc cột nào?
 
  • Thích
Reactions: bbc
Bạn khóa bảng tính lại rồi thì sao gán công thức vào được? Gán công thức ở 5 dòng mới thuộc cột nào?

Đó vấn đề của mình là các cột bị protect rồi, nhưng vẫn insert 5 dòng từ cột B-M.

Vì nếu ko protect thì các user lỡ tay xóa công thức ở cột D-E-F.

Thanks bạn
 
Đó vấn đề của mình là các cột bị protect rồi, nhưng vẫn insert 5 dòng từ cột B-M.

Vì nếu ko protect thì các user lỡ tay xóa công thức ở cột D-E-F.

Thanks bạn
Khi protect sheet nó vẫn cho insert row, vấn đề ở đây là copy công thức xuống. Như vậy người insert phải gõ nguyên công thức xuống thui.
 
Đó vấn đề của mình là các cột bị protect rồi, nhưng vẫn insert 5 dòng từ cột B-M.

Vì nếu ko protect thì các user lỡ tay xóa công thức ở cột D-E-F.

Thanks bạn
Khi protect sheet nó vẫn cho insert row, vấn đề ở đây là copy công thức xuống. Như vậy người insert phải gõ nguyên công thức xuống thui.
 
Đó vấn đề của mình là các cột bị protect rồi, nhưng vẫn insert 5 dòng từ cột B-M.

Vì nếu ko protect thì các user lỡ tay xóa công thức ở cột D-E-F.

Thanks bạn
Cái chỗ màu đỏ cho dù không protect thì cũng chịu, không làm nổi.

Bạn khóa bảng tính lại rồi thì giờ làm gì với nó?
 
Hi cả nhà,

Em thấy chạy Macro được nhưng Protect ko có password (người dùng ko lỡ tay xóa công thức được)

Sub Macro2()

ActiveSheet.Unprotect
Rows("16:16").Select
Range("D16").Activate
Selection.Copy
Rows("16:22").Select
Selection.Insert Shift:=xlDown
Range("D16").Activate
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
, AllowFormattingRows:=True, AllowInsertingRows:=True
End Sub


Cho em hỏi, em muốn khi chạy macro sẽ có 1 bảng hiện lên hỏi muốn insert bao nhiêu dòng , thì làm thế nào ạ

Em cảm ơn
 
Lần chỉnh sửa cuối:
Hi cả nhà,

Em thấy chạy Macro được nhưng Protect ko có password (người dùng ko lỡ tay xóa công thức được)

Cho em hỏi, em muốn khi chạy macro sẽ có 1 bảng hiện lên hỏi muốn insert bao nhiêu dòng , thì làm thế nào ạ

Em cảm ơn
Bạn xem thử File. (Code chạy hơi chậm)
 

File đính kèm

Bạn xem thử File. (Code chạy hơi chậm)

Hay quá ! Thanks bác nhiều ạ !

Cho em hỏi chút trong code của bác có Workbook - Open; General - Declarations; General- Chendong

Là mình dùng cả 3 đoạn đó hay chỉ dùng 1 General - Chendong thôi ạ.

Bác có thể cho em biết Workbook- Open và General- Declarations có ý nghĩa gì ko ạ

Cảm ơn bác nhiều !
 
Ý là bạn hỏi trong Module và trong ThisWorkbook có phải vậy không
 
  • Thích
Reactions: bbc
Web KT

Bài viết mới nhất

Back
Top Bottom