البحث في الموقع
Showing results for tags 'ترحيل'.
تم العثور علي 96 نتائج
-
السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء والاساتذة الافاضل جزاكم الله خيرا الملف المرفق فيه معادلة صفيف لجلب اسماء الطلبة من ورقة البيانات الاساسية الى ورقة الدرجات بدون فراغات حيث الاسماء في ورقة البيانات الاساسية يوجد فيها فراغات بين فصل واخر والمعادلة كانت تعمل بشكل ممتاز لجلب اسماء الطلبة بدون فراغات لكن قمت بتنسيق وتعديل الاوراق فاختلفت البيانات وغيرت كثيرا في المعادلة ولم تعطي نتائج صحيحة ولا اعرف اين الخطا في المعادلة ارجو ابداء المساعدة بتصحيح المعادلة او معادلة بديلة او كود يقوم بنفس الغرض بارك الله فيكم واثابكم واعانكم لعمل الخير تقبلوا فائق احترامي وتقديري ترحيل البيانات.rar -
السلام عليكم ورحمة الله وبركاته اخوتى فى الله أطلب مساعدة فى ترحيل إضافة وتعديل الى قاعدة بيانات. المطلوب:- 1- ادخال بيانات موظف جديد وترحيله الى شيت قاعدة البيانات . 2- عند إضافة أو تعديل أى بيانات للموظف مثل اجازة سنوية او غياب مثلا فى خلية E8 يرحل الى الخلايا المخصصة له فى شيت قاعدة البيانات بحيث لا يضر بالاجازة السابقة. مثلا تم ادخال اجازة سنوية لاول مرة بتاريخ 2014/01/07 حتى 2014/01/08 فى الخلايا EV4 & EW4 فى شيت قاعدة البيانات وعند اضافة تاريخ آخر لنفس الاجازة السنوية لنفس الموظف يرحل تلقائيا فى الخلايا EX4&EY4 وهكذا. الملف مرفوع على ميديافاير http://www.mediafire.com/?vwaue0u4vmyuq9n
-
عندا الضغط على زر ترحيل يتم الترحيل , ولاكن المشكله عند الضغط على زر الترحيل مرتين يتم ترحيل مرتين واذا ضغط زر الترحيل اكثر من مرة يتم الترحيل اكثر من مرة Copy of التصليحات2.rar
-
السلام عليكم ورحمة الله وبركاته المطلوب في الملف المرفق الترحيل بشرط قيمة متغيرة.rar
-
مرسل لسيادتكم ملف به شيت يحتوي على عمود به ترقيم معين يسمى محطات وعمود بجواره يطلق عليه منسوب وعمود اخر يسمى نسبة مئوية اريد ان اعمل ماكرو يقوم بنسخ للاعمدة الثلاثة بحيث يكون من بداية محطة معينة الى اخري ولكن ان تكون المحطات ظاهرة بالشكل الموجود فى الشيت التانى Book1.rar
-
السلام عليكم ورحمة الله وبركاته الاخوة الاعزاء والاساتذة الكرام جزاكم الله خيرا ارجو ابداء المساعدة لغرض ترحيل الطلبة المنقولين من ورقة ( الاسماء حسب الفصول) , ترحيلهم ومسح بياناتهم الى ورقة المنقولين من المدرسة والشرط وضعته في العمود ( U ) في ورقة ( الاسماء حسب الفصول) وهو كلمة ( نقل) فكل طالب امام اسمه كلمة نقل ترحيل بياناته وتمسح نهائيا من ورقة (الاسماء حسب الفصول ) دون ان تمسح المعادلات الموجودة في ورقة (الاسماء حسب الفصول )علما بان الفصول تحت بعض لكن بفاصل لكل 50 طالب اثابكم الله وزادكم من فضله علما وخيرا كثيرا تقبلوا فائق احترامي وتقديري قوائم المدرسة.rar
-
السلام عليكم ورحمة الله وبركاته الاساتذة الافاضل والاخوة الاعزاء جزاكم الله خيرا الملف المرفق فيه ورقة النتائج مع الشهادات والعشرة الاوائل وهو جاهز لمن يريد ان يعمل عليه فقط يقوم بتنزيل الدرجات كما موجود في الملف اما طلبي هو كود ترحيل الناجحين من ورقة النتائج الى مصنف اخر وهو الارشيف ويكون الترحيل تحت بعض مع مسح البيانات المرحلة من ورقة النتائج والابقاء على الراسبين ودور ثان في ورقة البيانات والحفاظ على تسلسلها كما هو ولكن بدون الفراغات التي تتركها البيانات التي تم ترحيلها الى الارشيف مع امكانية مسحها مستقبلا بعد انتفاء الحاجة منها بعد امتحانات الدور الثاني ولكم فائق الاحترام والتقدير النتائج مع الارشيف.rar
-
نرجوا من الأساتذة الكرام المساعدة في كود ترحيل بسيط بحيث عند ترحيل عامل جديد لا يمحي سابقه،بمعني نزيد العامل الجديد في السطر الذي يلي العامل السابق و الشكر مسبقا العمال.rar
-
السلام عليكم لدي ملف به عدد من الصفحات اريد تجميع خلايا معينة من الصفحات الاولى ونسخها الى شيت ( مصروفات السيارات ) وجدت الكود ده فعلا كود رائع واعطانى تحكم عالي جدا فى نقل ما اريد من الصفحات . المشكلة فيه انه ينسخ البيانات من اي صفحة على نفس خلايا صفحة ( مصروفات السيارات ) كل مرة ... حاولت استخدم كود .End(xlUp).Row بدون فائدة ده الكود ومحتاج انه ينسخ البيانات بدون ما يضعها على بعض .. فهل من حل ؟؟ Sub aaa() On Error Resume Next Dim ws As Worksheet For Each ws In Worksheets If ws.Name <> "مصروفات السيارات" And ws.Name <> "كشف حساب" And ws.Name <> "تقارير" Then Iarr = Array("H14", "c18", "B21", "B22", "B23", "B24", "B25", "E21", "E22", "E23", "E24", "E25", "E27", "F21", "F22", "F22", "F23", "F24", "F25", "C30", "B31", "B32", "B33", "B34", "C32", "C33", "C34", "D32", "D33", "D34", "B35", "B35", "C35", "D35", "I37", "B61", "H31", "b27") Oarr = Array("f2", "c3", "B4", "B5", "B6", "B7", "B8", "c4", "c5", "c6", "c7", "c8", "c10", "d4", "d5", "d5", "d6", "d7", "d8", "C13", "B14", "B15", "B16", "B17", "C15", "C16", "C17", "D15", "D16", "D17", "B18", "B18", "C18", "D18", "I20", "B44", "H14", "b20") For i = LBound(Iarr) To UBound(Iarr) Sheets("مصروفات السيارات").Range(Oarr(i)).Value = Worksheets(ws.Name).Range(Iarr(i)) Next i End If Next ws End Sub
-
السلام عليكم ورحمة الله وبركاته أخوانى اريد شرح للطريقة التى تساعدنى على الترحيل التلقائى الى دفتر الاستاذ تلقائى فلدى 100 حساب استاذ فرعى . ارجو التوضيح بحيث يكون الترحيل كما فى الملف المرفق . ولكم جزيل الشكر
-
عفوا أريد ترحل كل البيانات التي في العمود : a-b-c الى الورقة8 وبعد الضغط على زر الترحل يمسح البيانات الملف مرفق . وشكر ترحيل.rar
-
أريد ترحيل البيانات مع التنسيقات والجداول في ورقة 2 حتى إذا كانت صفحة واحدة فيها بيانات يرحل لي صفحة واحدة وإذا كانت ثلاث صفحات فيها بيانات يرحل لي ثلاث صفحات ويكون الشيت 2 مرجع للصفحات التي تم ترحيلها الحركة.rar
-
اخوانى كل عام وانتم جميعا بخير وصحة وسعادة بمناسبة شهر رمضان الكريم من منكم يستطيع مساعدتى فى ترحيل بيانات من الشيت الاول الى الشيت الثانى فى هذا الملف المرفق ولكم منى خالص الحب والتقدير سند هام.rar
-
الاساتذة الافاضل والاخوة الاعزاء جزاكم الله خيرا وجدت كود للاستاذ العلامة عبد الله باقشير رعاه الله وزاده علما ومعرفة وحاولت ان اغير بعض حلقات الترحيل لكن خبرتي بالاكواد جدا قليله ارجو ابداء المساعدة الممكنة بتطوير الكود حسب حاجتي او كود جديد يقوم بترحيل الطلبة حسب الفصل والنتيجة اقصد الناجحون من طلبة الصف الاول في صفحة والراسبون في الصف الاول في صفحة ودور ثان للصف الاول في صفحة اخرى وهكذا لبقية الفصول وحسب النتائج مع الاحتفاظ بالتنسيق كاملا باستثناء تسلسل الطالب يبدا من (1) لجميع الاوراق والفصول عند الترحيل مع قابلية مسح الترحيل والاوراق التي فتحت للترحيل يعني ارجاع الشيت كما كان قبل الترحيل فقط ورقة رصد الدرجات(abbas) وتقبلوا دعواتي للجميع بالموفقية والنجاح والصحة والعافية دمتم في رعاية الله وحفظه الترحيل حسب الفصل والنتيجة.rar
-
الرجاء المساعده في إيجاد معادلة وليس كود يقوم بالترحيل لشيت أخر بدون ترك صفوف فارغه يوجد ملف مرفق للتوضيح وجزاكم الله خيراً ترحيل.rar
-
السلام عليكم ورحمة الله وبركاته أساتذتي الكرام حفظكم الله المطلوب كود يقوم بنقل البيانات من المدى A:S التي رصيدها صفر في العمود U إلي الصفحة المجاورة ومسح بياناتها من المصدر مع فرز بيانات المصدر للتخلص من الفراغات (وذلك حسب عمود Duty Date) وهكذا ستكون العملية في حالة تم تعديل بيانات أخرى وتم تصفير رصيدها (أي ان عملية البيانات في هذه الصفحة ستكون متغيرة حسب الحاجة مع الاحتفاظ بما تم ترحيله إلى الصفحة الاخرى وفق ترتيب الترحيل). والله الموفق أبو أنس نقل بيانات المدفوعات المسدده.rar هذا كود تسجيلي قمت باضافته لاحقاً وهو يحقق المطلوب هل هنالك ماهو أفضل منه: Sub ExportClearedPayment() ActiveSheet.Unprotect Sheets("Cleared Payment").Select ActiveSheet.Unprotect [A65536].End(xlUp).Offset(1, 0).Select Sheets("Payment").Select Selection.AutoFilter Field:=21, Criteria1:="0.00" Range("A5:S2000").Select Selection.Copy Sheets("Cleared Payment").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Sheets("Payment").Select Application.CutCopyMode = False Selection.ClearContents Selection.AutoFilter Field:=21 Selection.Sort Key1:=Range("F5"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Sheets("Payment").Protect , Sheets("Cleared Payment").Protect End Sub
-
السلام عليكم ورحمة الله وبركاته أساتذتي الكرام حفظكم الله المطلوب حفظكم الله مكون من جزئين الأول في هذه الصفحة MAIN والآخر في الصفحة الثانية TOTALS هذه صفحة رئيسية لادخال البيانات لكل العملاء المطلوب الأول هو أنشاء صفحات بالكود بعد الضغط على زر ترحيل تكون بأسم كل العملاء في العمود C كلاً له صفحة خاصة باسمه مع أستخلاص بياناته فقط من هنا وترحيلها إلى صفحته الخاصة(مع إضافة عنوان أعلى كل صفحة بنفس أسم العميل حسب ماهو موضح في صفحة الفورم للعميل الأول) والبيانات هنا تتغير بالأضافة باستمرار (أي كلما تم الضغط على زر الترحيل تتحدث البيانات لكل العملاء دفعة واحدة كلاً إلى صفحته) وعند إضافة عميل جديد يتم أنشاء صفحة جديدة بأسمه مع ترحيل بياناته وهكذا المطلوب الثاني في الصفحة الثانية TOTALS وإذا كان بالأمكان أنشاء ملفات مستقلة (عوضاً عن الصفحات) لكل عميل داخل نفس الفهرس الموجود فيه الملف الرئيسي (أو فهرس خاص) يكون أفضل !!! والله المستعان والموفق جزاكم الله كل خير أبو أنس ناصر حاجب EXPORT SHIPPMENT PLAN.rar -
السلام عليكم احتاج الى مساعدتكم بتعديل الكود التالي : Sub CopyPriceOver() If Range("A1").Value > Range("B1").Value Then Sheet1.Range("A1").Copy Sheet1.Range("B1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False Calculate Calculate ElseIf Range("A1").Value < Range("C1").Value Then Sheet1.Range("A1").Copy Sheet1.Range("C1").PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False Calculate Calculate End If Call ScheduleCopyPriceOver End Sub ما اريد عمله هو التالي اذا القيمة في الخلية A1 اكبر من القيمة في الخلية B1 فيقوم بنسخ القيمة من A1 الى B1 و اذا القيمة في الخلية A1 اصغر من القيمة في الخلية C1 فيقوم بنسخ القيمة من A1 الى C1 خلية A1 خلية متغيرة فالغرض من الكود هو استخراج اعلى قيمة سجلتها الخلية A1 واستخراج اصغر قيمة سجلتها الخلية A1 اريد الكود ان يقوم بتطبيق العملية على الخلايا A1:A100 فينظر بكل خلية من A1 الى A100 اذا اي خلية في A اكبر من الخلية B يقوم بنسخها الى B واذا اي خلية في A اصغر من الخلية C يقوم بنسخها الى C مثال للتوضيح فقط: نفترض ان الخلية A79 اكبر من الخلية B79 فيجب ان يقوم الكود بنسخ A79 الى B79 نفترض ان الخلية A88 اصغر من الخلية C88 يقوم بنسخ خلية A88 الى الخلية C88 نفترض ان الخلية A45 اصغر من الخلية B45 لا يقوم بالنسخ ولا بمسح الخلية B45 لانها اصغر من A45 وليست اكبر نفترض ان الخلية A99 تساوي B99 او C99 لا يقوم بعمل شي ولا يمسح B99 و C99 ياليت اجد منكم المساعدة ولكم مني جزيل الشكر Test.zip
-
السلام عليكم ورحمة الله وبركاته المطلوب أعزكم الله كود ترحيل بناءاً على اسم الحساب إلى كل صفحة على حدة علماُ أن كل صفحة تحمل أسم الحساب أبو أنس Bank Statment Balance.rar
-
الاساتذة المحترمين في المرفق فورم بحث واضافة مع فورم تعديل من اروع اعمال الاستاذ عبد الله باقشير ( وفقه الله ) وجدته في المنتدى وهو بحد ذاته تحفة حقيقية حاولت ان اضيف عليه زر لطباعة نتائج البحث ( طباعة نتائج البحث من الفورم مباشرة ) + زر لترحيل نتائج البحث الى ورقة محددة ولكنني فشلت رغم استعانتي بفورم مشابه ارجو مساعدتي في هذه الاضافات على الفورم حتى نستفيد ونتعلم المرفق موضح به طلبي اشكركم فورم بحث واضافة.rar -
بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته مبرووك عليكم الشهر الفضيل - جعلنا الله و اياكم من صوامه و قوامه المطلوب : لدي شيت فيها جدول المرتبات والمطلوب عند النقر المزدوج على أحد خلايا جدول المرتب ان يقوم بعمليات رياضية ( ضرب / طرح / جمع / قسمه ) لعدة خلايا في نفس الصف الذي تم النقر المزدوج عليه ثم يضع النتيجة في خليه محدده الملف المرفق مثال 1 اذا تم النقر المزدوج على الخلية D2 يقوم الكود بعمل التالي يجمع قيمة الخلية D2 مع الخلية E2 ثم يقوم بضرب الخلية D2 في الخلية F2 ثم يطرح ناتج الضرب من المجموع ثم يضع ناتج العملية في الخلية C8 مثال 2 اذا تم النقر المزدوج على الخلية C3 يقوم الكود بعمل التالي يجمع قيمة الخلية C3 مع الخلية E3 ثم يقوم بضرب الخلية C3 في الخلية F3 ثم يطرح ناتج الضرب من المجموع ثم يضع ناتج العملية في الخلية C8 شاكرا لكم و مقدرا تعبكم Book1.rar
