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

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

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

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

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

  • Days Won

    37

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

  1. لكي نحصل علي بيانات علي الانترنت من قاعدة بيانات الأكيسي المرفوعة علي النت هناك حلان الاول و هو الطريق الاصلي لذلك و هو استخدام تقنية ال asp و هي عبارة عن بيئة برمجية مكونة من مزيج من جمل الاس كيو ال و الفي بي سكريبت او الجافا سكريبت ، مع كائنات قليلة العدد تخص التعامل مع السيرفر بال asp أي active server pages و هذا المسار بعيد عن الاكسيس كواجهة و هو من لغات برمجة الويب و هو الحل الاقوي في هذا المجال اما الحل الاخر ، فهو استخدام صفحات الاكسيس access pages و بالنسبة لي هو مازال حل نظري حيث لم اجربه علي النت لان موقعي لا يدعم الاكسيس علي النت و توجد فى مناقشة سابقة وصلة للموضوع فى موقع ميكروسوفت http://www.officena.net/ib/index.php?showtopic=1296 مع ملاحظة أن المناقشة السابقة قديمة و لم نكن حصلنا علي الاوفيس 2003 و قتها :(
  2. موضوع المحادثة الفورية له مزايا و له أيضا عيوب مزاياه معروفة و اهم عيوبه أن الحوار أصبح خاصا ، بدل من أن يصبح اضافة لقاعدة البيانات العامة حتي و ان تم تلخيص ما دار به فالاضمن للصالح العام أن يكون الحوار متاحا امام الجميع ايضا قد يمثل ذلك عبئا علي الأخوة النشطين فى المنتدي حيث أن الحميع ليس متفرغا و انما الطريقة العادية فى التفاعل تتيح الاجابة فى الوقت المناسب لكل شخص و ذلك بصفة عامة و طبعا هناك حالات خاصة يمكن فيها استخدام الشات العادي بحسب موافقة الطرفين عموما سنبحث الاقتراح و فوائده و امكانية تحقيقه مع الأخوة فى فريق الموقع بإذن الله تعالي مع تحياتي
  3. السلام عليكم بالنسبة للصورة ، أرجو موافاتي باقتراحات بديلة بالنسبة للاسم ،استراحة المنتدي مناسب و ان لم ترد اقتراحات اخري سيتم التغيير اليه باذن الله تعالي
  4. تم افتتاح القسم العام بالمنتدي القسم مخصص للحوارات و المواضيع العامة الغير متعلقة بأقسام المنتدي رقائق طرائف أخبار تكنولوجية تهاني و ترحيب .. ... مدة بقاء المواضيع فى القسم 30 يوما فقط تحميل الملفات للاعضاء ايضا متاح فى هذا القسم علي عكس الاقسام الفنية مع تحياتي و شكري للجميع
  5. السلام عليكم أخوتي الكرام كل عام و أنتم بخير :( أعاده الله علينا و علي الأمة الاسلامية بالخير و اليمن و البركات
  6. بالنسبة لتسجيل الدخول اذا كان هناك مشكلة فيه يمكن اعادة طلب كلمة تغيير كلمة المرور و المشكلة قد تكون فى أن الموضوع الاصلي فى الارشيف و الاعضاء غير متاح لهم الاضافة الي الارشيف فان كان الوضع كذك يرجي فتح موضوع جديد و الاشارة الي الرابط الموجود فى الارشيف لا ستكمال المناقشة به مع تحياتي
  7. السلام عليكم هل راجعت هذا الموضوع فى الأرشيف من هنـــــــــا و به صفحتان من الردود حول الموضوع
  8. السلام عليكم جزاك الله خيرا و بالنسبة للاخفاء و الاظهار أقترح تعديل الكود ليكون مجال تطبيقه هو أي خلايا مختارة : Sub hideselsctionrow() Selection.EntireRow.Hidden = True End Sub Sub hideselectioncolumn() Selection.EntireColumn.Hidden = True End Sub Sub showselsctionrow() Selection.EntireRow.Hidden = False End Sub Sub showselectioncolumn() Selection.EntireColumn.Hidden = False End Sub و للذهاب الي اول خلية فى ورقة العمل و الي اخر خلية فى العمود و آخر خلية فى الصف و أول خلية فى العمود و آول خلية فى الصف Sub gohome() Range("A1").Select End Sub Sub gotolastincolumn() Selection.End(xlDown).Select End Sub Sub gotolastinrow() Selection.End(xlToRight).Select End Sub Sub gotoFirstincolumn() Selection.End(xlUp).Select End Sub Sub gotoFirstinrow() Selection.End(xlToLeft).Select End Sub و هذه هي المناظرة ل ctr+home end + الأسهم
  9. السلام عليكم أخي الكريم ، نرجو عدم توجيه السؤال الي شخص بعينه حتي و ان كان صاحب المشاركة المشار اليها - تم تعديل الموضوع و ذلك تحقيقا لقواعد المشاركة اولا و ثانيا حتي لا تحرم نفسك و تحرمنا من اجابة اقضل من شخص آخر راجع مثال الاخ ابو هادي فى هذا الموضوع : http://www.officena.net/ib/index.php?showtopic=419 مع شكري و تقديري
  10. موضوع مرتبط http://www.officena.net/ib/index.php?showtopic=419
  11. احد الاقتراحات هو تغيير لون الفونت دوريا Sub runcolorchanger() For i = 1 To 50 Cells(1, 3).Font.ColorIndex = i Start = Timer ' Set start time. Do While Timer < Start + 1 DoEvents ' Yield to other processes. Loop Next i End Sub و يمكن تشغبلها مع بدأ الفتح و مع حدث تعديل فى ورقة العمل مثلا بحسب ما يناسبك و الكود السابق يقوك بتغيير لون الخط دوريا لاول 50 لون و الغرض من اقحام ال Timer هو توقيف الكود لمدة ثانية واحدة مع كل تغيير حتي يكون التغيير ظاهرا و الا سيغير اللون دون ان نستطيع ملاحظة ذلك colorcell.rar
  12. السلام عليكم أهلا وسهلا أخي العزيز :d بالنسبة للملف هو به ماكرو فقط
  13. جرب اضافة section جديد قبل الصفحة insert break section breack و حدد المناسب
  14. السلام عليكم نشكرك اخي الكريم :( البرنامج المرفق هو احد ادوات تطوير الاوفيس باستخدام الفيجوال استوديو و قد يكون اهم ما به هو معالج الحزم package wizard و الذي يمكنك من عمل setup للاكسيس و ايضا تحميل ال run time فى نفس الحزمة ليعمل الاكسيس علي الجهاز و صراحة لم اجربه و لكن هذه وصلة لشرحه من موقع ميكروسوفت من هنــــــــــا
  15. السلام عليكم كما تعرفون فى الاستخدام العادي للاكسيل هناك نمطان للاستخدام من ناحية اظهار المعادلات اما ان تقول الخلية A1 $A1 $A$1 بحسب ما تريد تعرف الاشارة الي الصف و العمود او كلاهما ان يكون مطلقا فاذا اردت الاشارة الي الخلية الاولي من ورقة العمل يكون باحدي الطرق الثلاث السابقة و هذا هو النمط الافتراض لاظهار المعادلات و اما أن تستخدم - النمط المطلق - الذي لا يرتبط بحروف و انما يكون التعامل مع عدد الصفوف و الاعمدة و موقع الخلية او المجال المشار اليه بالنسبة للخلية لاتي تكتب فيها المعادلة و النمط الاخر و الذي ليس بالافتراضي و انما لتفعيله نختار Tools options setting general reference style R1C1 و الذي ستختلف طريقة كتابة المعادلة فيه فتصبح متناسبة مع موقع الخلية التي تكتب المعادلة فيها بالنسبة للخلية او المجال المشار اليه فللاشارة الي الخلية a1 اذا كنا فى الخلية b1 سنكتب : =RC[-1] أي الخلية التي تبعد خلية واحدة الي اليسار افقيا و اذا كنا فى الخلية b2 او الخلية الثانية فى العمود الثاني سنكتب =R[-1]C[-1] و للاشارة من نفس الخلية الثانية فى العمود الثاني الي الخلية الثالثة فى العمود الثالث سنكتب =R[1]C[1] اي الخلية التي تبعد خلية لليمين و خلية لاسفل و هكذا ، و طبعا لا نحتاج فى اغلب الاحوال الي الكتابة و لكن ننتقي الخلية و تظهر المعادلات بهذه الطريقة اذا اردنا ان يكون الاظهار بهذا النمط و ما سبق هو من ناحية كتابة المعادلات ، اما بالنسبة للبرمجة : ----------------------------------------------------------------- الفائدة الحقيقة لهذا النمط المطلق تأتي فى البرمجة المتقدمة بعض الشيء ، اذا تحتاح الي ادخال معادلات بالكود فى خلايا محددة متغيرة الموقع و تكون هذه المعادلات بها اشارات الي مجال معين او خلية معينة تبعد عدد متغير من الاعمدةو الصفوف عن الخلية التي تكتب بها المعادلة اي ان الناتج المطلوب لجزء من الكود الذي تكتبه هو - معادلة- تشير الي مجال محدد تدخلها فى احدى الخلابا كناتج للبرمجة كمثلا ان تجري بعض الاحصاءات و تخرجها فى جدول و يكون عدد الاعمدة متغير ، و تريد اسفل الجدول ان تضع- معادلة - تجمع صفوف الجدول و تريد عمل تنسيق معين للجدول بعد الانتهاء منه بناء علي عدد الصفوف التي ستنتج و طبعا عدد الصفوف غير معروف مقدما و لكنه ينتج عن حسابات يجريها البرنامج و ايضا فى بعد الاحوال حين وجود اوامر برمجية مركبة تعتمد علي بعد خلايا محددة بالنسبة لاخري قد يكون من الاسهل التعامل بهذا النمط فى كتابة الكود ، و لكن يمكن استبداله فى احيان كثيرة بجمل اطول باستخدام ال offset و range و اعتقد ان هذه بعض اهم الحلات التي نحتاح فيها لهذا النمط فى البرمجة و لكن اكيد هناك استخدامات اخري لها
  16. احتجت لتعريف اسماء عديدة لخلايا فى ملف فاعددت هذا الكود البسيط لاختار الخلية و اشغل الماكرو فيسألني عن الاسم و يحفظه ضمن اسماء النطاقات المعرفة فى الملف في البداية تصورت انه يمكنني تسجيل الماكرو و تعديله ببساطة و لكن اتضح ان اضافة التعريف لاسم لابد ان تكون بصورة r1c1 لذا كان لابد من تعريف النمط ReferenceStyle:=xlR1C1 Sub assignName() ActiveCell.Select x = InputBox("choose a name", "Write the name to define", "TT") Dim y As String y = Trim(ActiveCell.AddressLocal(ReferenceStyle:=xlR1C1)) y = "=" & Trim(ActiveWorkbook.ActiveSheet.Name) & "!" & y ActiveWorkbook.Names.Add Name:=x, RefersToR1C1:=y End Sub addnames.rar
  17. اهلا وسهلا بك و نرجو أن تفيد و تستفيد :d
  18. السلام عليكم أنشيء ملف جديد ثم جرب الاستيراد بالطريقة المذكورة هنا http://www.officena.net/ib/index.php?showt...1499&hl=استيراد
  19. السلام عليكم الماكرو فى الاكسيس مجهز لادء بعض العمليات المحددة و ليس كل العمليات و للتعرف علي الكود المناظر للماكرو يمكننا تحويله الي صيغة الكود اما الطريق العكسي ، فأتفق مع الاخ سهل انه لا داعي لبحثها لأنه فى الاغلب لن نصل الي نتيجة فالاكواد مجال مفتوح علي عكس الماكرو و بالتالي سيصعب أن توجد قابلية للتحويل العكسي اللهم الا اذا فاجأنا أحد الأخوة بفكرة أو طريقة لم تخطر ببالنا ، و قد حدث هذا مرات عديدة فى مواضيع عديدة و جميل طرح أي موضوع للنقاش حتي لو لم يكن قابلا للتطبيق من وجهة نظر كثير منا ، فربما تنتج عنه فكرة جديدة ، و ليس ذلك بالضرورة ان تكون فى صلب الموضوع المطروح ، و اذا اتفقنا علي ذلك لابد أن يكتب كل منا رأيه بصراحة ووضوح فيها ، و ليس خطأ أن يكون رأي احدنا به خطأ فلطالما وضعت مشاركات خلال السنوات الماضية هنا و في الفريق العربي كطرح مباشر لما أراه وقت قراءة المشاركة و لم أكن حريصا جدا علي دقتها و صحتها و تفضل أكثر من أخ بتصحيحها و الاضافة عليها ، و هذا لم ينقص مني شيئا ، بل زادني.. و ذلك بأن فتحت المجال لي و لغيري أن نطرق باب المناقشة و نفتح المجال للاضافة الي معلوماتنا . و رجاء خاص أخي جمال خاصة و جميع الاخوة عامة ، أن نحسن الظن فى صيغة المشاركات ، فطبيعة التعامل علي النت من خلال المنتديات من خصائصه أن تكون الكلمات و الجمل قابلة لأن تؤخذ علي أكثر من محمل ، و لكننا دائما نأخذها علي أفضل محمل لها :pp: و مشاركة الأخ سهل لم يستوقفني فيها شيء :( و ايضا أقترح أن يكون العتاب بالرسائل الشخصية :pp: و ان كانت لا تستحق العتاب من وجهة نظري فلنؤكد ثانية أننا نجتهد جميعا من أجل افادة غيرنا ، و زياددة معلوماتنا ، و أن الاختلاف فى الرأي لا يفسد للود قضية ، و لا يجب أن تكون درجة الحرص عند الرد شديدة خاصة بين فريق العمل فى الموقع لاننا جميعا هدفنا واحد و سنأخذ الردود علي افضل محمل لها مع تقديري
  20. إنا لله وإنا إليه راجعون توفيت الي رحمة الله والدة أخونا رضوان عضو شرف الموقع و هذا الموضوع مخصص لتقديم العزاء ، بقسم الاكسيس http://www.officena.net/ib/index.php?showtopic=4930
  21. علي استحياء أضع هذه المشاركة الخفيفة و باذن الله أعود للمشاركة معكم كالسابق قريبا باذن الله هذا الماكرو البسيط احتجته اثناء العمل ، و سبب الحاجة له هو أنه عند تصدير بعض البيانات الي الاكسيل تأتي بعد السجلات منقسمة علي سطرين فالاصل مثلا ان يكون فى الخلية Mohamed Taher arfa و اذا بها فى بعض السجلات تأتي Mohamed Taher arfa و في بعضها Mohamed Taher arafa و الماكرو بتشغيله بعد اختيار الخلية العلوية و مد الاختيار الي الخلية السفلية و تشغيله يقوم بدمج القيمتان فى الخلية العلوية و مسح القيمة فى الخلية السفلية و اسم الماكرو merg2 ثم بعد ذلك اقوم باختيار العمود ككل و تشغيل ماكرو مسح القيم الخالية السابق نشره ليقوم بمسح كل الصفوف الزائدة و اسم الماكرو deleteemptyRow merge2.zip
  22. اذا جاءك بريد بعنوان A Card for You او A Virtual Card for You فقم بحذفه فورا ، فهذا فيروس خطير بدء ينتشر علي النت و صنفته ميكروسوفت علي انه الاشد تدميرا البريد الذي وصلني : Importance: High WORST VIRUS EVER ---CNN ANNOUNCED PLEASE SEND THIS TO EVERYONE ON YOUR CONTACT LIST !! A new virus has just been discovered that has been classified by Microsoft as the most destructive ever. This virus was discovered yesterday afternoon by McAfee and no vaccine has yet been developed. This virus simply destroys Sector Zero from the hard disk, where vital information for its functioning are stored. This virus acts in the following manner: It sends itself automatically to all contacts on your list with the title: "A Card for You". As soon as the supposed virtual card is opened the computer freezes so that the user has to reboot. When the ctrl+alt+del keys or the reset button are pressed, the virus destroys Sector Zero, thus permanently destroying the hard disk. Yesterday in just a few hours this virus caused panic in New York, according to news broadcast by CNN. This alert was received by an employee of Microsoft itself. So don't open any mails with subject: "A Virtual Card for You." As soon as you get the mail, delete it!! Even if you know the sender!!!.this warning email has been sent to all users in the company, so pls pass this warning message to others outside the company thanks.
  23. تم اغلاق التصويت و سيتم استكمال النقاش بين فريق الموقع في ضوء نتيجة الاستبيان و سيتم باذن الله تنفيذ ما فيه الصالح العام
  24. السلام عليكم يرجي ممن يريد التطوع لتنظيم العمل فى المشروع أن يتفضل
×
×
  • اضف...

Important Information