Dim stDocName As String
    Dim aaa As Currency
    Const sss As Currency = 5000

             If aaa < sss Then
                  stDocName = "PrintWhereOver15_ALL_Out3"
                  DoCmd.RunMacro stDocName
             Else
                  stDocName = "PrintWhereOver15_ALL"
                  DoCmd.RunMacro stDocName
             End If


ลองใช้ดูแล้วมันรันแต่มาโครแรก คือ PrintWhereOver15_ALL_Out3 อันเดียวเลย
เปลี่ยนค่า ออบเจค aaa ให้เกิน 5,000 แล้ว มันก็ยังรันแต่มาโครแรก
ไม่ยอม รันมาโคร ตัวที่สอง
ผมตกเครื่องหมายอะไรไปเปล่าครับ
รบกวนทุกท่านแนะนำด้วยครับ