Giúp e xử lý : khi khóa ô trong bảng tính thì sự kiện kiện trong Combo box báo lỗi! (2 người xem)

[ftthua2003]

Sau khi học khóa Database của GPE tổ chức. E có mày mò tự làm form nhập xuất kho.
Nhưng e có 2 vấn đề với Combobox mà không biết xử lý như thế nào. Hai vấn đề e ghi trong file đính kèm. Mong các anh chị GPE nhiệt tình giúp đỡ. E xin cảm ơn!

 

[ftthua2003]

Sau khi học khóa Database của GPE tổ chức. E có mày mò tự làm form nhập xuất kho.
Nhưng e có 2 vấn đề với Combobox mà không biết xử lý như thế nào. Hai vấn đề e ghi trong file đính kèm. Mong các anh chị GPE nhiệt tình giúp đỡ. E xin cảm ơn!

Có anh chị nào giúp em với!

 

[ndu96081631]

Sau khi học khóa Database của GPE tổ chức. E có mày mò tự làm form nhập xuất kho.
Nhưng e có 2 vấn đề với Combobox mà không biết xử lý như thế nào. Hai vấn đề e ghi trong file đính kèm. Mong các anh chị GPE nhiệt tình giúp đỡ. E xin cảm ơn!

Code ComboBox của bạn là:

Private Sub CB2_Change()
  If CB2.Value <> "" Then
    Range(CB2.LinkedCell).Offset(0, 1) = CB2.Column(1)
    Range(CB2.LinkedCell).Offset(0, 4) = CB2.Column(2)
  End If
End Sub

Hãy sửa thành:

Private Sub CB2_Change()
 [COLOR=#ff0000] ActiveSheet.Unprotect "password của bạn"[/COLOR]
  If CB2.Value <> "" Then
    Range(CB2.LinkedCell).Offset(0, 1) = CB2.Column(1)
    Range(CB2.LinkedCell).Offset(0, 4) = CB2.Column(2)
  End If
 [COLOR=#ff0000] ActiveSheet.Protect "password của bạn"[/COLOR]
End Sub

Có nghĩa là phải Unprotect sheet rồi mới chạy code, chạy xong lại Protect

 

[ftthua2003]

Em cam ơn anh NDu.
Còn vấn đề thứ 2 a giúp e với. E ghi rõ trong file đính kèm anh ah.
Đó là: với vật tư chưa xác định e để mã VTL- vật tư lẻ nhưng khi chọn trong combobox ra e sửa tên và đơn vị tính trực tiếp không đuợc. A giup e với nhe!