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

محمد طاهر عرفه

إدارة الموقع
  • Posts

    8730
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    37

كل منشورات العضو محمد طاهر عرفه

  1. و عند تفعيل هذا الخيار تظهر الاجابة المختارة مباشرة بعد السؤال و قد قمت على سبيل المثال بتفعيل الخيار على ردي السابق
  2. السلام عليكم هناك زر باسم تم التوصل للحل يمكن لصاحب الموضوع ان يختار من خلاله الاجابة المثلى و يمكن ايضا لفريق الموقع تحديدها
  3. السلام عليكم بصورة ما أقسام خلاصة المشاركات تقوم بجزء من هذا التصنيف مثلا قسم خلاصة مشاركات الاكسيل http://www.officena.net/ib/index.php?showforum=9 أما عن الكتاب فهو فكرة جميلة و لكن تجتاج لجهد ، و قد قام بعض الاخوة بمجاولات جزئية سابقا و هي موجودة فى المكتبة و بسعدنا أن نجد متطوعين للمساعدة فى هذا الانجاز حيث يحتاج لجهد كبير
  4. السلام عليكم الاقتراح مفيد و يمكن تشجيع الخبراء اليه فى الحالات التي يناسبها، فالأمر قد يختلف بحسب درجة صعوبة الموضوع و مدى استعجال السائل و ايضا مستوي الحل بالنسبة للسائل ، فمثلا قد يكون الحل يحوي اكواد معقدة و السائل لم يبدأ بعد مشواره مع الاكواد. أيضا الاجابة ليس المقصود بها السائل فقط فالسؤال و الاجابة نستفيد منها جميعا بمختلف مستوياتنا لذا قد يكون من المناسب اضافة الشرح و ايضا وضع الاجابة
  5. لقد جربته ، و يعمل جيدا الملف يحتاج برنامج winrar لفك الضغط
  6. السلام عليكم فى 2010 يتم ضغط ALT ثم الحرف المناظر مثلا لفتح صندوق الخيارات ALT+FT أو التحرك بالاسهم او TAB و للتنقل بين اجزاء الشاشة F6
  7. السلام عليكم اذا كنت صاحب المشاركة ، او احد المشرفين ، سيظهر لك زر (تم التوصل للحل) بجانب الردود و منه تختار افضل الردود ، و سيترتب على ذلك ابراز هذه الاجابة و الاشارة الى ان الموضوع تم حله
  8. السلام عليكم تم الحذف المشكلة فى اتاحة الحذف ، هى انك اذا شارك عضو فى موضوع جديد و تفاعل معه العشرات بامثلة و ردود ، و قرر بعد ذلك حذفه سواء عمدا او سهوا ، سيتم مسح جميع الرودو و المرفقات ايضا لذا فخاصية الحذف متعارف على ان تكون لعدد محدود فقط
  9. هذا القسم مخصص لاقتراحات الاعضاء التطويرية و ايضا تلقي ملاحظاتهم يرجي عدم ذكر اية اسماء او مواقف خلاف شخصي في المواضيع المنشورة. سنتتيع كل ما ينشر هنا بإذن الله ، و يكن يرجي عدم توقع ضرورة وجود رد سريع على الملاحظة او الاقتراح ، فأحيانا يحتاج الامر لمناقشة مطولة مع فريق الموقع قبل الرد.
  10. إنا لله و انا اليه راجعون اللهم أدخلها الفردوس الأعلي من الجنة
  11. السلام عليكم أخوتي الكرام هذا استطلاع رأي بخصوص إدارة المشاريع المؤسسية ، ذو علاقة ببحث أقوم بها انا و صديقي د. عمرو مسلم https://www.surveymonkey.com/s/YVW25ND أرجو المشاركة فى الاستطلاع لمن هو مجال عمله ذو علاقة بهذا الاستطلاع ـ او دعوة من تعرفونه للمشاركة
  12. اللهم رب الناس أذهب البأس اشفِ أنت الشافي لا شفاء إلا شفاؤك ، شفاء لا يغادر سقماً
  13. نرحب بالأخ أبا عمر فى فريق الموقع مشرفا على قسم الأكسيس أهلا وسهلا
  14. يحتوى برنامج الفيزيو 2010 على خاصية اضافة الملاحظات و علامات المراجعة Mark up و لكن للاسف لا يحوي امكانيات متقدمة مثل برنامج الوورد للتحكم فى طباعتها و لكن يوجد حل بديل عن طريق الماكرو حيث يتم انشاء مربع نص و نسخ قائمة بالتعديلات اليه و ذلك بجوار الرسم المصدر http://support.microsoft.com/kb/898514/en-us و هذا هو الكود Public Sub GetComments() Dim pagMarkup As Visio.Page Dim pag As Visio.Page Dim shp As Visio.Shape Dim sText As String Dim iRow As Integer Set pag = Visio.ActivePage sText = "Reviewer" & vbTab & "Date" & vbTab & "Comment" If pag.PageSheet.SectionExists(Visio.visSectionAnnotation, Visio.visExistsAnywhere) Then For iRow = 0 To pag.PageSheet.RowCount(Visio.visSectionAnnotation) - 1 sText = sText & vbCrLf & pag.Document.DocumentSheet.CellsSRC(Visio.visSectionReviewer, pag.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationReviewerID).ResultIU - 1, Visio.visReviewerInitials).ResultStr("") sText = sText & pag.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationMarkerIndex).ResultIU sText = sText & vbTab & Format(pag.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationDate).ResultIU, "ddddd") sText = sText & vbTab & pag.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationComment).ResultStr("") Next iRow End If For Each pagMarkup In pag.Document.Pages If pagMarkup.Type = visTypeMarkup Then If pagMarkup.OriginalPage = pag Then If pagMarkup.PageSheet.SectionExists(Visio.visSectionAnnotation, Visio.visExistsAnywhere) Then sText = sText & vbCrLf sText = sText & vbCrLf & pag.Document.DocumentSheet.CellsSRC(Visio.visSectionReviewer, pagMarkup.ReviewerID - 1, Visio.visReviewerName).ResultStr("") For iRow = 0 To pagMarkup.PageSheet.RowCount(Visio.visSectionAnnotation) - 1 sText = sText & vbCrLf & pag.Document.DocumentSheet.CellsSRC(Visio.visSectionReviewer, pagMarkup.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationReviewerID).ResultIU - 1, Visio.visReviewerInitials).ResultStr("") sText = sText & pagMarkup.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationMarkerIndex).ResultIU sText = sText & vbTab & Format(pagMarkup.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationDate).ResultIU, "ddddd") sText = sText & vbTab & pagMarkup.PageSheet.CellsSRC(Visio.visSectionAnnotation, iRow, Visio.visAnnotationComment).ResultStr("") Next iRow End If End If End If Next pagMarkup Dim iAutoSize as Integer 'new iAutoSize = pag.AutoSize 'new pag.AutoSize = 0 'new Set shp = pag.DrawRectangle(-pag.PageSheet.Cells("PageWidth").ResultIU, 0, 0, pag.PageSheet.Cells("PageHeight").ResultIU) pag.AutoSize = iAutoSize 'new shp.AddSection visSectionUser 'new shp.AddNamedRow visSectionUser, "msvNoAutoSize", visTagDefault 'new shp.CellsU("User.msvNoAutoSize").FormulaU = 1 'new shp.Cells("Para.HorzAlign").Formula = "0" shp.Cells("VerticalAlign").Formula = "0" shp.Name = "Reviewers Comments" shp.Text = sText End Sub
  15. لا اعتقد ان له علاقة اذا واجهتك مشكلة في جدول المحتويات ، جرب حفظ الملف بتنسيق اقدم اولا اذا لم يسبب لك ذلك مشكلة او الاستعانة باحد البرامج التي تنشيء طابعة من نوع pdf يتم طباعة الملف اليها و ليس حفظه مثل adope distiller pdfcreator adope proffesional pdf architect ,و هناك العديد من التطبيقات المجانية
  16. سألني صديق هذا السؤال : كيف اجعل ملف الوورد 2010 يفتح فى حالة العرض النهائي ، و ذلك فى حالة تتبع التعديلات ؟ أي أنك عندما تتتبع التعديلات Track changes و تغلق الملف و تحفظه يفتح تلقائيا فى حالة Final show Markup و هو يريده فى حالة Final فقط الاجابة File Options Trust Center Trust Center Settings Privacy Options أزل الخيار التالي : "Make hidden markup visible when opening or saving."
  17. الحمد لله ، تصورت من العنوان قبل قراءة الموضوع انها شكوي بخصوص سرعة الموقع شكرا على الموقع It's just you. http://www.officena.net is up. Check another site?
  18. أخوتي الكرام سيتم غلق الموضوع حبث أن القسم حاليا مفتوح بالفعل قيد التجربة و التقييم ، و يمثل فقط همزة وصل بين الطرفين ، دون تدخل من اي نوع للمنتدى قسم اعلانات الاعضاء و شروط المشاركة به موجودة فى الموضوع المثبت
  19. قائمة بأهم المواقع التي تقدم كورسات التعليم الذاتي منقول The best 31 websites for online courses 1- www.edx.org 2- www.coursera.org 3- www.udacity.com 4- www.mruniversity.com 5- www.class.stanford.edu 6- www.venture-lab.org 7- www.education.10gen.com 8- www.openhpi.de 9- www.ocw.mit.edu 10- www.khanacademy.org 11- www.oli.cmu.edu 12- www.oyc.yale.edu 13- www.webcast.berkeley.edu 14- www.openclassroom.stanford.edu/MainFolder/HomePage.php 15- www.see.stanford.edu 16- www.ck12.org 17- www.udemy.com 18- www.skillshare.com 19- www.codecademy.com 20- www.p2pu.org 21- www.ed.ted.com 22- www.myopencourses.com 23- www.myopencampus.in 24- www.nptel.iitm.ac.in 25- www.saylor.org 26- www.nalandau.com 27- www.academicearth.org 28- www.youtube.com/education 29- www.phodphad.com 30- www.learntobe.org 31- www.floqq.com
×
×
  • اضف...

Important Information