اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

هل يمكن لنا ان نبرمج الطابعه أو الاكسل بحيث يتم طباعة صفحات معينه فى وقت معين ؟

اتمنى ان يكون السؤال واضح . لانى لايمكن ان ارسل ملف لتوضيح الطلب

وجزاكم الله كل خير

قام بنشر

السلام عليكم

===========

ابو محمد

ضع هذا الكود فى Workbook

هذا الكود مجرب وسيعمل ان شاء الله " اضبط ساعة جهازك على نظام 24"

Private Sub Workbook_Open()

    'ÖÈØ æÞÊ ÇáØÈÇÚÉ

    Application.OnTime TimeValue("21:35:00"), "PrintMe"

End Sub

ثم ضع الكود التالى فى MODULES
Private Sub PrintMe()

    Sheets(2).PrintOut

    'Reschedule the printing

    Application.OnTime TimeValue("21:50:00"), "PrintMe"

End Sub


قام بنشر

السلام عليكم

=============

أخى هشام

بارك الله فيك وجزاك الله كل خير

فيه فرق فى التوقيت بنى وبين حضر تك انا غيرت فى الوقت داخل الكود وانتظرت امر الطباعه لكن لم يتم

فما الحل؟

وجزاك الله كل خير

قام بنشر

السلام عليكم

===========

ياابو محمد

انت غيرت فى كود واحد فقط

هناك 2 كود غير الوقت فى الاتنين

واظن المرفق السابق خير دليل على نجاح التجربة

قام بنشر

اخى هشام بارك الله فيك وانا اشكرك ورد لا يحتاج الى دليل فجزاك الله كل خير

هحاول تانى وان شاء الله هيطبع بامر الله

هطلع قماش هههههههههههههههههههه

واشكرك للمره التانيه

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information