masterkabo قام بنشر مايو 30, 2012 قام بنشر مايو 30, 2012 السلام عليكم ورحمة الله وبركاتة اولا فخور وكلي فخر بأن أجد مثل هذا المنتدى على شبكة الانترنت وفخور بهذا التجمع الهائل من المتخصصين موضوعي باختصار اريد ان اصنع ثلاث قوائم منسدلة مرتبطة ببعضها كل واحده مرتبطة بما قبلها والى سيادتكم مثال مدمج بالمرفقات للسادة الاساتذه للافضال متمنيا من الله ان اجد ما ابحث عنه من معلومه عندكم والله الموفق Product list1.rar
طارق محمود قام بنشر مايو 30, 2012 قام بنشر مايو 30, 2012 السلام عليكم أولا أهلا ومرحبا بك أخي الكريم بين إخوانك ثانيا لتلبية طلبك، تم تسمية المجالات التالية بالأسماء التي بجوارها Agnt1 $E$2:$E$9 Agnt2 $E$10:$E$16 Agnt3 $E$17:$E$25 Agnt4 $E$26 Agnt5 $E$27 Agnt6 $E$28 Agnt7 $E$29 Agnt8 $E$30 Wasf_1A $I$2:$I$64 Wasf_1B $I$65:$I$83 Wasf_1C $I$84:$I$99 Wasf_1D $I$100:$I$108 Wasf_1E $109:$I$114 Wasf_1F $I$115:$I$165 Wasf_1G $I$166:$I$211 Wasf_1H $I$212:$I$217 Wasf_2A $I$218:$I$234 Wasf_2B $I$235:$I$247 Wasf_2C $I$248:$I$250 Wasf_2D $I$251:$I$253 Wasf_2E $I$254:$I$259 Wasf_2F $I$260:$I$265 Wasf_2G I$266:$I$269 Wasf_3A $I$270:$I$288 Wasf_3B $I$289:$I$299 Wasf_3C $I$300:$I$305 Wasf_3D $I$306:$I$308 Wasf_3E $I$309:$I$323 Wasf_3F $I$324:$I$326 Wasf_3G $I$327:$I$338 Wasf_3H $I$339:$I$342 Wasf_3I $I$343:$I$345 Wasf_4A $I$346:$I$429 Wasf_5A $I$430:$I$467 Wasf_6A $I$468:$I$496 Wasf_7A $I$497:$I$514 وكان ذلك سهل بوضع بعض الأكواد مثل Sub Range_Names() LR = [I8400].End(xlUp).Row x1 = 2 For r = 2 To LR - 1 If Cells(r, "J") <> Cells(r + 1, "J") Then x2 = r ActiveWorkbook.Names.Add Name:="Wasf_" & Cells(x1, "J"), RefersToR1C1:= _ "=Product!R" & x1 & "C9:R" & x2 & "C9" x1 = r + 1 End If Next r End Sub المهم تفضل المرفق به ماطلبت وليس مهما ان تفعل الأكواد Product list1.rar
masterkabo قام بنشر مايو 30, 2012 الكاتب قام بنشر مايو 30, 2012 السلام عليكم ورحمة الله وبركاته اخي الكريم الاستاذ طارق اولا شكرا خالص الشكر والشكر لله ثانيا قد تخيلت في البداية ان الحل من عند الله ثم من عندك واندهشت كثيرا عندما رأيت ردك على الموضوع وفرحت كثيرا لما رأيته من تفاؤل تجاهك وهذه ليست مبالغة انما حقيقة لانني كنت متابع جيد للمنتدى قبل ان اشترك وثالثا جاري التحميل والتجربة رعاك الله وحفظك وجعلك عون لمن يطلب مساعدتك
masterkabo قام بنشر مايو 30, 2012 الكاتب قام بنشر مايو 30, 2012 ولي طلب اخيرا وليس اخرا هل في استطاعتك شرح هذا الكود لتعم الفائدة
طارق محمود قام بنشر مايو 30, 2012 قام بنشر مايو 30, 2012 السلام عليكم شرح هذا الكود لتعم الفائدة تفضل الملف وبه شرح سريع للكود Product list2.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.