كيفية جعل الاستعلام برمجيًا في MS Access افتراضيًا إلى الوضع الأفقي عند الطباعة
-
09-06-2019 - |
سؤال
كيف يمكنني جعل الاستعلام برمجيًا في MS Access افتراضيًا إلى الوضع الأفقي عند طباعته، وتحديدًا عند عرضه كمخطط PivotChart؟أحاول حاليًا القيام بذلك في MS Access 2003، ولكني أرغب في رؤية حل لأي إصدار.
المحلول
يجب أن تقوم الوظيفة التالية بالخدعة:
Function SetLandscape()
Application.Printer.Orientation = acPRORLandscape
End Function
يجب أن يكون قادرًا على استدعاء هذا من وظيفة autoexec للتأكد من تشغيله دائمًا.
نصائح أخرى
نعم، يقوم استدعاء ahockley بتعيين اتجاه طابعة التطبيق إلى الوضع الأفقي.لقد قمت بالتجربة وكانت ناجحة.أعلم أن هذا لا ينتج جدولاً محوريًا، لكنني لم أقم بإعداد جدول لاستخدامه، لذا فهو يفتح استعلامًا عاديًا ويطبعه.
Private sub
Application.Printer.Orientation = acPRORLandscape
DoCmd.OpenQuery "qry1", acViewNormal, acReadOnly
DoCmd.PrintOut acPrintAll
End Sub
إذا كنت تريد إغلاق الاستعلام بعد طباعته، أضف:
docmd.Close acQuery, "qry1", acSaveNo
لا تنتمي إلى StackOverflow