-
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 !