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

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

سماع الصوت عند مرور الماوس على صورة بور بوينت

أليك أخى الشرح المطلوب وأرجو أن أكون وفقت به تقبل : تحياتى شرح إظهار صورة بالرقم الوظيفى.rar

أستكمالا لسلسلة ماتستطيعة المعادلة مثلها مثل الكود هذه معادلة تبدو فى ظاهرها عادية ولكن فوائدها كبيرة جدا من حيث أنها تقوم بفصل الأسماء والأرقام ووضعها فى عمود مستقل مهما كان طول الأسم والرقم معتمدة فى ذلك على ( الفراغ(" ")مابين الأسماء وبعضها أو( ";") أو ("-" )أوالكومة (",") .......الخ ) وبهذا تكون هذه المعادلة بكل المقاييس ذات فائدة عظيمة لكل من يطلب مثل هذا الفصل وهم كثروا. ألى المعادلة متمنيا أن تكون ذات فائدة لكل من عانى من فصل الأسم أو الرقم أوفصل خليط من الأرقام والأسماء إخوتى وزملائى المرفق الثانى يتضمن مزيدا من الشروط وكيفية تغيير شرط المعادلة لتقوم بطرق الفصل بشروط مختلفة معادلة تقوم بفصل كل ماتريد.rar معادلة تقوم بفصل كل ماتريد 2.rar

بمناسبة العام الدراسى والحاجة الماسة للمدرسيين لحساب سن تلاميذهم سواء بالرقم القومى أو تاريخ الميلاد ، جرب هذا البرنامج سيسهل لك الكثير وستجد به سهولة ويسر فى الأستحدام إن شاء المولى تقبلوا تحيات : أخيكم تم حذف النسخة السابقة لفتح الشيت للأستفادة من المعادلات وكان هناك خطأ فى تنسق أرقام التسلسل برنامج حساب السن بتارخ الميلاد أو الرقم القومى-.rar

أستمرارا لعبقرية المعادلة هذه المعادلة تقوم بفصل ماتريد من الموضع الذى تريدة عن طريق رقم الكلمة فى العبارة ( الرقم الموجود فى نهاية المعادلة ) جرب وأبتعد عن الأكواد قليلا حدد ماتريد فصلة عن طريق رقم.rar

السؤال 60: ما نتيجة جعل ابتعاد حدود الصفحة عن حدود النص بنفس مسافة ابتعاد حدود النص عن حافة الصفحة؟ والسلام عليكم

السلام غليكم كيف يمكن ادراج كود لزر يتم من خلاله حذف السطور داخل جدول

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

عندي في المصنف كود للتاريخ يظهر في حالة كتابة في الخلية .B يظهر التاريخ في الخلية A تاريخ الحالي . المشكلة هي : عندما أسوي للشيت كلمة المرور لحماية الورقة من العبث لا يعمل الكود كيف أسوي الأن وهذا هو الكود Private Sub Worksheet_Change(ByVal Target As Range) If Target.Cells.Count > 1 Then Exit Sub On Error Resume Next ActiveSheet.Unprotect If Not Intersect(Target, Range("b1:b60000")) Is Nothing Then VBA.Calendar = vbCalGreg If IsEmpty(Target) Then Target(1, 2).Offset(0, -2).ClearContents Else With Target(1, 2).Offset(0, -2) .Value = Date .EntireColumn.AutoFit End With End If End If ActiveSheet.Protect DrawingObjects:=False, Contents:=True, Scenarios:=False End Sub

السادة الأفاضل عملت سجل دخول و خروج سيارات مطلوب تحديد الوقت و التاريخ لحظة الدخول و الخروج أستخدمت معادلات كتيرة فى الوقت و التاريخ كالتالى :- =Now() قمت بتغيير الفورمات الخاص بالناتج الذى يخرج من المعادلة السابقة ليكون 30/11/2013 19:45 عملت ستة معادلات أخرى كالتالى :- =year($A$2) =Month($A$2) =Day($A$2) =Hour($A$2) =Minute($A$2) =Second($A$2) و ذلك لتثبيت الوقت و التاريخ المشكلة عند عمل Duble Clicke و Save يتم تحديث الوقت و التاريخ تلقائياً محتاج حل لهذه المشكلة أفادكم الله

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

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

السلام عليكم جميعا بحث كثيرا عن حل هذه المشكلة في اغلب المشاركات من الاخوة والاخوات المميزين والموهوبين بدون ذكر اسماء حسب القوانين ولكن لم اوفق للاسف تتلخص المشكله في : 1- كيفية تعديل حقول التقرير على اختلاف اعدادها لتملء عرض الصفحة حيث تكبر وتصغر تلقائيا ولكن لتملء عرض الصفحة من اقصاها الى اقصاها . 2- مراعاة التمدد والتقلص التلقائي لكل حقل حسب مايحتويه ( خاصية قابل للنمو وقابل للتقلص " تنسيق") ارفقت مشروع لاحد الاخوة الكرام وصلى الله على نبينا محمد افضل الخلق والسلام عليكم ورحمة الله report_bild2000A.rar

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

السلام عليكم ورحمة الله تعالى وبركاته لدي اصدار أوفيس 2010 لكن أواجه مشكلة في الـvpa لا يدعم اللغة العربية فماهو الحل

مشكور اخي عطاء الله تم الحل

أخي وصديقي أبو رجاء السلام عليكم أنا ما غيرت المعادلة - سألت هل يتكرر الرقم من مجموعة إلى مجموعة فإن يتكرر بمعمال قوة مختلف فهذا التناقض وإن كان ليس كذلك فعند إنتهائك من جدول معامل القوى قم بعملية العكس - حسب حالة الملف ممكن ببرنامج ممكن باكواد .......إلخ تقبل تحياتي

أرسلي الملف فقط بشرط أي يكون الملف لك

الأخ الكريم/ تيبازي السلام عليكم ورحمة الله وبركاته المرفق يفتح إختصار برنامج وورد 2007 علي سطح المكتب - قم بتغييره حسب الرغبة تقبل تحياتي ملحوظة : أرفقت مثال آخر لفتح ملف تنفيذي خارجي - لعدم تأكدي من طلبك بالتحديد Book1-Open desktop Shortcut.rar Book1-Open External Program.rar

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

أستاذنا الكبير/عبدالله باقشير السلام عليكم ورحمة الله وبركاته شاركت في الموضوع بغرض إقناع أخونا/ modi basha بأن الكود هو الحل وقد بدأت في تجهيز function مناسب لطلبه - ولكن بعد إرفاقكم للكود ( إنتهي الأمر ) قمة الإحترافية - وجزاكم الله كل خير

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

شاهد المرفق 2010 معادلة جمع معرفة جديدة.rar

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

السلام عليكم ما دمت ما زلت تعتقد ان المعادلة المعمولة بالكود ستحل مشكلتك تم عمل معادلة الصفيف kh_SumIf اضغط F2 لتحرير الصيغة ثم اضغط CTRL+SHIFT+ENTER بامكانية استخدام شرط او اكثر بحد اقصي 254 شرطا Option Explicit '============================================= '============================================= Function kh_SumIf(SumRange As Range, ParamArray Condition1() As Variant) As Double Dim Sm As Double Dim x As Integer, xx As Integer, xxx As Integer Dim iCont As Long, i As Long xx = UBound(Condition1) If xx = -1 Then GoTo kh_Err iCont = SumRange.Rows.Count For i = 1 To iCont xxx = 1 For x = 0 To xx xxx = xxx * IIf(CBool(Condition1(x)(i, 1)), 1, 0) Next If xxx Then Sm = Sm + Val(SumRange.Cells(i, 1)) Next kh_SumIf = Sm kh_Err: End Function جربها تحياتي

أخي أبو رجاء لم أنتبه إلى طلبك أعذرني تفضل المطلوب تقبل تحياتي رقم القوة1.rar

تم تعديل الرابط لخطأ فى معادلة جلب الأسماء وذلك لخطأ فى رقم الصف فى المعادلة مع إضافة إمكانية إخفاء عمود ( الرقم القومى ) أثناء الطباعة برنامج حساب السن بتارخ الميلاد أو الرقم القومى- 2.rar

لقد كتبت معادلة قبل ذلك ليتم فصل الأسم فيها عن طريق رقم وكانت طويلة نسبيا ، ومنذ فترة وأنا أحاول إيجاد البديل لها ، لعلمى لحاجة الكثيرين على مستوى العالم العربى لها إلا أن وفقنى ربى لهذه المعادلة وأتمنى أن تكون بديلا جيدا عن الكود لبساطتها وإمكانياتها الكبيرة فصل الأسماء.rar

عفوا أخى الغالى ( Hesham Rayan ) لم ألحظ الأميل إلا الأن لكثرة إنشغالى فأليك البرنامج لعله المطلوب عفوا أخى نظرا لكبر حجم الملف تم تقسيمة إلى جزئيين ومن ثم سيتم وضعهم معا ثم يتم فك الضغط عنهم تقبل تحيات : أخيك شئون الموظفيين الادارة الهندسية.part1.rar شئون الموظفيين الادارة الهندسية.part2.rar

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

الاخ الكريم / galal elgammal بارك الله فيك مرور طيب وكريم وعلي فكرة اعجبني جدا توقيعك بخصوصو المنتدي " منتدى اوفيسنا ايقونة كسرت حواجز الزمن و المكان " تقبل خالص تحياتي

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

السلام عليكم أخي أبو رجا لم أنتبه إلى تدخلك إلي في هذه الدقيقة تفضل المطلوب كما فهكتك والله أعلى وأعلم ملاحظة( أظفت بعض الأرقام لتجريب) جرب وأخبرني تقبل تحياتي strong.rar

بارك الله فيك اخي الكريم // جلال وجزاك خيرا علي مرورك الكريم ودعائك الطيب تقبل تحياتي

اخي أبو رجاء أنا جربت الملف ويعمل بصورة جيدة لكن ربما انك لم تكرر الرقم كرر الرقم مرتين في الجدول الأول وأن يكون متكون من رقم صحيح وخمسة ارقام عشرية

أليك أخى ماطلبت وتعتبر من روائع المعادلات وهناك صيغة أوجدتها للفرز والدمج معا فى معادلة واحدة ولكن وجدت حجمها كبر منى نسبيا ففضلت الأنتظار عليها حتى أقوم بتصغير حجمها قليلا تقبل تحيات : أخيك فرز ودمج الخلايا باستخدام صيغة صفيف.rar

أخى الحبيب ( محمود) بالنسبة للمعادلة الموجودة فى أخر مرفق لى قمت برفعة (vlookup مع أربع شروط ) هى معادلة صفيف وهنا نترك هذه الملحوظة الأن لأننا سوف نعود لها فى الشرح أولا - سبق وأن أوضحت لحضرتك مكون دالة ( vlookup ) وهى (table _array;lookup - value;col_index;range_lookup ) أى معادلة لابد لكى تحقق القيمة المطلوبة لابد وأن تقوم بجلبة تلك الشروط ونظرا لأن المعادلة التى نحن بصددها معادلة ( صفيف ) أى تتعامل مع عدد من البيانات سواء عمود أوجدول فهى تقوم بتوليد مجموعة من البيانات وتقوم بمقارنتها بالشرط المطلوب فإذا لم يصادفة فى المدى يعود بالقيمة ( false ) أو ( 0 ) أما إدا وجده ضمن المدى فيعود بالقيمة ( true ) أو (1) وهكذا ....... دعنا الأن نعود إلى الدالة التى نحن بصدد شرحها ودعنا نرى شكلها ومحتواها الداخلى وفقا لهذا التحليل: ستجدها كالأتى: =VLOOKUP($F$1;IF(({"Omar Effendi";"Sednawy";"Shamla";"Mahalla El Kobra"}=$F$1)*({"Medium";"Large";"Medium";"Large"}=$H$1)*({"men";"women";"baby";"men"}=$I$1);$A$2:$E$5;"");5;FALSE) وهذا الشكل يوضح ماقمت بإيضاحة فالنمسك الشرط الأول عل سبيل المثال تجد إننى عندما قمت بإختيار مثلا محل ( شملا ) فقد ولدت صفيف محتواة (عمر أفندى، صيدناوى،شملا، المحلة الكبرى ) ونظرا لأن الشرط الذى إخترتة من القائمة المنسدلة هو ( شملا ) ستجد أنه عندما تقابل أى شرط داخل الصفيف غير ماقمت بإختيارة ستعطى ("" ) إلى أن تقابل شملا فتعطى (1) أى سيكون الصفيف هكذا { ""; "Shamla"; ""; ""} فيعطى ( true ) أولايصادف أى قيمة ويكون { ""; ""; ""; ""} ويعطى ( false ) وهكذا بالنسبة لباقى الشروط وأرجو أن يكون التوضيح به شئ يفيدك تقبل تحيات : أخيك

ماهو الكود الواجب في هذه الحالة وهو تحريك الصورة Nouveau dossier.rar

رغم إنى مش فاهم المشكلة وطبيعتها إلا إننا لو أردنا إزالة العلامات بين الفراغات وإحلالها بما نريد وليكن فى حالتك إضافة الفراغ إستحدم هذه المعادلة =TRIM(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A2;"/";" ");".";" ");"_";" ")) تعريف أسم.rar

للمعادلة مذاق رائع عندما تحقق لك ماتريد فهل توقعت أن تقوم المعادلة بهذا الأبهار أنظر معى للمرفق ستجد أنكل هذا تم بالمعادلة فقط أبحث بطرق مختلفة.rar

أخى الحبيب ( أبو_حنين ) شكرا أخى على مرورك وكلماتك ، وجزاك الله عنى خير الجزاء ولكن أخى الغرض من عمل هذا الملف كان العديد من الأسباب: 1- أن نبتعد عن عمل الكود عن طريق تبسيط المعادلة 2- أن أحقق مايعانية البعض منا من أخطاء أثناء الكتابة فى عمود فنحطأ ونكتب فى العمود المجاور له 3- ليس الغرض من الملف عدم حذف ماتم كتابتة ولكن عدم الخطأ فى الكتابة لأن عند غلق الملف ( locked ) لاتستطيع الكتابة فى هذا العمود إلا بعد فتحة أرجو أن أكون وصلت الفكرة تقبل تحياتى

لازال أخى تكتب المعادلة خطأ أكتب ( IFERROR ) وليس ( IFERORR ) =IFERROR(INDEX($A$2:$A$23;MATCH(SMALL(IF((COUNTIF($F$1:F1;$A$2:$A$23)+COUNTIF($D$2:$D$26;$A$2:$A$23))=0;COUNTIF($A$2:$A$23;"<"&$A$2:$A$23));1);COUNTIF($A$2:$A$23;"<"&$A$2:$A$23);0));"") ولاتنسى الضغط على ( CTRL+SHIFT+ENTER ) معا لتكوين تلك الأقواس ( { } ) فى بداية ونهاية المعادلة لابد من تكوين تلك الأقواس بالضغط على المفاتيح السابقة معا ، ولاتكتبها يدويا والمعادلة تصلح لأوفيس ( 2007 ) ومابعدها تقبل تحياتى

شكر وتقدير لك أخي فعلا عمل رائع ومميز زادك الله علما وتوفيقا.

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

وهذه طريقة بالمعادلات فى الخلية( B1 ) وأسحبها إلى أخر الأعمدة =INDEX(عمود!$F:$F;(INT((COLUMNS($A$2:A2)-COLUMNS($A$2))))+7;COLUMN($A$1:A1)) فى الخلية ( B2 ) وأسحبها إلى أخر الأعمدة =INDEX(عمود!$H:$H;(INT((COLUMNS($A$2:A3)-COLUMNS($A$2))))+7;COLUMN($A$1:A2)) تقبل تحيات : أخيك

هذا مثال بسيط وواضح ( جدول ، نموذج ، وحدة نمطية ) يتم فيه ادراج صورة مع امكانية الحذف والاستبدال الامثلة المحكمة افضل وأيسر وأصح وسيلة للشرح . ادراج وحذف صورة.rar

أختى الغالية جربى هذه المعادلة وهى معادلة صفيف =IF(COUNTA(A1:A16)=0;"";INDEX(A1:A16;MIN(IF(A1:A16="";99^99;ROW(A1:A16)))-ROW(A1:A16)+1;1)) وهذه لأول خلية فى عمود أما أول خلية فى صف هى نفس المعادلة ولكن يتم تغيير فيها كلمة ( row ) إلى ( column ) ولاتنسى حضرتك أن المعادلاتان معادلتا صفيف ، أى تقفى حضرتك فى نهاية المعادلة بعد كتابتها ويتم الضغط على ( ctrl +shift+enter ) معا

أخى الحبيب (طارق ) للحصول على أخر رقم فى العمود أستخدم هذه المعادلة =LOOKUP(2;1/($M$7:$M$1000<>"");$M$7:$M$1000) أما البحث فى نفس الصفحة بين تاريخين لابد من إستخدام كود ، أما عن طريق المعادلات لابد من قائمة منفصلة تقبل تحياتى

وعليكم السلام ورحمة الله وبركاته نعم يمكن ذلك وجدت لك مثالا بهذا الخصوص فانظر اليه photos.rar