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

أعتقد أن الاسطوانة قد تلفت حاول الحصول على نسخة أخري

عند فتح ملف و خاصة اذا كان من نوع tif أو mdi من خلال أحد برامج الأوفيس كالباوربوينت أو الأكسيس او كملف كمرفق من الأوتلوك من خلال Hyperlink ( إرتباط تشعبي) غالباً ما تظهر رسالة تحذيرية تحذر من وجود فيروس أو ملفات قد تكون مؤذية Some Files can Contain Viruses or otherwise be harmful.... و لا يمكن التخلص من هذه الرسالة حتى من خلال الكود المعتاد لايقاف الرسائل كما تعودنا فى أكواد الأكسيس DoCmd.SetWarnings False و للتخلص من الرسالة : و هو من File Manager إختار Folder Options ثم اختار نوع الملف و ليكن TIF مثلا ثم Advanced و ألغي خيار Confirm open after Download

أرسل لى أخوكم العضو "المجاهد عيسى " هذا الملف لاضافته للمنتدي لمواجهته صعوبات فى الاضافة _________________.zip

معهد ماساشوستس ااتكنولوجيا يقدم كورسات مجانية للراغبين فى التثقيف الذاتي بمجالات عديدة http://ocw.mit.edu/OcwWeb/Global/all-courses.htm

السلام عليكم و رحمة الله و بركاته بداية أؤكد على أننا لا نمانع من الاشارة الى منتديات أخري فى الردود ، و خاصة اذا كانت مفيدة ، فالهدف واحد و لسنا فى تنافس. ، و الدليل على ذلك اشارتنا الى العديد من المواقع فى الصفحة الرئيسية و لكن .... الاكتفاء بالاشارة الى رد فى منتدي أو موقع آخر ، كرد على سؤال يجب تلافيه و ذلك للأسباب الآتية : 1- اضعاف قاعدة البيانات الموجودة بالموقع هنا ، فالمواضيع المهمة المجاب عليها فى مكان آخر يجب نقلها مع الاشارة الى المصدر و الكاتب حفظاً للحقوق. 2- احيانا تتغير وصلات المنتديات تبعا لتغيير مسار المنتدي ـ و قد حدث هذا سابقا فى الكثير من المواقع ، و على سبيل المثال حدث هذا مرة معنا عندما كنا فى موقع آخر فى مرحلة ما تم تغيير مسار المنتدي فاصبحت الوصلات القديمة لا تعمل. 3- أحيانا لا قدر الله ، تتوقف بعض المواقع عن العمل لسبب أو لآخر. 4-لدينا حاليا أكثر من خمسين ألف مشاركة فى الموقع ، و الكثير من المواضيع التي يتم الرد عليها بتحويل لموقع آخر يوجد مثلها فى الموقع هنا ، و هذا ليس الحل الأمثل من حيث أسهل الطرق للوصول الي المعلومة مستقبلا. 5- بعد المواقع تتطلب التسجيل ، و هذا يصعب الموضوع على السائل ، و يكون من الافضل له أن يجد المعلومة مباشرة و بما أن المصدر مشار اليه ، فان الحرية متروكة له فى التسجيل من عدمه. 6- وجود الرد فى أكثر من موقع فيه فائدة أكبر ، فأحيانا تتوقف بعض المواقع لفترة ما قد تطول و قد تقصر سواء للصيانة الدورية أو للاختراق أو لاسباب أخري متعددة ، و تعدد أماكن المعلومة الواحدة ( مع الاشارة للمصدر) فيه فائدة كبيرة. و عليه فارجو من الأخوة جميعا ، حال الرغبة فى الاشارة الى موضوع ما فى موقع آخر ، فتح موضوع مستقل فى الموقع هنا و حبذا لو كان ذلك فى الارشيف لمن لديهم الصلاحية ، و اضافة المعلومة اليه مع الاشارة لصاحبه ، ثم الاشارة الي الموضوع بعد ذلك حتي لا ينتهى بنا الأمر الى وجود عدد كبير من المشاركات هي عبارة عن تحويلات و قد ينتهى بها الأمر الى الحذف أثناء التنقيح الدوري للمشاركات. و أرجو من الجميع الالتزام بذلك ، و أرجو من الأخوة المشرفين و المراقبين ، التدخل لتعديل المشاركات التي تخالف ما سبق بحيث يتم اضافة المعلومة فى المشاركة مباشرة و ليس الوصلة فقط ، و لا مانع من الاشارة الى المصدر اذا لم يوجد مثيل لها هنا فى المنتدي أو مثلت أضافة جديدة. على أن يتم اضافة المعلومة الى الارشيف مباشرة بصفتها معلومة منتهية و مفيدة.

جريدة استرالية تقوم بعمل استفتاء عن نشر صور مسيئة لرسول الله محمد عليه الصلاة و السلام وعاملين استفتاء http://news.ninemsn.com.au/vote.aspx?qid=2106 اختارو NO ثم submit أعتقد أن نسبة التصويت المرتفعة بالرفض ستمنع النشر من ناحية ، و من ناحية أخري ستلفت نظرهم الى مدى حب الناس للرسول عليه الصلاة و السلام ، و ربما تكون هذه فاتحة خير لهداية البعض جزاكم الله خيرا

هل جربت المسح من القائمة كما هو مذكور أعلاه أتصور انه من الممكن أن يعمل الزر فى برنامج و الاخر لا عموما للتأكد جرب شيئان الاول المسح من القائمة فاذا تم المسح فهذا يرجح موضوع لوحة المفاتيح و لقطع الشك بالايقين يمكنك استعارة لوحة مفاتيح أخري و تجربتها اما اذا لم يعمل أيضا من القائمة فهذا يرجح احتمال وجود مشكلة فى نسخة الاوفيس لديك و ليس لوحة المفاتيح و الله أعلم

هناك طريقة أخري من الوورد احفظ الصفحة ك صفحة ويب File save as web page ثم من الاكسيل data import external data و نختار all files ثم نحدد مكان الملف و نختاره ثم Import

هل تواجهك نفس المشكلة اذا نفذت امر المسح من القائمة Edit clear contents اذا لا ، فالاغلب ان المشكلة فى لوحة المفاتيح

السلام عليكم أولا أشكر الأخوة على و خالد علي و أخص بالشكر الأخ mn20 على اضافته و بالنسبة للسؤال : أين أنت ياأستاذ محمد طاهر ؟ الإجابة : حالياً ، فى المنزل و بالتحديد أمام الكمبيوتر طبعا هذا ليس مقصد السؤال ! الحقيقة أني منذ فترة ليست بقصيرة لا أستطيع متابعة المشاركات بانتظام و على قدر ما يؤلمني ذلك ، على قدر ما أشعر باسعادة و الفخر لاستمرار عطاء الموقع اعتماداً علي أخوة أفاضل عوضوا غياب العديد من أعمدة الموقع الذين غابوا تباعاً بكفاءة و إخلاص ، بل و أضافوا كثيرا بأسلوب مختلف ، و هذا مدعاة فخر و سعادة لنا جميعا و أتمني أن يزيد ذلك و أن يتضاعف عدد الفاعلين من الأخوة فى الموقع و أن يصل الحال الي الوضع الامثل و هو أن يكون أغلب الأخوة متفاعلين فى الاضافة و الرد و أخيرا لا أستطيع ترك الموضع دون أن ألفت نظرالأخوة بحكم العادة الي عدم تخصيص شخص معين بطلب اجابة معينة ، لان هذا يتنافي مع قواعد المشاركة ، و لأن ذلك قد يغلق باب اجابة أفضل تأتي من شخص أعلم بالموضوع و نهاية أعتذر للجميع عن عدم التواجد و أشكر كل من يساهم فى استمرارعطاء الموقع ، و أدعو الله سبحانه و تعالي أن يجعله من باب علم ينتفع به ، ينفع حيث لا ينفع الندم و أن يزيد من عددهم و أن يجعلنا منهم و أن يستعملنا و لا يستبدلنا وييسر لنا سلوك دروب الخير و العلم و قضاء حوائج الآخرين.

اذا فتحت أي زر من أزرار طباعة التقارير مثلا ستجد الكود الخاص بالطباعة بهذه الصيغة Dim stDocName As String stDocName = "reportname" DoCmd.OpenReport stDocName, acPreview او مباشرة: DoCmd.OpenReport "reportname" و ما قصده الأخ رضوان هو تكرار الكود داخل نفس الأمر DoCmd.OpenReport "report1" DoCmd.OpenReport "report2" DoCmd.OpenReport "report3"

راجع الدرس رقم 12 فى هذا الموضوع http://www.officena.net/ib/index.php?showtopic=228 اذا كان الجدولان بنفس الاسم فيمكنك استخدام التصدير مع اختيار الاستبدال و هذا مثال من التعليمات علي تنفيذ حذف الجدول بالكود This example deletes the Employees table from the database. Sub DropX2() Dim dbs As Database ' Modify this line to include the path to Northwind ' on your computer. Set dbs = OpenDatabase("Northwind.mdb") ' Delete the Employees table. dbs.Execute "DROP TABLE Employees;" dbs.Close End Sub و هذخ أمثلة أيضا من التعليمات علي انشاء جدول This example creates a new table called ThisTable with two text fields. Sub CreateTableX1() Dim dbs As Database ' Modify this line to include the path to Northwind ' on your computer. Set dbs = OpenDatabase("Northwind.mdb") ' Create a table with two text fields. dbs.Execute "CREATE TABLE ThisTable " _ & "(FirstName CHAR, LastName CHAR);" dbs.Close End Sub This example creates a new table called MyTable with two text fields, a Date/Time field, and a unique index made up of all three fields. Sub CreateTableX2() Dim dbs As Database ' Modify this line to include the path to Northwind ' on your computer. Set dbs = OpenDatabase("Northwind.mdb") ' Create a table with three fields and a unique ' index made up of all three fields. dbs.Execute "CREATE TABLE MyTable " _ & "(FirstName CHAR, LastName CHAR, " _ & "DateOfBirth DATETIME, " _ & "CONSTRAINT MyTableConstraint UNIQUE " _ & "(FirstName, LastName, DateOfBirth));" dbs.Close End Sub This example creates a new table with two text fields and an Integer field. The SSN field is the primary key. Sub CreateTableX3() Dim dbs As Database ' Modify this line to include the path to Northwind ' on your computer. Set dbs = OpenDatabase("Northwind.mdb") ' Create a table with three fields and a primary ' key. dbs.Execute "CREATE TABLE NewTable " _ & "(FirstName CHAR, LastName CHAR, " _ & "SSN INTEGER CONSTRAINT MyFieldConstraint " _ & "PRIMARY KEY);" dbs.Close End Sub

تم التعديل الرسائل الخاصة ليست مفعلة للأعضاء ، و انما لباقي المجموعات فقط ( المميزين ، و المحترفين ، و المشرفين ، و الرواد ) و باذن الله بعد الانضمام الي اي من هذه المجموعات ستكون الرسائل مفعلة بحسب قواعد المنتدي

السلام عليكم بالنسبة لي أيضا لم يتخط الماكرو مستوي الامان مرتفع جدا و ربما السبب فى تخطيه لديك اخي تامر هو خيار الوثوق بال vba Tools Macro Security و اختار علامة التبويب الثانية trusted publishers و راجع الخيارات أسفل الصفحة فاذا كان الخيار الثاني مفعلا فهذا سييسمح بتشغيل الماكرو و هذه الشاشة تتيح لنا التحكم فى ما تم تعريفه بالمصدر الموثوق به اذ يمكنك تعريف المصدار الموثوقة و حذفها و اعتقد هذا يحل المشكلة الي حد كبير و اذا كان لديك ماكروهات لها توقيع اليكتروني digital signature فيمكنك التجربة ، فكما ذكرت فى الموضع السابق اني لم يسبق لي التجربة و لكن علي الاقل نظريا اعتقد ان الموضوع محلول باستخدام هذه الخيارات ، او اتمني ان يكون كذلك

قد يكون الجواب غير مناسب و لكن كثيرا ما يحدث هذا فقط بسبب السهو و أن اللغة العربية/انجليزية أو بسبب ال caps lock عموما اطلب من مسئول الشبكة ان ياتي و يتاكد من الدخول لمرة ثم اختار خيار الاحتفاظ بكلمة السر بحيث لا يسألك بعدها

لا لم نفقد شيئا بفضل من الله ، ثم بجهد أخونا محمد قطان اللهم الا اذا كانت هناك مشاركات أضيفت عند لحظة التوقف تحديداً

تم اختراق المنتدي منذ يوين و نعتذر عن الرسائل الدعائية التي تم ارسالها للأعضاء كدعاية لموقعين و الله أعلم ان كان المخترق له علاقة بهذه المنتديات ام لا و لكن الهدف كان الدعاية لها سواء عن طريق البريد الذي تم ارسالها او نوافذ دعائية تظهر كلما تصفحت المنتدي و بفضل من الله ، ثم بجهد أخونا محمد قطان تم استعادة كامل البيانات نعتذر عن التوقف و أهلا بكم مرة أخري

السلام عليكم اعتقد ان السبب هو البروكسي الذي تتصل منه

ايضا احد الاخطاء الدارجة ، هو حفظ الملفات بامتداد dot و ليس doc فلا تظهر عند محاولة فتح الملف من قائمة File open باعداداته الافتراضية و للتأكد من ذلك عند اختيار file open او ملف - فتح اختار بدلا من ملفات الوورد فى مربع الحوار الاسفل All files

السلام عليكم جزاك الله خيرا جاري الان الترقية للنسخة الاخيرة من المنتدي و هي اخر الاصدرات التي اصدرتها الشركة و بالنسبة للخط اعتقد انه الان مناسب و اذا لديكم ملاحظات اخري نرجو اضافتها فى هذا الموضوع بالنسبة للنسخة ستجدوا فيها اضافات كثيرة اهمها ان مشكلة حفظ الصفحات قد انتهت و الان يمكن حفظ اي مواضيع فى صورة ملف وورد و ذلك باختيار تنزيل الموضوع من قائمة خيارات

الي حد ما التنسيق لن يتغير اذا كانت البيانات حجمها ثابث من الوان و اطارات و خلافه اما عن عرض الخلايا فأعتقد أنه سيتغير مع كل تحديث للبيانات

سبب ظهور العلامة هو أن الخلايا التي تحسب المعادلة بناء عليها ليست خالية و لكن بها معلومة و هي علامة المسافة الفاضية space جري تحرير الخلية و اخلاؤها ستجد العلامة اختفت

السلام عليكم أخي الكريم صراحة بالنسبة لي كانت التصفية العادية تؤدي ما احتاج بنجاح عن طريق عمل تصفية علي اكثر من عمود فى نفس الوقت و اراه حل عملي جدا و ايضا التصفية في الجداول المحورية تناسب العديد من الاحتياجات ( عمل جدول محوري pivot table) ثم عمل تصفية داخله بالاختيار من القائمة المنسدلة و ايضا هناك التصفية المتقدمة التي تجري مناقشتها الان فى موضوع مستقل رجاء توضيح ما الذي تريد عمله بالكود و لا يمكن عمله بالامكانيات الجاهزة للاكسيل

تأكد من أن الماكرو لديك مفعل Tools Macro security level Medium أو Low جربت الملف و يعمل معي و المفترض ان يعمل علي النسخة العربية ايضا انزل الملف المرفق و تنقل بين ورقتي العمل و اخبرنا ماذا يحدث فان لم يعمل بعد التأكد من تفعيل الماكرو فقم يتسجيل ماكرو جديد عن طريق التسجيل و قم بحذف ال Toolbars ثم اوقف التسجيل ثم اختار تحرير الماكرو و انظر كيف تم تسجيل أسماء الادوات و اخيرنا

مرفق المثال بعد التعديل و ملاحظ اختلاف النتائج Pivot2.rar