نجوم المشاركات

سلامى على اساتذتنا الاجلاء الحاضرين والغائبين حبيت بس اقدم حاجة مبسطة للمبتدئين فى كتابة الاكواد تيسر شوية عليهم عناء كتابة جمل sql داخل محرر الفيجوال بيسك برنامج صغير اسمه SQl to VBA converter يا ريت ينال اعجابكم طبعا انت بتاخد جملة الاستعلام وتحطها فيه وهو بيحولهالك للكود بكل بساطة والبرنامج استخدامه سهل مش محتاج شرح وهو موجود فى المرفقات SQL to VBA.rar

السلام عليكم ورحمة الله و بركاته أنا مستخدم جديد للأوتلوك وعندي سؤالين لاهل الخبرة س1/ عند القيام بإرسال رسالة لاي شخص مثلا aaa@gmail.com يقوم الاوتلوك بحفظ الايميل ، فاول ما اقوم بإرسال رسالة اخرى لشخص أخر يبدأ ب حرف a يظهر الايميل السابق و انا لا اريده ان يظهر اريد اخفاء او حذف بعض الايميلات نهائيا ؟ س2/ كيف اجعل الاوتلوك أن يفرز الرسائل المستلمة و المرسلة حسب الايميل المستلم او المرسل الى مجلدات مخصصه ؟ وشكرا

السلام عليكم جرب المعادلة التالية =IF(TODAY()>DATE(YEAR(TODAY());9;1);YEAR(TODAY())&"-"&YEAR(TODAY())+1;YEAR(TODAY())-1&"-"&YEAR(TODAY())) تحياتي

السلام عليكم الاخ الكريم / البروفسير بارك الله فيك دائما ردودك جميلة وتعجبني طريقة تسهيلك للكود لصاحب السؤال وللعلم انا متابع لردودك ... وان شاء الله بك اكتسب المنتدي عضوا مميزا رائعا تقبل خالص تحياتي

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

السلام عليكم سألني أخي العزيز /أبوحنين علي الخاص السؤال التالي وقد رأيت أن الإجابة قد تفيد الإخوة ممن يتصفحوا الموضوع ففضلت أن أضع الإجابة هنا لإرفاق الملف ليس هناك تعديل أنت بالفعل قد قمت بكل ذلك وأرسلته لي عالإميل لو تذكر أنا جربت الكود بعد إضافة الأمر السابق (باللون الأصفر) جربته علي الشيت 1 والشيت 2 كله تمام حفظته لك بصيغة xlsb لتوفير بعض من حجمه الكبير ومازلت أري كما يري أخي بن علية أنه لاداعي أبدا لمثل هذا التكرار فالبيانات واحدة موجودة في شيت Inbut data فلاداعي أبدا للشيت CARD ولاللشيتات من 2 إلي 12 ولاللشهور داخل الشيت 1 فيما عدا أول شهر فقط يمكنك ، يكفيك فقط أن تستقر علي شكل الطباعة وتحفظ بها وحتي إذا كان كل ذلك مهم الإحتفاظ به ، فليس من المهم الإحتفاظ بالمعادلات التي تجعل حجم الملف 18 ميجا وإذا كان مهما الإحتفاظ بالمعادلات فلاتجعلها في نفس الملف ممكن في ملف آخر مثلا سهل الأمور علي نفسك لتوفر وقتك ووقت من يريد المشاركة علي أية حال هذا رابط للملف لأن حجمه اكبر من المسموح بالمنتدي http://www.4shared.com/rar/5Tu4LFQ-/TIME_SHEET_KLABSHA_6.html

امييييييييييييييييييييييييييييييييييين يكفينى هذا والله .. انها اجمل هدية . ولك مثلها اخي

تسلم ايديك --------- اشكرك يابروفسير ------- ارجو من الله ان يظلك بظله يوم لا ظل الا ظله وان يحشرك مع الحبيب المصطفي صلي الله عليه وسلم لا استطيع ان اقدم لك غير ذلك

اضفت تنبيه يظهر بعد اكتمال العملية .. وز لتنفذ منه الكود اضفت لك تعليقات فى الكود يمكنك رؤيتها بالضغط على alt + f11 ويمكن تغيير الخلية a1 الى اي خلية بتغييرها فى الكود اولا . فى هذا السطر strFindMe = Worksheets("Sheet1").Range("A1").Value اتمنى ان يكون هذا المطلوب . ان شاء الله تقبل وافر تحياتى واحترامي . prof.rar

وهذا تعديل لكود الاخ البروفيسر لحذف كافة الأوراق ماعدا المسماه "prof" غيره الى اسم الورقة التي لاتريد حذها Sub Hideallsheets() 'حذف كل الشيتات Dim sh As Object For Each sh In ActiveWorkbook.Sheets If sh.Name <> "prof" Then 'sh.Visible = xlSheetHidden '******* Application.DisplayAlerts = 0 sh.Delete Application.DisplayAlerts = 1 '******* End If Next End Sub

الاخ / الشهابى الاخ / شوقى ربيع استاذنا الفاضل / دغيدى الاخ / sherief الاخ / سعد عابد الاخ / البروفسير الاخ / عباد الاخ / ابراهيم ابوليله الاخ / قنديل الصياد شكرا للجميع واسف لتأخرى فى الرد وعقبال كل مشتاق ان شاء الله واتمنى الا اكون نسيت احد وشكرا لمن قام بتثبيت الموضوع وربنا يجزيكم خير وان شاء الله سادعوا للجميع ولشعب مصر وباقى الشعوب الاسلاميه بالخير

السلام عليكم ورحمة الله وبركاته أساتذتي وزملائي أقدم لكم نموزج لكشف حساب تم عمل به بعض الفنيات وهذا كله بفضل الله تعالي ثم أساتذتي في المنتدي الملف يحتوي علي ورقتين الأولي يتم التسجيل بداخلها كل حركة والثاني لو تريد إستدعاء جزء من كشف الحساب في الورقة الأولي أو معرفة الحركة بين تاريخين معينين الملف به أفكار كثيرة وهو إخفاء الأعمدة والصفوف داخل كشف الحساب وتظهر عند كتابة التاريخ في السطر وغيرة من الأفكار أرجو أن تعم الإستفادة منه إن شاء الله أخوك / أحمد فؤاد كشف الحساب بالمعادلات.rar