สมัครสมาชิก
 

สร้างบิลที่มีรายการสินค้ามาก จึงพิมพ์บิลใบที่1 2 3...



0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

09 ก.ย. 62 , 15:13:57
ตอบกลับ #16

สันติสุข

ลบส่วนที่ผมตีกรอบเอาไว้
ช่วยพกถุงผ้า หรือถุงพลาสติกที่สะอาดและผ่านการใช้มาแล้ว ไปซื้อของเพื่อลดการใช้พลาสติก ลดขยะ รักษาสิ่งแวดล้อม และไม่ให้ภาวะโลกร้อนวิกฤติเร็วขึ้นกว่านี้
ช่วยคลิกโฆษณาข้างล่างนี้ เพื่อเป็นการสนับสนุนเวปบอร์ดให้สามารถอยู่บ
 

09 ก.ย. 62 , 20:28:46
ตอบกลับ #17

kunlek

ได้แล้วครับ อจ. รายการที่อยู่ section pagefooter หายหมด  จะไปโชว์เฉพาะหน้าสุดท้าย  อจ.ครับ ....ถ้าจะให้หน้าแรก ที่ footer หายหมด ให้แสดงลายมือชื่อผู้ขาย  ผู้จัดการ เหมือนหน้าสุดท้าย เราจะเอาไปไว้ใน section ไหนของ page ครับ

 

09 ก.ย. 62 , 23:26:00
ตอบกลับ #18

สันติสุข

Access มี Page Footer section ให้แค่อันเดียว  ไม่มี Page Footer ซ้อนกันหลายๆอัน  ถ้าจะให้แสดงเฉพาะบางส่วนในทุกๆหน้า แทนที่จะซ่อน Page Footer ทั้ง section  ก็ต้องซ่อนเฉพาะบางส่วนใน section แทน คือ กำหนด .Visible ให้เท็กซ์บ็อกซ์, ลาเบล ฯลฯ ให้เป็น = True หรือ False ไปทีละตัว

แต่กรณีมีหลายๆเท็กซ์บ็อกซ์, ลาเบล ที่จะต้องซ่อน เหมือนอย่างกรณีนี้ เราอาจใช้การสร้างกล่องสี่เหลี่ยมสีขาวทึบ และจัดให้มันอยู่ชั้นบนสุด โดยทับส่วนข้อความที่จะซ่อนเอาไว้ เช่นตัวอย่างในรูป เราสร้าง Box1 และ Box2 (ของจริงต้องสีขาวทึบ ไม่ใช่สีเหลืองโปร่งแสง)  เมื่อต้องการซ่อนข้อความต่างๆ เราก็ให้แสดง Box1, Box2   ถ้าต้องการแสดงข้อความ ก็กลับเป็นให้ซ่อน Box1, Box2 ไปแทน


ส่วนโค้ดก็เปลี่ยนเป็น

Option Compare Database
Option Explicit

Dim ShowPageFooter As Boolean

Private Sub GroupFooter1_Format(Cancel As Integer, FormatCount As Integer)
    ShowPageFooter = True
End Sub

Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer)
    Me.Box1.Visible = Not ShowPageFooter
    Me.Box2.Visible = Not ShowPageFooter
End Sub

Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer)
    ShowPageFooter = False
End Sub

อย่าลืมไปเปลี่ยน Box1, Box2 เป็นชื่อที่คุณสร้างบนรายงานด้วย และถ้ามีกี่ Box ก็เขียนโค้ดซ้ำๆกันไปเท่านั้นบรรทัด
ช่วยพกถุงผ้า หรือถุงพลาสติกที่สะอาดและผ่านการใช้มาแล้ว ไปซื้อของเพื่อลดการใช้พลาสติก ลดขยะ รักษาสิ่งแวดล้อม และไม่ให้ภาวะโลกร้อนวิกฤติเร็วขึ้นกว่านี้
ช่วยคลิกโฆษณาข้างล่างนี้ เพื่อเป็นการสนับสนุนเวปบอร์ดให้สามารถอยู่บ
 

10 ก.ย. 62 , 10:27:32
ตอบกลับ #19

kunlek

ขอบพระคุณครับ เรียบร้อยครับ

 


บอร์ดเรียนรู้ Access สำหรับคนไทย