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

Thủ Thuật Access

• Trang chủ

  • Thủ Thuật Access
  • Trang chủ
•   Đặt Report Footer luôn nằm ở cuối của trang cuối cùng
  

  Viết bởi: Noname 25-08-10, 08:18 PM Chuyên mục: Report - Không có hồi đáp

• Giả sử bạn muốn đặt Textbox Txt01 luôn nằm ở cuối của trang cuối cùng. Đừng đặt nó ở Report Footer mà đặt ở Page Footer và thêm đoạn code sau :
  
  Mã:

  Private Sub PageFooter_Format(Cancel As Integer, FormatCount As Integer)
if Me.Page = Me.Pages then
Me.Txt01.Visible = True
else
Me.Txt01.Visible = False
End Sub
  
  


•   Xử lý hiện thông báo khi không nhập dữ liệu vào texbox
  

  Viết bởi: Noname 25-08-10, 08:10 PM Chuyên mục: Forms - Bài trả lời (2)

• Bạn sử dụng event on Lost Focus của textbox muốn ktra. Khi thoát khỏi thì check có IsNull hay kô? nếu IsNull là true thì quay lại ô đó textbox.SetFocus
  
  
  Vd: bạn có textbox Date
  
  
  Mã:

  Private Sub txtDate_LostFocus()
    If IsNull(txtDate) Then
    MsgBox "Ban phai nhap ngay vao o nay", vbCritical, "Thong bao"
    txtDate.SetFocus
    Cancel = True
    End Sub
  
  


•   Chọn mẫu tin từ list box sang text box
  

  Viết bởi: Noname 25-08-10, 12:31 PM Chuyên mục: Forms - Bài trả lời (1)

• Hỏi:Giúp em phần từ (Item) listbox sang textbox
  Đáp:
  
  Có lẽ bạn không cần viết một dòng lệnh nào. Wizard của Access đã giúp bạn làm chuyện này. Cách làm như sau:
  Bạn vẽ một list box lên form (sử dụng Wizard). Access cho phép bạn lựa chọn 1 trong 3 tùy chọn. Bạn chọn mục 3 (tìm kiếm mẩu tin dựa vào giá trị được chọn trong list box). Xong, nhắp Next.
  Trong màn hình tiếp theo, bạn có thể chọn các trường IDBao, TenBao,...
  Màn hình tiếp theo, bạn có thể chọn mục Hide Key Column để ẩn trường IDBao đi. Xong, nhắp Next...
  Như vậy, khi bạn chọn một giá trị trong list box, Access sẽ nhảy tới mẩu tin chứa giá trị IDBao mà bạn chọn, tức nó sẽ hiển thị các thông tin của các trường khác.
  Bạn lưu ý: Sau khi thiết kế xong list box, bạn không nên đổi tên (name) của nó, vì Access đã phát sinh một đoạn mã trong sự kiện After Update của list box này.
  Không biết như vầy có đúng ý bạn không?
  
  


•   Làm thế nào để View report ở chế độ cố định
  

  Viết bởi: Noname 25-08-10, 12:27 PM Chuyên mục: Report - Bài trả lời (5)

• Hỏi: Làm thế nào để View report ở chế độ cố định
  Trả lời :
  
  
  Mã:

  Dim stDocName As String
    stDocName = "R01_Du An Moi"
    DoCmd.OpenReport stDocName, acPreview
    DoCmd.Maximize
    DoCmd.RunCommand acCmdZoom75
  
  ' Các chế độ zoom khác :
  
  Mã:

  ' DoCmd.RunCommand acCmdFitToWindow
' DoCmd.RunCommand acCmdZoom10
' DoCmd.RunCommand acCmdZoom25
' DoCmd.RunCommand acCmdZoom50
' DoCmd.RunCommand acCmdZoom75
' DoCmd.RunCommand acCmdZoom100
' DoCmd.RunCommand acCmdZoom150
' DoCmd.RunCommand acCmdZoom200
  
  Nguồn: http://my.opera.com/bvlbp/blog/thu-thuat-acc
  
  


•   Import Dữ Liệu Từ Excel Vào Access
  

  Viết bởi: Noname 25-08-10, 09:55 AM Chuyên mục: Tương tác Chương trình ngoài - Bài trả lời (34)

• Để nhập mới nội dung một table (trong Access) từ một tập tin Excel, ta có thể dùng một trong những cách sau đây:
  
  
  1. Chọn File \ Get External Data \ Import từ trình đơn Access. Trên hộp thoại Import, chọn mục Microsoft Excel từ danh sách Files of type, rồi chọn tập tin Excel muốn đưa dữ liệu vào Access và bấm OK. Sau đó, theo từng bước hướng dẫn của Access. Tuy nhiên, dữ liệu luôn luôn được đưa vào một table mới, chứ không đưa vào table có sẵn cấu trúc được.
  2. Tạo một macro, rồi trên form vẽ một nút lệnh để chạy macro này. Tuy nhiên, các thông số như TableName, FileName cần phải được gõ sẵn, hoặc phải bổ sung thêm một số “kỹ xảo” nữa rất mất công.
  3. Cách khác hay hơn: dùng đối tượng DoCmd, một hình thức sử dụng macro của Access trong VBA. Ví dụ: Tạo form như hình 1, gồm có một textbox (đặt tên txtTapTinExcel), một nút lệnh (có dấu 3 chấm, đặt tên cmdTimTapTin), một nút lệnh (để đọc dữ liệu từ tập tin Excel có tên chứa trong ô txtTapTinExcel, đặt tên cmdDocDuLieuTuExcel) và một ActiveX Control có tên dlgTimTapTin. ActiveX Control này được tạo bằng cách bấm nút More Controls (nút cuối cùng) trên ToolBox, rồi chọn mục Microsoft Common Dialog Control. Lần lượt gõ vào các thủ tục xử lý tình huống OnClick của các nút lệnh cmdDocDuLieuTuExcel và cmdTimTapTin (đoạn mã 1). Bạn lưu ý, thứ tự và tên các cột trong tập tin Excel phải giống như cấu trúc table đã khai báo trong Access.
  
  Đoạn mã 1
  
  
  
  Mã:

  Private Sub cmdTimTapTin_Click()
    With dlgTimTapTin
    .ShowOpen
    txtTapTinExcel = .FileName
    End With
    End Sub
  
  
  Mã:

  Private Sub cmdDocDuLieuTuExcel_Click()
    Dim sTenTable As String
    sTenTable = "tbNhanVien" ‘ Vñ duå
    DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel8, _
    sTenTable, txtTapTinExcel, True
    End Sub
  
  
  
  



Chủ đề Mới nhất

NHỜ NÂNG CẤP CODE TÌM DỮ ... -Chuyên mục: Thành viên giúp nhau-Đăng bởi lần cuối: ongke0711-2 Giờ trước- » Bài trả lời: 12- » Lượt xem: 442

Dòng Video Youtube Ngâm N... -Chuyên mục: Góc Thơ -Đăng bởi lần cuối: Nguyễn Thành Sáng-Hôm qua, 05:55 PM- » Bài trả lời: 45- » Lượt xem: 389

Trang thủ thuật Access ít... -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: huyhoang22-25-12-24, 08:41 AM- » Bài trả lời: 11- » Lượt xem: 271

Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: huyhoang22-25-12-24, 08:36 AM- » Bài trả lời: 57- » Lượt xem: 3,126

So Sánh Nước Hoa Chanel C... -Chuyên mục: Chuyện bốn phương-Đăng bởi lần cuối: EliHayes-22-12-24, 12:24 PM- » Bài trả lời: 0- » Lượt xem: 7

Tạo query tổng hợp dữ liệ... -Chuyên mục: Query-Đăng bởi lần cuối: ongke0711-19-12-24, 07:58 PM- » Bài trả lời: 1- » Lượt xem: 115

Test phần mềm QUẢN LÝ TÀI... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: AnNguyen-19-12-24, 05:33 PM- » Bài trả lời: 44- » Lượt xem: 5,200

A Bold Move to Expand the... -Chuyên mục: Query-Đăng bởi lần cuối: nigelbdhmp-19-12-24, 04:55 PM- » Bài trả lời: 0- » Lượt xem: 16

[Demo p2] Tìm kiếm và tô ... -Chuyên mục: Thủ thuật VBA-Đăng bởi lần cuối: ledangvan-06-12-24, 02:53 PM- » Bài trả lời: 17- » Lượt xem: 1,968

File Sổ Quỹ Tiền Mặt cho ... -Chuyên mục: Thư Viện Ứng Dụng-Đăng bởi lần cuối: giauvnd-05-12-24, 04:35 PM- » Bài trả lời: 30- » Lượt xem: 3,684




Diễn đàn Thống kê

» Thành viên: 5,093 » Thành viên mới nhất: Tinhocvanphong » Các chủ đề diễn đàn: 9,879 » Các bài viết diễn: 48,664 Thống kê đầy đủ