أبو سجده

بسم الله الرحمن الرحيم وبه نستعين اخوانى الافاضل السلام عليكم ورحمته الله وبركاته مع دمج الكودين الموضحين أمام حضراتكم وهما لآخى الحبيب الاستاذ الفاضل ياسر خليل ابو البراء حدث خلل فى عملية الترحيل الكود الاول Sub TransferMatchingData() Dim WS As Worksheet, SH As Worksheet Dim Cel As Range, Found As Range Set WS = Sheet1: Set SH = Sheet3 Application.ScreenUpdating = False On Error Resume Next For Each Cel In WS.Range("B8:B" & WS.Cells(Rows.Count, "B").End(xlUp).Row) Set Found = SH.Range("B:B").Find(What:=Cel.Value, LookIn:=xlValues, LookAt:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) If Not Found Is Nothing And Not IsEmpty(Cel.Value) Then Found.Offset(, 1).Resize(1, 2).Value = Cel.Offset(, 1).Resize(1, 2).Value End If Next Cel Application.ScreenUpdating = True End Sub الكود الثانى Sub TransferDataUsingFilterMethod() Dim WS As Worksheet, SH As Worksheet Dim LR As Long, LastRow As Long Dim X As Long, I As Long Set WS = Sheet1: Set SH = Sheet5 LR = WS.Cells(Rows.Count, 1).End(xlUp).Row LastRow = SH.Cells(Rows.Count, "D").End(xlUp).Row + 1 Application.ScreenUpdating = False With WS .AutoFilterMode = False .Range("A7:D7").AutoFilter Field:=3, Criteria1:="<>" & "" .Range("B8:D" & LR).SpecialCells(xlCellTypeVisible).Copy SH.Cells(LastRow, "D").PasteSpecial xlPasteValues SH.Cells(LastRow, "B").Value = WS.Range("B6").Value SH.Cells(LastRow, "C").Value = WS.Range("C3").Value .AutoFilterMode = False End With Application.CutCopyMode = False Application.ScreenUpdating = True MsgBox "Done...", vbInformation, "YasserKhalil" End Sub المطلوب بحول الله تعالى ترحيل عمود سعر الشراء بالعمودD بصفحة الوارد الى العمود F بالصفحة الرئيسية ترحيل كلا من التاريخ واسم المورد ورقم الفاتورة لمرة واحدة كما هو موضح بالمرفق بصفحة حركة الاصناف ترحيل الاعمدة من B الى العمود D من صفحة الوارد الى صفحة حركة الاصناف بالاعمدة من E الى G وافر تقديرى واحترامى وجزاكم الله خيرا ترحيل بيانات فاتورة.xlsb.rar

اخى الحبيب الغالى // ابو البراء السلام عليكم برجاء الاطلاع على المرفق السابق بالورقة " data " محتوى التذييل وهو فى الاصل يبدأ من الصف الثالث " بداية من الخلية B3 " مع ترحيل محتوى التذييل ليبدأ من الخلية A3 أو عمل توسيط له يحدث مشكلة فى إدراك التفقيط وعبارة " ماعدا السهو والخطأ " المدونون فى الموديول رقم 3 " فى غير محلهما بمقدار صفين لاسفل " حيث يتم إدراكهم بالصفوف 44 و 45 فهل يمكن التعديل على ادراكهم بالصفوف 42 و 43 مع عملية توسيط التذييل هذا نظرا لعدم إنسيابية المظهرالعام لبيان الاسعار عند طباعته معلشى تعبتك معايا محتسبا ماتقدمه إبتغاء مرضاة الله فى موازين حسناتكم وافر تقديرى واحترامى وجزاكم الله خيرا

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

بسم الله الرحمن الرحيم وبه نستعين السلام عليكم ورحمته الله وبركاته ودامت دياركم عامرة بنورالايمان وتقبل الله تعالى منا ومنكم صالح الاعمال إنه ولى ذلك والقادرعليه المرفق التالى يوضح المطلوب بحول الله تعالى تقبلوا وافر تقديرى واحترامى *** وجزاكم الله خيرا ترحيل الكميات المنصرفة.xlsb.rar

السلام عليكم ورحمته الله وبركاته استاذى الفاضل / رجب جاوش والله زمان ياراجل ياطيب *** نورت الدنيا كلها أعتقد ان المرفق التالى يفى بالغرض حسب مافهمت من الاخ ناصر أرجو ان يكون فيه النفع والافادة أرجو الاطلاع على ماورد بالمشاركة رقم 7 وجزاكم الله خيرا ترحيل وتجمع قيم الاخ ناصر.xlsb.rar

للرفع

اخى فى الله الاستاذ / احمد السلام عليكم الاجمل من الملف هو لقائى بحضرتك فبارك الله فيكم وفى عمرك لاأعتقد أن هناك مشكلة بالخصم ولا بالاضافة فضلا قم بحذف جميع القيم ومن ثم 1000 فى الاضافة ثم 200 فى الخصم إذن الحالى = 800 ثم على نفس الـــ 1000 سنضيف 100 إذن الحالى = 900 ثم فى الخصم 400 إذن الحالى = 500 تشرفت بكم أخى الفاضل ***** تقبل وافر تقديرى واحترامى **** وجزاكم الله خيرا

السلام عليكم جميعا ورحمته الله وبركاته وبعد إذن اخوانى الافاضل الاستاذ / احمد والاستاذ / سليم هذه محاولة حسب مافهمت من الاخ ناصر وهو إضافة طفيفة للمرفق المشارإليه بالرابط المذكوراعلاه لحين تدخل الاساتذه الافاضل نظرا لاهمية تعديل المرفق على نحو يتم إخفاء القيم المدخلة بالعمود C كما بالعمود E وافر تقديرى واحترامى **** وجزاكم الله خيرا خصم وإضافة.xlsb.rar

للرفع

اخى الحبيب الغالى // ابو البراء السلام عليكم ورحمته الله وبركاته بداية جزاكم الله خيرا وأعتذر للعودة مرة أخرى بشأن هذا الموضوع لاحظت أخى الحبيب سقوطا بمقدار صفين لاسفل للتفقيط وعبارة " ماعدا السهو والخطأ " عند توسيط التذييل بالورقة " data " أو جعل محتوى التذييل ليبدأ من الخلية A بدلا من الخلية B بداية من الصف الثالث حتى أتحكم فى التنسيق العام لبيان الاسعارعند طباعته فما السبيل لتجنب تلك العقبة ***** وافر تقديرى واحترامى **** وجزاكم الله خيرا فاتورة مبيعات بنظام القرش والجنيه مع التفقيط+5555.rar

هههههههههههههههه أخى الحبيب الغالى // ابو البراء بارك الله فيكم وجزاكم الله خيرا تقبل وافر تقديرى واحترامى

أخى الحبيب الغالى // ابو البراء السلام عليكم عذرا أخى الحبيب برجاء الاطلاع على المرفق التالى نظرا لوجود تعديل طفيف كما هو موضح بالمرفق وافر تقديرى واحترامى *** وجزاكم الله خيرا ترحيل الفواتير الصادرة والمصروفات+555.rar

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

اللهم أمين وكافة أمة سيدنا محمد صلى الله عليه وسلم

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

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

اللهم امين اللهم امين اللهم امين دعواتك ابوالبراء

اخى الحبيب الغالى // ابو البراء احلى صباح عليك وعلى عيونك بارك الله فيك **** ورزقنا الله واياكم من حيث لانحتسب وجزاكم الله خيرا

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

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

بسم الله الرحمن الرحيم وبه نستعين السلام عليكم ورحمته الله وبركاته أشكر حضراتكم لحسن تعاونكم مع جميع السادة الاعضاء المرفق التالى يوضح المطلوب بحول الله تعالى الطلب الاول إضافة كود كما هو موضح بصفحة " المصروفات " الطلب الثانى تعديل الكود المبين بالموديول كما هو موضح بصفحة " الفواتيرالصادرة " تقبلوا وافر تقديرى واحترامى *** وجزاكم الله خيرا ترحيل الفواتير الصادرة والمصروفات.xlsb.rar

اخى الحبيب الغالى // ابو البراء على الرحب والسعة جارى اعداد ملف سيتم رفعه مساءا بحول الله تعالى وجزاكم الله خيرا

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

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

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