Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Lỗi] Report width....
#1
Tình hình là report của em nó báo lỗi "Report width is greater than page width", mong mọi người fix dùm em, em thank happy
Chữ ký của papito Xin chào, mình là papito, Tham gia http://thuthuataccess.com/forum từ ngày 07-04 -14.
Reply
Những người đã cảm ơn
#2
Bạn chỉnh sửa lại khổ giấy là OK. (trong Page setup)
Chữ ký của anhemnhangu Xin chào, mình là anhemnhangu, Tham gia http://thuthuataccess.com/forum từ ngày 08-08 -13.
Reply
Những người đã cảm ơn
#3
vẫn không được bạn ơi, khi mình click Thực Hiện thì report nó chỉ hiện thu nhỏ, không mở dc report, bạn có thể check dùm mình được không vậy happy
http://www.mediafire.com/download/860dvx...LHS1-a.rar
Chữ ký của papito Xin chào, mình là papito, Tham gia http://thuthuataccess.com/forum từ ngày 07-04 -14.
Reply
Những người đã cảm ơn
#4
Lỗi này do quá trình bạn thiết kế có kích thước lớn hơn khổ giấy in, ngoài việc điều chỉnh lề giấy in trong page setup bạn còn phải điều chỉnh thước kế lại cho phù hợp, nếu không bị dư ra ngoài trang giấy thì sẽ không bị thông báo này nữa đâu.
Chữ ký của trunghieu <<---Trên bước đường thành công, không có dấu chân của kẻ lười biếng --->>
ღღღღღTài sản của trunghieu (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#5
mình chỉnh lại kích thước trong form design nhưng vẫn vậy, bạn có thể chỉ mình cách chỉnh mấy thông số lại để cho hết bị lỗi ko ?
p/s: khi mình tạo report wizard mới thì nó đã hiện lỗi đó lên rồi
Chữ ký của papito Xin chào, mình là papito, Tham gia http://thuthuataccess.com/forum từ ngày 07-04 -14.
Reply
Những người đã cảm ơn
#6
ai giúp fix lỗi này dùm mình với
Chữ ký của papito Xin chào, mình là papito, Tham gia http://thuthuataccess.com/forum từ ngày 07-04 -14.
Reply
Những người đã cảm ơn
#7
(04-05-14, 10:23 PM)papito Đã viết: ai giúp fix lỗi này dùm mình với

1/Chỉnh lại chiều rộng Report
2/Chọn Auto resize: No
3/Nên thay các Macro mở Report bằng câu lệnh sau:
Mã:
DoCmd.OpenReport "Tên report", acViewPreview, , , acDialog

Bạn xem hình:
[Hình: 3006247019_737082415_574_574.jpg]
Chữ ký của MatTroiNguQuen Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn papito
#8
bạn cho mình hỏi cái này luôn nhá :
Trong form thêm, khi mình bỏ qua Họ Tên hoặc Địa Chỉ thì vẫn lưu được, dù trong table (required = yes) 2 cột Họ Tên và Địa Chỉ,
link: http://www.mediafire.com/download/860dvx...LHS1-a.rar

ai có thể giúp mình cái này được không vậy ?
Chữ ký của papito Xin chào, mình là papito, Tham gia http://thuthuataccess.com/forum từ ngày 07-04 -14.
Reply
Những người đã cảm ơn
#9
Theo mình thì bạn nên bắt lỗi trên form, việc dùng Macro có nhiều hạn chế, bạn cố gắng làm quen với VBA

Để bắt lỗi bỏ trống dữ liệu bắt buộc phải nhập (Hoten, Diachi) bạn code cho nút thêm như sau:

Mã:
Private Sub cmdThem_Click()
On Error GoTo Err_cmdThem_Click
    If Nz(Me!HOTEN, "") = "" Then
        MsgBox "Ho Ten: Khong duoc bo trong "
        Me!HOTEN.SetFocus
        Exit Sub
    End If
    If Nz(Me!DIACHI, "") = "" Then
        MsgBox "Dia Chi: Khong duoc bo trong "
        Me!DIACHI.SetFocus
        Exit Sub
    End If
    
    If Me.Dirty Then DoCmd.RunCommand acCmdSaveRecord
    DoCmd.GoToRecord , "", acNewRec
    Me!HOTEN.SetFocus
    
Exit_cmdThem_Click:
    Exit Sub

Err_cmdThem_Click:
    MsgBox Err.Description
    Resume Exit_cmdThem_Click
End Sub

Nếu vững về VBA một chút và trên form có nhiều điều khiển không cho phép bỏ trống bạn có thể tham khảo cách sau:

Mã:
Private Sub cmdThem_Click()
On Error GoTo Err_cmdThem_Click

    Dim strCtrlNames  As String, Ctrl As Control, Arr As Variant
    strCtrlNames = "HOTEN,DIACHI"  'Tên các điều khiển không được bỏ trống cách nhau bằng dấu phẩy
    Arr = Split(strCtrlNames, ",")
    
    For i = LBound(Arr) To UBound(Arr)
        Set Ctrl = Controls(Arr(i))
        If Nz(Ctrl, "") = "" Then
            MsgBox Ctrl.ValidationText, , "Luu Y!"  'Nhập câu cần thông báo vào thuộc tính ValidationText của điều khiển
            Ctrl.SetFocus
            Exit Sub
        End If
    Next
    If Me.Dirty Then DoCmd.RunCommand acCmdSaveRecord
    
    DoCmd.GoToRecord , "", acNewRec
    Me!HOTEN.SetFocus

Exit_cmdThem_Click:
    Exit Sub

Err_cmdThem_Click:
    MsgBox Err.Description
    Resume Exit_cmdThem_Click
End Sub
Chữ ký của MatTroiNguQuen Thời gian nước chảy... da mòn
Ngủ quên một chốc thấy còn bộ xương!
Reply
Những người đã cảm ơn papito , Minh Tiên


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Help] Cho mình hỏi cách tạo report động theo ngày BayVeo 1 65 Hôm qua, 09:09 PM
Bài mới nhất: maidinhdan
  Hướng Dẫn Cách sắp xếp report? tieuho828 0 28 03-12-16, 09:05 PM
Bài mới nhất: tieuho828
  [Help] Xin Giúp đỡ Dàn Report theo hàng ngang toi511 2 140 03-11-16, 01:10 PM
Bài mới nhất: toi511
  Hướng Dẫn Cú pháp mở Report có nhiều điều kiện GaDauBac 7 259 22-10-16, 01:08 AM
Bài mới nhất: maidinhdan
  Hướng Dẫn Tạo Report theo Combobox trong Form thangbomdethuong2000 7 287 20-10-16, 08:41 PM
Bài mới nhất: thangbomdethuong2000

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ