• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Tô màu cho dòng double click trong subform

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Forms
  • [Hỏi] Tô màu cho dòng double click trong subform
• Tô màu cho dòng double click trong subform

• RE: Tô màu cho dòng double click trong subform

  AnNguyen > 22-07-20, 05:04 PM

  (22-07-20, 02:53 PM)tranthanhan1962 Đã viết: Vấn đề không nằm ở nguồn dữ liệu mà nằm ở form. Vì không có dữ liệu nên khó giải thích cho bạn. Đầu tiên bạn tạo thêm 1 field trên table để xác định dữ liệu được chọn., tạm gọi tên là Chon, giả sử table của bạn có tên là ABC.
  Tạo code để xác đinh dong chọn. Tren một textbox bất kỳ tạo code sau đây (luôn DblClick vào field này để xử lý code chọ dòng chọn).
  Private Sub Form_Current()
      DoCmd.RunSQL "UPDATE ABC SET ABC.[Chon] = ' ';"
      Chon.Value = "X"
  End Sub
  
  https://imgur.com/SpmaDO5

  Cháu cảm ơn chú,
  Nhưng cháu đổ thẳng nó vào như hình ảnh nên không có cái bảng nào để update đâu ạ.
  Tại do cháu thiết kế database ở SQL nên hơi khó đưa cả file accdbe ạ
  
  

• RE: Tô màu cho dòng double click trong subform

  tranthanhan1962 > 22-07-20, 08:02 PM

  Đâu cần phải là table. Nguồn query cũng được mà. Miễn sao xử lý được Chon = cái gì đó khác không chọn.  Hì hì! động nảo lên 1 tí! Đôi khi đánh lừa cả access, cái này đơn giản mà

• RE: Tô màu cho dòng double click trong subform

  AnNguyen > 22-07-20, 08:12 PM

  (22-07-20, 08:02 PM)tranthanhan1962 Đã viết: Đâu cần phải là table. Nguồn query cũng được mà. Miễn sao xử lý được Chon = cái gì đó khác không chọn.  Hì hì! động nảo lên 1 tí! Đôi khi đánh lừa cả access, cái này đơn giản mà

  Vâng cháu cảm ơn ạ. 
  Chắc chỉ có cách này thôi ạ.
  Update xong load lại xong lại xong tô màu ạ. Không biết có gây loạn mắt không ạ vì cứ liên tục nhiều dòng ạ 😃

• RE: Tô màu cho dòng double click trong subform

  ledangvan > 22-07-20, 08:31 PM

  Thực ra là chẳng có gì to tát cả, dữ liệu của bạn ở đâu cũng được nhưng nó đã load lên Form rồi thì là dữ liệu hiện tại. Cái kỹ thuật mà tôi làm là thêm vào dữ liệu một trường có tên là Chọn. Khi nháy đúp vào dòng thì gán giá trị của trường Chọn là -1 (Bình thường thì nó là 0) . Bạn chú ý ở trong Form có đặt một Textbox (Dùng để hiện màu xanh) , khi trường Chọn là -1 thì cho hiện Textbox màu, nếu nó là 0 thì ẩn nó đi.

• RE: Tô màu cho dòng double click trong subform

  AnNguyen > 23-07-20, 09:28 AM

  (22-07-20, 08:31 PM)ledangvan Đã viết: Thực ra là chẳng có gì to tát cả, dữ liệu của bạn ở đâu cũng được nhưng nó đã load lên Form rồi thì là dữ liệu hiện tại. Cái kỹ thuật mà tôi làm là thêm vào dữ liệu một trường có tên là Chọn. Khi nháy đúp vào dòng thì gán giá trị của trường Chọn là -1 (Bình thường thì nó là 0) . Bạn chú ý ở trong Form có đặt một Textbox (Dùng để hiện màu xanh) , khi trường Chọn là -1 thì cho hiện Textbox màu, nếu nó là 0 thì ẩn nó đi.

  
  Nhưng nếu làm vậy thì khi em chọn thì cả tất cả dòng đều nhảy theo như thế rồi ạ. Nó bị áp dụng theo hết cho các dòng khác ạ.
  

• RE: Tô màu cho dòng double click trong subform

  tranthanhan1962 > 23-07-20, 10:20 AM

  Đoạn code:
  Private Sub Form_Current()
      DoCmd.RunSQL "UPDATE ABC SET ABC.[Chon] = ' ';"
      Chon.Value = "X"
  End Sub
  
  1/Bạn có thể thay thế ABC bằng query lấy từ SQL. Miễn nó là Record Source của form.
  2/Đoạn code nó 2 phần:
    -DoCmd.RunSQL "UPDATE ABC SET ABC.[Chon] = ' ';" => Bỏ chọn tất cả các dòng trả về Conditional Formatting mặc định cho tất cả các dòng (không tô màu)
    -Chon.Value = "X" => Set giá trị field Chon = "X" cho dòng hiện hành (Khi dó dòng hiện hành thỏa đủ diều kiện cho format màu nền thành màu vàng). Ý nghĩa của Conditional Formatting là điều kiện dể format cho form.

• RE: Tô màu cho dòng double click trong subform

  ongke0711 > 23-07-20, 10:14 PM

  (23-07-20, 09:28 AM)AnNguyen Đã viết: Nhưng nếu làm vậy thì khi em chọn thì cả tất cả dòng đều nhảy theo như thế rồi ạ. Nó bị áp dụng theo hết cho các dòng khác ạ.
  

  
  Em dùng cách Conditional Formating mà anh tranthanhan1962 đã hướng dẫn nhưng thay đổi chút xíu, không cần thêm field [chon].
  Dùng CondF với điều kiện: Forms!MainForm!txtMaDoChoi = [MaDoChoi]
  Lúc trước anh có hỏi em có field nào phân biệt dòng này với dòng khác không là đề dùng cho cách này.
  - Forms!MainForm!txtMaDoChoi: là textbox có Source là Field Khoá chính trên Main form
  - [maDoChoi]: là Field khoá chính ở Subform.

• RE: Tô màu cho dòng double click trong subform

  ongke0711 > 24-07-20, 01:37 AM

  -----------------------------------------------------------------------------------------------
  Highlight Record với Conditional Formatting
  -----------------------------------------------------------------------------------------------
  
  Tôi làm demo vụ tô màu dòng (highlight record) trong Form dạng Datasheet (hoặc Continuous form cũng được) khi được Click hoặc Double click vô nó.
  Mượn dữ liệu của anh ledangvan làm file mẫu.
  Tôi làm demo 2 file: 1 file dạng Bound Form bình thường (đơn giản nhất) và 1 file dùng ADO Recordset cho Form (như trường hợp dùng CSDL từ SQL server).
  
  Việc tạo hiệu ứng tô màu record chỉ cần 2 thao tác xử lý:
  - Thiết lập trong Conditonal Formating
  - Thêm dòng code vào sự kiện (Click hoặc Double click) của Textbox đã thiết lập CondFormat: Me.Recalc
  
  
  
  
  
  Link demo đơn giản: https://drive.google.com/file/d/15kXG3xH...sp=sharing
  Link demo: https://drive.google.com/file/d/1IDsbC0c...sp=sharing
  
  
  ------------------------------------------------------------------------------------------------------
  
  Dưới đây là một demo khác dùng tô màu dòng khi click vào nó nhưng không dùng Conditonal Formating. Cách này chỉ dùng được cho Continuous Form thôi nhé các bạn. 
  Cách này dùng một textbox với font chữ Windings để làm màu nền tô màu cho dòng được chọn.
  Textbox này (txtBG) có Control Source: =IIf([SoCT]=[txtCurrentRecord],"gggggggggggggggggggg",Null)
  
  * Các bạn chú ý cách trong demo của anh ledangvan và anh tranthanhan1962 có dùng thêm checkbox [chọn] là để highlight nhiều dòng cùng lúc miễn là có checkbox = True.
  
  Còn các cách tôi demo ở đây là chỉ highlight 1 dòng khi click vào thôi nhé. Tuy nhu cầu mà sử dụng.
  Các cách đều có một thủ thuật chung là làm sao phải có một cột dữ liệu lưu thông tin không trùng để phân biệt dòng này với dòng khác mỗi khi click chọn dòng: checkbox, cột  khoá [SoCT] v.v.. 
  
  Link demo không dùng Conditional Formating: https://drive.google.com/file/d/1nXxWZne...sp=sharing

• RE: Tô màu cho dòng double click trong subform

  AnNguyen > 24-07-20, 09:47 AM

  (24-07-20, 01:37 AM)ongke0711 Đã viết: -----------------------------------------------------------------------------------------------
  Highlight Record với Conditional Formatting
  -----------------------------------------------------------------------------------------------
  
  Tôi làm demo vụ tô màu dòng (highlight record) trong Form dạng Datasheet (hoặc Continuous form cũng được) khi được Click hoặc Double click vô nó.
  Mượn dữ liệu của anh ledangvan làm file mẫu nhé.
  
  
  
  
  
  
  Link demo: https://drive.google.com/file/d/1NhPbJ8U...sp=sharing

  Em cảm ơn anh, đúng là như vậy rồi ạ.
  Nhưng em vào xem code thấy cũng khá là dài để ra được như vậy ạ?
  EM làm tắt đoạn 
  

  Mã:

  [Forms]![f_SuDungTaiSan]![txtMaTaiSan]=[maTaiSan]

  thì nó cứ phải refresh lại mới ra màu,
  Anh có thể giải thích qua giúp em trong dữ liệu của anh làm được không ạ?
  Em cảm ơn ạ.

• RE: Tô màu cho dòng double click trong subform

  ongke0711 > 24-07-20, 10:06 AM

  Vụ này chỉ cần 2 tác vụ xử lý thôi chứ có gì mà dài, các code khác là chỉ để thao tác dữ liệu thôi.
  - thiết lập trong conditional Format.
  - chạy me.Recalc khi doible click thôi
• Bài trước Bài tiếp