اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

البحث في الموقع

Showing results for tags 'بروجكت'.

  • Search By Tags

    اكتب الكلمات المفتاحيه بينها علامه الفاصله
  • Search By Author

نوع المحتوي


الاقسام

  • الترحيب
  • قسم تطبيقات و لغات مايكروسوفت
    • قنوات تعليمية شخصية و دورات تدريبية مجانية و مدفوعة
    • إعلانات شخصية بأجر للاعضاء
    • المنتدى المفتوح
    • منتدى الاكسيل Excel
    • قسم الأكسيس Access
    • دعم أنظمة الويندوز المختلفة
    • منتدي الوورد Word
    • منتدى الباوربوينت
    • منتدى الاوتلوك Outlook
    • منتدى الفيزيو Visio
    • منتدي مايكروسوفت بروجكت Ms Project
    • منتدى الفرنت بيج العام Frontpage
    • تطبيقات Power Apps
    • وان نوت One Note
    • الناشر بابليشر Publisher
    • Communicator
    • Expression Web
    • SQL Server
    • VB.net
    • C#.net
    • Asp.net
  • الغات و أدوات البرمجة الأخرى
    • حوارات الويب العامة
    • Delphi
    • PHP
    • برمجة الاندرويد
  • أقسام الإدارة و إدارة المشاريع و تطبيقاتها
    • الاستراتيجية وإدارة محافظ المشاريع
    • إدارة المشاريع
    • Scaled Agile SAFe
    • إدارة الجودة
    • القيادة و تنمية المهارات
    • Primavera Enterprise
    • Primavera 3.1
  • البحث العلمي و علوم البيانات
    • مناهج البحث العلمي
    • علم الإحصاء
    • الذكاء الإصطناعي و التنقيب فى البيانات
    • Orange
    • R
    • SPSS
    • Python
  • القسم العام
    • مشاركات المدونات
    • نرحب بزوار الموقع
    • قسم الاقتراحات و الملاحظات
    • أوفيسنا على الفيسبوك

الاقسام

  • VBA Code Library
  • قسم الإكسيل
  • قسم الأكسيس
  • قسم الوورد
  • Project Management
  • Self development التطويرالذاتي
  • EFQM & DGEP
  • معلومات مفيدة
  • أدوات عامة

مدونات

  • M-Taher's Blog
  • مدونة محمد طاهر
  • Officena
  • اا الفاروق اا
  • ‎مدونة أخبار التكنولوجيا
  • M-Taher's Blog
  • يحيى حسين's Blog
  • خبور خير's Blog
  • Dr. AbdelMalek Abu Sheikh's Blog
  • m.hindawi's Blog
  • احمدزمان's Blog
  • الحسامي
  • مدونة أ / محمد صالح
  • yahiaoui's Blog
  • عبدالله المجرب's Blog
  • صيد الخواطر
  • حمادة عمر مدونة
  • مدونة جعفر
  • مدونة عادل حنقي
  • مجدى يونس: لمسة وفاء لمنتدى اوفيسنا
  • Excel Expert Financial&Accounting
  • مدونة اعمال ايقونات الماس لمنتدى اوفيسنا
  • رقائق فى دقائق
  • Shivan Rekany

ابحث عن النتائج فى ......

ابحث عن النتائج التي تحوي ....


تاريخ الانشاء

  • بدايه

    End


اخر تحديث

  • بدايه

    End


Filter by number of...

انضم

  • بدايه

    End


مجموعه


Job Title


البلد


الإهتمامات


AIM


MSN


Website URL


ICQ


Yahoo


Jabber


Skype

تم العثور علي 2 نتائج

  1. هذا الموضوع فى قسم البروجكت له علاقة ايضا بالاوتلوك، حيث ان التصدير يتم للاوتلوك تصدير بعض الأنشطة من مايكروسوفت بروجكت الي الاوتلوك
  2. لتصدير عدد من الانشطة المختار اختار الانشطة باي طريقة تناسبك ، ثم شغل الكود التالي للتصدير الي المواعيد كدعوة لاجتماع Option Explicit Public myOLApp As Object Sub Export_Selection_To_OL_Appointments() Dim myTask As Task Dim myItem As Object On Error Resume Next Set myOLApp = CreateObject("Outlook.Application") For Each myTask In ActiveSelection.Tasks Set myItem = myOLApp.CreateItem(1) With myItem .Start = myTask.Start .End = myTask.Finish .Subject = myTask.Name & " (Project Task)" .Categories = myTask.Project .Body = myTask.Notes .Save End With Next myTask End Sub للتصدير الي المهام Sub Export_Selection_To_OL_Tasks() Dim myTask As Task Dim myItem As Object On Error Resume Next Set myOLApp = CreateObject("Outlook.Application") For Each myTask In ActiveSelection.Tasks Set myItem = myOLApp.CreateItem(3) With myItem .StartDate = myTask.Start .DueDate = myTask.Finish .Subject = myTask.Name & " (Project Task)" .Body = myTask.Notes .Categories = myTask.Project .Save End With Next myTask و للتصدير الي الملاحظات Sub Export_Selection_To_OL_Notes() Dim myTask As Task Dim myItem As Object Dim myNotesText As String On Error Resume Next Set myOLApp = CreateObject("Outlook.Application") For Each myTask In ActiveSelection.Tasks Set myItem = myOLApp.CreateItem(5) myNotesText = myTask.Name & " (Project Task)" & Chr(13) & _ " Name: " & myTask.Name & Chr(13) & _ " Start: " & myTask.Start & Chr(13) & _ " End: " & myTask.Finish & Chr(13) & _ " Note: " & myTask.Notes With myItem .Categories = myTask.Project .Body = myNotesText .Save End With myNotesText = "" Next myTask End Sub و لتكوين قائمة جديد تعطيك بهض الخيارات الاضافية يتم اضافة و تشغيل لكود التالي Option Explicit Sub CreateMenus() Dim cbrMain As CommandBar Dim ctlMain As CommandBarControl Dim ctlOLExport1 As CommandBarControl Dim ctlOLExport2 As CommandBarControl Dim ctlOLExport3 As CommandBarControl Set cbrMain = Application.CommandBars.ActiveMenuBar Set ctlMain = cbrMain.Controls.Add(Type:=msoControlPopup, Temporary:=True) ctlMain.Caption = "Export to Outlook" Set ctlOLExport1 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton) With ctlOLExport1 .Caption = "Selection to Outlook tasks" .OnAction = "Macro """ & "Export_Selection_To_OL_Tasks""" End With Set ctlOLExport2 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton) With ctlOLExport2 .Caption = "Selection to Outlook appointments" .OnAction = "Macro """ & "Export_Selection_To_OL_Appointments""" End With Set ctlOLExport3 = ctlMain.CommandBar.Controls.Add(Type:=msoControlButton) With ctlOLExport3 .Caption = "Selection to Outlook notes" .OnAction = "Macro """ & "Export_Selection_To_OL_Notes""" End With End Sub مرفق المثالexport_project_tasks_to_outlook_late_bound.rar
×
×
  • اضف...

Important Information