طارق محمود

السلام عليكم أخي العزيز إبدأ أولا بالبحث قد تجد ماتريد أو أكثر حتي مما تريد أنظر مثلا هذا الموضوع http://www.officena.net/ib/index.php?showtopic=54120&hl=%D8%B1%D8%BA%D8%A8%D8%A9 أو هذا http://www.officena.net/ib/index.php?showtopic=54109&hl=%D8%B1%D8%BA%D8%A8%D8%A9 أو هذا http://www.officena.net/ib/index.php?showtopic=55479&hl=%D8%B1%D8%BA%D8%A8%D8%A9#entry351050

السلام عليكم أخي العزيزلديك أكثر من حل 1 - يمكنك طباعة الجدول PDF ثم إرسال المطبوع (الملف PDF ) 2- يمكنك فصل الجدول عن الملف في شيت منفصل ثم نسخ أو قص الشيت بالكامل لملف جديد إكسل ليس به إلا هذا الشيت وبالطبع سيكون الشيت متصل بالبيانات الأصلية Hyperlink ثم ترسل ذلك الملف الجديد

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

السلام عليكم تفضل أخي الملف وقد أضفت بعض الأسماء والفصول الأخري Aziz002.rar

السلام عليكم أخي العزيز ضع الكود التالي في أي ملف إكسل علي الجهاز وسوف يفعل ماتريد Sub pdf_Move() Dim myFile As String pt = "c:\A\" myFile = Dir(pt) Do While myFile <> "" If Right(myFile, 4) = ".pdf" Then Name "c:\A\" & myFile As "d:\A\" & myFile myFile = Dir() Loop End Sub

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

السلام عليكم أخي العزيز ddd تخبر الاكسل أنك تريد اليوم بالتنسيق العادي (الشائع : الإنجليزي) Saturday, Sunday,... أما إن كنت تريد غير الإنجليزية فلابد من أن تسبق التنسيق ببادئة يكون لها علاقة بكود صفحة اللغة التي تريدها مثلا B2ddd للتنسيق بالعربية (السبت - الأحد -... وهذه للتنسيق بالهندي (शनि. , रवि. , सोम. , मंगल. , बुध. , गुरु. , शुक्र.) [$-4010439]ddd وهذه للتنسيق بلغة الأفريكانو ( Sat , Son , Maan , Dins , Woen , Dond , Vry) [$-436]ddd

السلام عليكم أخي الحبيب محمد الريفى فعلا الحل بواسطة ال solverجميل ولكنه كما أشار الأخ السائل ينتج حلا واحدا وهو يريد الإحتمالات المتعددة الممكنة ========================== أخي / مدحت تفضل المرفق به جزء كبير من الحل مازال الكود يحتاج مراجعة وتدقيق لأن النتائج ليست دقيقة وليست كل الإحتمالات ولن أكون جاهز لمشاركة أخري قبل عدة أيام سأرفع الملف لمن أراد أن يتم العمل وسأكون له شاكرا تفضل المرفق Invoice2.rar

السلام عليكم أخي العزيز ضع الشرط التالي في التنسيق الشرطي =AND(E3=E4,E3<>E2) تفضل المرفق دالة تظليل2.rar

بالأكواد ولكني لست جاهزا لهذا الآن إذا لم يتدخل أحد الإخوة سأحاول فيها غدا

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

السلام عليكم تفضل أخي الملف به ماطلبت فاتورة2.rar

إضغط الملف أي اعمل منه نسخة مضغوطة باستخدام winrar أو winzip مثلا وارفع النسخة المضغوطة

السلام عليكم أخي العزيز اولا عدلت لك العنوان ، أرجو الالتزام بقواعد المشاركة مستقبلا ثانيا لايوجد مرفق ، لكني كونت لك هذا المرفق لعله يفي بالغرض تفضل عمل الأسعار.rar

السلام عليكم أخي العزيز استخدم في التنسيقات المخصصة التنسيق B2ddd;@ أو انظر المرفق Arabic Days.rar

السلام عليكم يمكنك استخدام المدي الديناميكي لاستبدال الفورميلا الطويلة بأقصر منها مثلا =IF(AND(BB,MID(L8,1,2) ... بدلا من =IF(AND(MID(D22,1,2)="MH",MID(L8,1,2) .... بعد تعريفك للمتغير BB بنفس المعامل وهذا أيضا يسهل عليك الإنشاء للمعادلة وعلي غيرك تتبع المنطق فيها الفيصل هو طول الفورميلا وليس عدد الشروط أنظر المرفق وأكمل أنت IF Function2.rar

إخواني الأحباب محمد لطفى ابو القبطان abu_mosaab =============== جزاكم الله خيرا وشاكر جدا مروركم الطيب وكلماتكم الرقيقة ودعاؤكم الصالح ، لكم مثله وأكثر إن شاء الله

السلام عليكم أخي العزيز تفضل المرفق به ماطلبت فقط اضغط الزر "ترحيل وطباعة" TRHIL&PRINT2.rar

السلام عليكم عندك حق فقط إلغي اللينك أو تفضل الملف مضبوط بالمرفق N Excel3.rar

السلام عليكم أهلا ومرحبا أخي الكريم الموضوع بسيط وميسر بإذن الله (مجاني) إبدأ أولا بالبحث والإطلاع في هذا المنتدي وإليك بعض الروابط لدورات أو مواضيع ذات صلة وستجد غيرها الكثير بالبحث إن شاء الله http://www.officena.net/ib/index.php?showtopic=39323 http://www.officena.net/ib/index.php?showtopic=29207&hl=%D8%AF%D9%88%D8%B1%D8%A9 http://www.officena.net/ib/index.php?showtopic=33308

السلام عليكم وضعت من عندي بعض البيانات الافتراضية أكثر من 200 إسم وطبعا ستزيد مدة التنفيذ إذا كانت الأعداد كبيرة تفضل أخي الملف به المطلوب N Excel2.rar

السلام عليكم أخي العزيز / عبد الرحمن =============== لو ترسل الملف به بيانات ولو غير حقيقية ليسهل علينا تخيل المعالجة للملف من حيث الأصناف واكوادها ورصيد اول المدة والسعر الحالي يعني إملأ بعض البيانات وأعد إرسال الملف

السلام عليكم أخي العزيز عدلت قليلا علي الملف وباستخدام كود صغير في حدث الورقة والذي يتم تفعيله أوتوماتيكيا مع النقر مرتين (دبل كليك) Double Click علي الخلايا المقصودة بمعني أنك إنقرت مرتين بالماوس علي أي من خلايا ساعة الدخول أو ساعة الخروج سيتم تسجيل وقت نفس اللحظة في الخلية التي تقف عندها ولن يحدث هذا إلا عند خلايا ساعة الدخول أو ساعة الخروج هذا هو الكود c = Target.Column r = Target.Row LR = [C9999].End(xlUp).Row If c <> 5 And c <> 7 Then Exit Sub If r < 4 And r > LR Then Exit Sub Target.Value = Time تفضل الملف eee2.rar

السلام عليكم أخي الكريم "كونك محتاج لترقيم صف المجاميع" طبعايمكنك عمل تعديل الشرط ليكون علي خلايا بها بيانات مثل C أو D . بالنسبة لترقيم صف المجاميع تستطيع ان تجعله نصف Auto بخطوات قليلة أولا تنشط الفلتر كما فعلت وتختار صفوف المجاميع (مثلا من أعمدة بها بيانات مثل C أو D ، تختار الفارغ) ثانيا تقف علي أول خلية في صفوف المجاميع وفي حالتنا هذه هي A12 وتكتب فيها يدويا : =A11 أي تساوي ماتعلوها ثم تعلم (تظلل) الخلايا المشابهة [A12:A29] "وأنت مازلت في حالة الفلتر" وأخيرا إضغط Ctrl-D هذا الأمر ينسخ الخلايا الظاهرة فقط

لايوجد ملف مرفق