• Kẻ khung cell Excel với Access khai báo muộn
  • Kẻ khung cell Excel với Access khai báo muộn

    Minh Tiên > 02-04-18, 06:37 PM

    Nhờ A/C/E Pro giúp.

    Trong Access để mở file Excel, format Borders cho bên trái của cell khai báo:
         Range("A1:A5").Select
         Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous
    thì:
    1. Mở thư viện Excel (Khai báo sớm) thì format OK.
    2. Khai báo muộn (Không mở thư viện) thì không format được. Lỗi không hiểu Borders(xlEdgeLeft)
     
    Ở khai báo muộn, nếu khai báo:
    Selection.Borders.LineStyle= xlContinuous thì format OK nhưng format xung quanh cell luôn.

    Nhờ A/C/E Pro chỉ giáo cách khai báo để Format bên trái, bên phải, trên, dưới cell trong trường hợp kết nối muộn.

    Thanks !
  • RE: Kẻ khung cell Excel với Access khai báo muộn

    ongke0711 > 02-04-18, 07:56 PM

    Theo tôi biết Late binding nó không tự động hiểu các hằng số nên bạn phải khai báo nó.
    Const xlContinuous =1
    Const xlEdgeLeft=7
  • RE: Kẻ khung cell Excel với Access khai báo muộn

    Minh Tiên > 02-04-18, 08:09 PM

    Mình chuyển khai báo:

    Selection.Borders(xlEdgeLeft).LineStyle = xlContinuous

    Thành: Selection.Borders(7).LineStyle = 1

    Thì OK !

    Thanks bạn !